Crystal Report - El servidor aún no ha sido abierto

 
Vista:

El servidor aún no ha sido abierto

Publicado por Mauricio (1 intervención) el 24/07/2001 16:36:32
Estoy generando un reporte del cual la idea es tomar una carperta con imagenes y que estos se impriman en el reporte, baje un ejemplo para esto, hice los mismos pasos, claro que la BD del ejemplo esta en ACCESS y la mia en SQL Server 7.0. El Ejemplo funciona a la perfecion pero el mio saca el mensaje de que el servidor aun no ha sido abierto.
Gracias al que pueda ayudarme estoy un poco urgido para solucionar este problema, o si hay otra forma la recibire con gratitud.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:El servidor aún no ha sido abierto

Publicado por Ferran Pérez (2 intervenciones) el 11/08/2001 15:30:32
A mi me pasaba exactamente lo mismo utilizando el CRViewer de Crysta. Ahora he optado por el otro control de crystal y no me da este problema.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:El servidor aún no ha sido abierto

Publicado por isaias (7 intervenciones) el 23/08/2001 20:40:58
Aqui te va el codigo completo para SQL Server 7 0 2000, cualquiera de los dos!! Un favor enviame lo que a ti te funciona en access a mi correo, a mi tambien me manda el mismo error que a ti pero para access, si tienes tiempo dime cuales fueron los pasos que seguiste para realizar el reporte para access!! Gracias!!

Option Explicit
Dim crxReporte As New CRAXDRT.Report
Dim crxAplicacion As New CRAXDRT.Application

Private Function AbreReporte() As Boolean
On Error GoTo errAbre

Set crxReporte = crxAplicacion.OpenReport("C:\reportesFaure\Faure\rptPrueba.rpt")
AbreReporte = True
Exit Function

errAbre:
MsgBox Err.Number & " " & Err.Description, vbCritical, "Facturas"
AbreReporte = False
End Function

Private Sub Imprime_Nota()
On Error GoTo errImprimeN
crxReporte.RecordSelectionFormula = "{Articulos.IdProveedor} = {?clave}"
crxReporte.ParameterFields(1).AddCurrentValue (txtreferencia.Text)


crxReporte.ReadRecords
CRViewer1.ReportSource = crxReporte
CRViewer1.ViewReport


Exit Sub
errImprimeN:
MsgBox Err.Number & " " & Err.Description, vbCritical, "Facturas"

End Sub

Private Sub Prepara_impresion()
Set crxAplicacion = Nothing
Set crxReporte = Nothing
CRViewer1.ReportSource = crxReporte
If Not AbreReporte Then Exit Sub
Imprime_Nota

Set crxAplicacion = Nothing
Set crxReporte = Nothing

End Sub

Private Sub cmdGenerar_Click%
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:El servidor aún no ha sido abierto

Publicado por Juan Jose (5 intervenciones) el 12/06/2004 01:08:22
Buscar en la pagina de crystal http://www.crystaldecisions.com la frase
server not yet been opened
te enviara a un archivo pdf donde se explican las posibles causas, lo solucione corriendo un webfix llamado:
scr8_webregfix.exe
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar