SR
Publicado por GINO (6 intervenciones) el 03/12/2002 00:52:14
CONEXION CON FOX PRO POR ODBC??
USO VB 6.0 Y CRYSTAL REPORT 7.0 Y TENGO PROBLEMAS , EN RESUMEN.. ME CONECTO POR ODBC - FOXPRO FILES-WORD, COMO TENGO BASES DE DATOS EN DISTINTAS UBICACIONES AGREGO DOS CONECIONES POR ODBC, DESPUES DE HACER LAS RELACIONES Y GUARDAR LOS DATOS EN EL REPORTE GUARDARLO, CERRARLO PARA UTILIZARLO DESDE VISUAL BASIC
CON LA SIGUIENTE CADENA:
With frmPrint.crtRegistroReten
.Formulas(0) = "Titulo='DESPACHO DE ALMACEN POR CLIENTE, DEPENDENCIA, AREA Y C.COSTOS DEL " & frmPrint.dtpDel.Value & " AL " & frmPrint.dtpAl.Value & "'"
.SelectionFormula = "{parte2.clave} = " & frmPrint.txtCliente & " and " & _
"{parte2.depende} = " & frmPrint.txtDepende & " and " & _
"{parte2.area} = " & frmPrint.txtArea & " and " & _
"{parte2.cc} = '" & frmPrint.txtCostos & "' and " & _
"({parte2.fecha} >= date (" & Format(frmPrint.dtpDel.Value, "YYYY,MM,DD") & ") and {parte2.fecha} <= date (" & Format(frmPrint.dtpAl.Value, "YYYY,MM,DD") & "))"
.ReportFileName = App.Path & "\Reportsql1.RPT"
.WindowTitle = "DESPACHO POR ALMACEN CLIENTE: "
.RetrieveDataFiles
.Action = 1
ME GENERA UN ERROR : 20599 "no se puede abrir el archivo SQL"
Y cuando le quito la siguiente linea:
.RetrieveDataFiles
ya no genera el error, pero el inconveniente es que va trabajar los los datos guardados en el reporte.
Agradecere quien pueda ayudarme
Saludos ...
gino
USO VB 6.0 Y CRYSTAL REPORT 7.0 Y TENGO PROBLEMAS , EN RESUMEN.. ME CONECTO POR ODBC - FOXPRO FILES-WORD, COMO TENGO BASES DE DATOS EN DISTINTAS UBICACIONES AGREGO DOS CONECIONES POR ODBC, DESPUES DE HACER LAS RELACIONES Y GUARDAR LOS DATOS EN EL REPORTE GUARDARLO, CERRARLO PARA UTILIZARLO DESDE VISUAL BASIC
CON LA SIGUIENTE CADENA:
With frmPrint.crtRegistroReten
.Formulas(0) = "Titulo='DESPACHO DE ALMACEN POR CLIENTE, DEPENDENCIA, AREA Y C.COSTOS DEL " & frmPrint.dtpDel.Value & " AL " & frmPrint.dtpAl.Value & "'"
.SelectionFormula = "{parte2.clave} = " & frmPrint.txtCliente & " and " & _
"{parte2.depende} = " & frmPrint.txtDepende & " and " & _
"{parte2.area} = " & frmPrint.txtArea & " and " & _
"{parte2.cc} = '" & frmPrint.txtCostos & "' and " & _
"({parte2.fecha} >= date (" & Format(frmPrint.dtpDel.Value, "YYYY,MM,DD") & ") and {parte2.fecha} <= date (" & Format(frmPrint.dtpAl.Value, "YYYY,MM,DD") & "))"
.ReportFileName = App.Path & "\Reportsql1.RPT"
.WindowTitle = "DESPACHO POR ALMACEN CLIENTE: "
.RetrieveDataFiles
.Action = 1
ME GENERA UN ERROR : 20599 "no se puede abrir el archivo SQL"
Y cuando le quito la siguiente linea:
.RetrieveDataFiles
ya no genera el error, pero el inconveniente es que va trabajar los los datos guardados en el reporte.
Agradecere quien pueda ayudarme
Saludos ...
gino
Valora esta pregunta
0