chipujo
24 de Julio del 2003

Saben lo que pasa que quiero hacer una busqueda pero solo quiero que me aparescan datos espesificos en el data grid como por ejemplos todos los alumnos que tienen 10 pero no se como hacerlo y despues lo quiero imprimir pero no tengo el crystal.Por favor si me pueden ayudar
o si es mejor que no use el datagrid

Felipe
24 de Julio del 2003

Fijate en este ejemplo

Dim rstAlumnos As New ADODB.Recordset
Dim StrSql As String
StrSql = "SELECT Codigo,Nombre,Curso Asignatura FROM Alumnos " _
& "WHERE Codigo=1 AND Asignatura = 4 " _
& "ORDER BY [Codigo],[Asignatura]"
With rstAlumnos
.ActiveConnection = dbsGESTION
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Properties("IRowsetIdentity") = True
.Open StrSql, , , , adCmdText
End With
Set Adodc1.Recordset = rstAlumnos
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh

Si te fijas estoy haciendo un recordset en donde llamo a la tabla Alumnos de la Conexion dbsGestion y le asigno el valor de la datagrid al Adodc1.
Que tengas mucha suerte. Un Saludo
FELIPE