Usuario
Programar Impresion de DataReport

Pregunta
-
Hola a todos!
tengo una base de datos en acces y uno de los campos tiene formato de fecha ,mi pregunta es como tengo que hacer para imprimir automaticamente un datareport en cuato llega la fecha que tiene el campo de la base de datos.
no sé si me explicado bien.
Gracias deantemano.
Todas las respuestas
-
Yo lo hacia de esta forma:
Dim cn1 As ADODB.Connection Dim rs As ADODB.Recordset '********conexión bd Access***************** Set cn1 = New ADODB.Connection 'crea un objeto ADODB.connection en la variable With cn1 .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\basededatos.mdb;Persist Security Info=False" 'se asigna la cadena que contiene el nombre de la BD .CommandTimeout = 30 'tiempo para ejecutar la sentencia anterior .ConnectionTimeout = 30 'tiempo para crear la conexion .Open 'abrir la BD End With Set rs = New ADODB.Recordset 'crea un objeto ADODB.Recordset en la variable rs.CursorLocation = adUseClient 'se selecciona el tipo de sentencia SQL = "SELECT *FROM mitabla where micampo='" & text1.text & "'" rs.Open SQL, cn1, adOpenStatic, adLockOptimistic, adCmdText 'Se ejecuta la sentecia SQL Set Me.DataSource = rs Me.Show vbModal
Jhonatan Plata
-
Gracias, la conexion la tengo echa , lo unico que necesito es que el programa imprime automaticamente el datareport en la fecha que esta en el campo de la base de datos.
por ejemplo el 22/02/2012 a las 8.00 que el programa imprime solo el datareport (la fecha puede ser qualquiera).
gracias.
-
SERIA ASI:
Set rs = New ADODB.Recordset 'crea un objeto ADODB.Recordset en la variable rs.CursorLocation = adUseClient 'se selecciona el tipo de sentencia SQL = "SELECT *FROM mitabla where fecha='22/02/2012'" rs.Open SQL, cn1, adOpenStatic, adLockOptimistic, adCmdText 'Se ejecuta la sentecia SQL Set DATAREPORT1.DataSource = rs
DATAREPORT1.Show vbModal
Solamente te tocaria Poner en los Dataset de tus DataReport los campos que quieras visualizar
Jhonatan Plata
- Editado Kaysinho jueves, 16 de febrero de 2012 16:08
-