Visual Basic - POR FAVOR URG!!!! Nec. llamar reporte desde....

Life is soft - evento anual de software empresarial
 
Vista:

POR FAVOR URG!!!! Nec. llamar reporte desde....

Publicado por Jessica (1 intervención) el 23/01/2003 16:33:23
Necesito llamar a pantalla un reporte hecho en microsoft access desde desde una forma en visual basic. Necesito saber como levanto un reporte para verlo desde visual basic.

Gracias
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:POR FAVOR URG!!!! Nec. llamar reporte desde....

Publicado por Koki (29 intervenciones) el 24/01/2003 11:59:50
Hola,

Te paso este pequeño código que encontré hace tiempo en otro foro (http://www.experts-exchange.com/Programming/Programming_Languages/Visual_Basic/VB_Databases/Q_10093264.html)

Espero que lo entiendas, si no funciona avísame, no lo he probado pero sé que se puede hacer porque yo lo había hecho en programas anteriores.

Option Explicit

Const dbPathName = "c:\database.mdb"
Const strPassword = "PASSWORD"
Dim Acc As Object, db As Object

Private Sub Command1_Click()
Set Acc = CreateObject("Access.Application")
Set db = Acc.Application.DBEngine.Workspaces(0).OpenDatabase(dbPathName, 0, False, ";pwd=" & strPassword)
Acc.OpenCurrentDatabase dbPathName, False
Set db = Nothing
Acc.DoCmd.OpenReport "ReportName", acPreview
Set Acc = Nothing
End Sub
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