RE:Consulta Parametrica Access
Publicado por
cealto (1 intervención) el 29/01/2002 03:21:46
Puedes intentar hacerlo mediante una instruccion sql y pasala los parametros desde VB al abrir un recordset el codigo mas o menos asi
dim strCnn As String
dimcnn1 As ADODB.Connection
dim rstGrupos As ADODB.Recordset
dim charGrupos As String
Set cnn1 = New ADODB.Connection
strCnn = "DSN=BASE DE DATOS" ' conexion a la base de datos
cnn1.Open strCnn
cnn1.CursorLocation = adUseClient
Set rstGrupos = New ADODB.Recordset 'abres tu recordset
rstGrupos.CursorType = adOpenKeyset
rstGrupos.LockType = adLockOptimistic
rstGrupos.Open "SELECT * FROM TRABAJO_ALUMNO Where TRABAJO_ALUMNO.IdGrupo = '" & charGrupos & "' and TRABAJO_ALUMNO.NoControl = '" & NControl & "'", cnn1, , , adCmdText
'chargrupos y Ncontrol son variables que le pase desde unos textbox
espero te sirva falta un poco de codigo para la conexion pero ya debes saber eso