arturtaz
30 de Septiembre del 2004

hola quisiera saber si me pueden ayudar con esto tengo el contenido de uan base de datos en un data grid ya visualizo los datos pero no se como mandarlos a imprimir desde ese lugar si me pudieran ayudar les agradeceria y otra pregunta saber si se puede añadir datos desde un combo box directamente a un datagrid de antemano gracias

JUAN
30 de Septiembre del 2004

solo imprime el contenido de el datagrid del formulario con el metodo printform

Carlos
30 de Septiembre del 2004

favor de ayudarme no se como imprimir la informacion de un datagridme podrias ayudar gracias; y si noes mucha molestia tambien pasame el metodo que indicas aqui gracias porque no se que hacer

Cuervo
30 de Septiembre del 2004

Para colocar los datos de un combobox hacia un data grid debes colocar lo sgte:Dim rsinforme As Recordset
Dim cninforme As Connection
Dim cominforme As Command
Set cninforme = New Connection
Set rsinforme = New Recordset
Set cominforme = New Command
With cninforme
.Provider = "SQLOLEDB"
.ConnectionString = "user id = sa; password = ; " & _
" data source = DARID30; " & _
" initial catalog = abastecimiento; "
.Open

With cominforme
.ActiveConnection = cninforme
.CommandText = " Select * From dbo.clientes"

rsinforme.CursorLocation = adUseClient
rsinforme.LockType = adLockOptimistic \'bloqueo
rsinforme.CursorType = adOpenKeyset
rsinforme.Open "select codigoproducto, nombre, descripcion, costo, unidad, cantidad from producto where bodega= \'" & Combo1 & "\'", cninforme
If rsinforme.BOF = False Then
Set informe.DataSource = rsinforme
informe.Refresh

End If

End With
End With

Nota: El combo posee datos rescatados de una base de datos. Todo el código está para Dql, ojalá te sirva.