Hola quien me puede ayudar. estoy realizando una consulta con los sig. campos
Proveedor descripcion entrada stock
(text) (text) (numero (numero)
la base de datos esta en acces y uso vb6.
tengo 2 combobox y un texbox y boton guardar
cuando tecleo la opcion de combo2 envio una consulta asi:
Private Sub Combo2_CLICK()
Dim rST As ADODB.Recordset
Set rST = New ADODB.Recordset
With rST
.ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & _
"C:\almacen\almacen.mdb"
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.Open "select entrada from stock where PROVEEDOR='" & Combo1 & " and DESCRIPCION=" & Combo4 & "'"
Text2.Text = rST!entrada
End With
End Sub
y deseo que el textbox me muestre el valor de la consulta que realizo es decir un valor del campo "entrada", eso para que con ese valor despues lo sume a mi stock, pero me marca error "la operaciones solicitada requiere un registro actual. porque me marca eso, algui que pueda ayudarme, los combobox solo jalan campos en lectura de mi BD. y me muestran todo los registros que tengo. pero mi textbox no muestra nada.
de ante mano le agradezco al que me pueda ayuda. muchas gracias
Proveedor descripcion entrada stock
(text) (text) (numero (numero)
la base de datos esta en acces y uso vb6.
tengo 2 combobox y un texbox y boton guardar
cuando tecleo la opcion de combo2 envio una consulta asi:
Private Sub Combo2_CLICK()
Dim rST As ADODB.Recordset
Set rST = New ADODB.Recordset
With rST
.ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & _
"C:\almacen\almacen.mdb"
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.Open "select entrada from stock where PROVEEDOR='" & Combo1 & " and DESCRIPCION=" & Combo4 & "'"
Text2.Text = rST!entrada
End With
End Sub
y deseo que el textbox me muestre el valor de la consulta que realizo es decir un valor del campo "entrada", eso para que con ese valor despues lo sume a mi stock, pero me marca error "la operaciones solicitada requiere un registro actual. porque me marca eso, algui que pueda ayudarme, los combobox solo jalan campos en lectura de mi BD. y me muestran todo los registros que tengo. pero mi textbox no muestra nada.
de ante mano le agradezco al que me pueda ayuda. muchas gracias