Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: ismael825 en 8 Septiembre 2012, 02:16 AM

Título: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: ismael825 en 8 Septiembre 2012, 02:16 AM
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
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: HdM en 8 Septiembre 2012, 13:08 PM
Hola.

Igual ya has encontrado la solución en otro foro y ya no te pasas en tu vida por aquí. Si vuelves, sería interesante que eches un vistazo a las normas y al uso de las etiquetas GeSHi.

El problema lo tienes en el uso incorrecto de las comillas simples a la hora de delimitar los valores de los campos en la query.

Saludos.
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: ismael825 en 10 Septiembre 2012, 17:35 PM
Ya he intentado pero no logro que me envie la consulta a mi textbox, puedes ayudarme con el codigo si no es mucha molestia. Realmente apenas me inscribi en elhacker pero desde hace vario tiempo entro y leo cosas cuando necesito algo.

Saludos.
Código (vb) [Seleccionar]
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: seba123neo en 11 Septiembre 2012, 17:17 PM
creo que te falta el .MoveFirst despues de abrir el recordset, antes de mostrar el campo.
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: MCKSys Argentina en 12 Septiembre 2012, 01:10 AM
Me parece que no funciona porque estas dentro del WITH.

Prueba colocando la asignacion afuera del bloque.

Saludos!
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: Yoghurt en 13 Septiembre 2012, 05:30 AM
coincido y alerto aunque no soy un experto que hay algo malo cerca de
Código (vb) [Seleccionar]
Text2.Text = rST!entrada
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: Yoghurt en 13 Septiembre 2012, 05:31 AM
coincido y alerto aunque no soy un experto que hay algo malo cerca de
Código (vb) [Seleccionar]
Text2.Text = rST!entrada
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: HdM en 13 Septiembre 2012, 20:30 PM
Hola.

CitarEl problema lo tienes en el uso incorrecto de las comillas simples a la hora de delimitar los valores de los campos en la query.

Citar.Open "select entrada from stock where PROVEEDOR='" & Combo1 & " and DESCRIPCION=" & Combo4 & "'"

Esa consulta me da a mi que nunca va a devolverle ningún registro  :P

Saludos.
Título: Re: Ayuda por favor con vb6 un textbox no me refleja la consulta
Publicado por: MCKSys Argentina en 13 Septiembre 2012, 22:35 PM
Cita de: Bulld0z3r en 13 Septiembre 2012, 20:30 PM
Hola.

Esa consulta me da a mi que nunca va a devolverle ningún registro  :P

Saludos.


+1. Le faltan las comillas simples para identificar el valor del campo como texto...