Visual Basic - Imprimir informe de Access 2000 desde Visual

Life is soft - evento anual de software empresarial
 
Vista:

Imprimir informe de Access 2000 desde Visual

Publicado por Paolo Jalon (1 intervención) el 26/04/2004 23:57:36
Saludos a todos !!, quisiera que por favor me ayuden diciendome cual seria el codigo o los parametros para poder imprimir un informe creado en Access 2000 desde una aplicacion hecha en Visual Basic 6, si pudieran mandermelo a mi correo. Gracias

Mi otro correo(CHAT MSN): [email protected]
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:Imprimir informe de Access 2000 desde Visual

Publicado por Ruben Olivera (44 intervenciones) el 03/05/2004 23:35:34
te envio la el codigo aqui...en breve
Imprimir un informe de Access desde Vb:

'Agregar una referencia en el proyecto a:

MS Access

Dim MSAccess as Access.Application

Private Sub CMDREPORT_click()
Set MSAccess = New Access.Application
MSAccess.OpenCurrentDatabase("C:\Nombre_Carpeta\Base_de_Datos.mdb")
'Si la bd esta protegida con contraseña el unico metod que conozco es:
'Enviarle la contraseña de esta forma: SendKeys"contraseña{ENTER}"

MSAccess.Docmd.OpenReport "Nombre_Reporte",acviewNormal
MSaccess.CloseCurrentDatabase
SetMSAccess = nothing
End Sub

Chauu jote.....

Ruben Chileno.........
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:Imprimir informe de Access 2000 desde Visual

Publicado por Eduardo García (1 intervención) el 13/05/2004 11:28:15
Buenos días, compañeros del metal, no se que tal le habra ido a Paolo, pero yo no he conseguido desde una aplicacion en VB llamar a un informe Access. Actualmente no tengo ningún problema para realizar consultas a tablas en Access, pero el comando indicado por Ruben a mi no me funciona. Cuando llego al procedimiento de llamada ya tengo abierta la BD y guardo la direccion en una variable (MIBD_ACCESS). Para realizar la llamada al informe ejecuto lo siguiente "MIBD_ACCESS.Docmd.OpenReport Str_Informe, acviewNormal" y me da un error en tiempo de ejecución (3001), alguien sabe que puedo hacer para poder abrir el informe e imprimirlo.

Gracias
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