Visual Basic - Soy nueva, si me pueden ayudar un poquito...

Life is soft - evento anual de software empresarial
 
Vista:

Soy nueva, si me pueden ayudar un poquito...

Publicado por Yelitza Figueredo (1 intervención) el 09/05/2002 04:45:33
Estoy conectándome a una base de datos desde Visual Basic 6 a Access vía OLEDB Microsoft Jet 4.0, pero independientemente necesito la conexión desde Visual Basic 6 a mi base de datos vía ODBC para poder usarla en el Crystal Report que esta en mi formulario.

¿Cómo podré crear la conexión ODBC desde Visual Basic 6?
He visto por allí que con workspace, pero Visual Basic me dice que esa instrucción es inválida.

Gracias de antemano si me pueden ayudar líndos chicos y chicas...
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:Espero que sirva

Publicado por Oscar González (5 intervenciones) el 10/05/2002 01:17:40
Mira si estas usan ODBC, para crear el reporte, no debes tener problema, imagino yo, pero lo que entiendo, es que necesitas ejecutarlo desde el proyecto, a continuación te envio algo de código, yo trabajo tanto con ACCESS, como SLQ Server 7. Mándame un emails si quieres mas ayuda [email protected]

Esta mi forma de Ejecutar el reporte

CryAtenKntr.ReportFileName = DIR_Rpt & "Atenciones_Kntr.rpt"
CryAtenKntr.SelectionFormula = "{Tmp_Aten_Urg.Ficha_Hora} = " & "'" & Id & "'"
CryAtenKntr.Formulas(1) = "Fecha_Ingreso=" & "'" & dFecha_Ingreso & "'"
CryAtenKntr.Formulas(2) = "Hora_Ingreso=" & "'" & dHora_Ingreso & "'"
CryAtenKntr.Formulas(3) = "Anos=" & "'" & EdadActual & "'"
CryAtenKntr.Formulas(4) = "Medico=" & "'" & Medico & "'"
CryAtenKntr.Formulas(5) = "ImpresoPor =" & "'" & NombreTurno & "'"
CryAtenKntr.Action = 1

De esta manera abre el espacio de trabajo:

Set MdbHospital = Workspaces(0).OpenDatabase(DIR_Mdb & "Hospital")

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