Traer datos mediante una consulta

Tengo una duda que me gustaría que me pudiera resolver.
Estoy trayendo datos por medio de una consulta donde busque todos los datos que tengan el mismo valor de un label en la base de datos y luego quiero que todos esos datos me los traiga y me los pueda poner en otros label, tengo este código pero no estoy eguro si esta bien.
Set Rec = New ADODB.Recordset
    With Rec
        Set .ActiveConnection = Con
        .CursorType = adOpenDynamic
        .CursorLocation = adUseClient
        .LockType = adLockOptimistic
        .Source = "select * from ANTICIPOS where ANTICIPODIRIGIDOA = " & lblNombre
        .Open
    End With
    lblLegalizacionNo.Caption = Rec!NO
    lblDirigdoA.Caption = Rec!ANTICIPODIRIGIDOA
    lblValorAnticipo2.Caption = FormatCurrency(Rec!VALORANTICIPO)
    lblObra2.Caption = Rec!OBRA

2 Respuestas

Respuesta
1
Creo que el dato es un String entonces debes colocarlo entre comillas sencillas:
.Source = "select * from ANTICIPOS where ANTICIPODIRIGIDOA = '" & lblNombre & "' "
Fíjate que coloque comillas sencillas entes y después del label.
Respuesta
1
Aparentemente si, pero en caso de que rec no tenga registros te dará error
deberías controlar que rec tiene datos (recordcount) y en caso afirmativo hacer la asignación.
Otro problema que puedes tener es que no se te refresque la pantalla, pero eso no pasa siempre, y no veas los cambios en los caption de las labels, para eso tienes el refresh del formulario por si acaso.
No se si te resuelvo la duda...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Recorrer datos de un Select

Tengo un problema con una aplicación que estoy desarrollando, tengo el siguiente código que me llama unos datos de la Base de Datos. Set Rec = New ADODB.Recordset With Rec Set .ActiveConnection = Con .CursorType = adOpenDynamic .CursorLocation =...
3 respuestas

¿Cómo vincular mi folio con el nombre?

Necesito de favor vincular un textbox con mi base de datos que al insertar el folio en un textbox en otro aparezca el nombre del articulo mi base de datos tiene estos campos folio Nombre 123 Pedro Que al escribir 123 automáticamente me ponga el...
6 respuestas

Combobox en Visual basic 6.0

Estoy haciendo una aplicación en visual basic 6.0 conectado con una base de datos en sql 2000. Lo que pasa es lo siguiente: Quisiera que al momento de cargar el combobox me aparezca los nombres, pero que al momento de guardar el combobox se guarde...
5 respuestas

Conectar con una Consulta Access

Esta es primera vez que le hago una consulta sobre el particular... Mi problema es el siguiente. Tengo una aplicación desarrollada con VB 6.0 y necesito accesar una Consulta de access. La consulta es el resultado de varios registros que se duplican...
1 respuesta

Recordset desconectado

Mi pregunta es tengo un recordset desconectado quisiera saber si hay manera de estando desconectado eliminar registro por medio de sql y lo mismo para actualizar. Quiero que sea una temporal en la que pueda hacer cambios sin que afecten la tabla original
1 respuesta

Error al llamar datos de una tabla

Tengo el Siguiente código: Private Sub cboObra_Click() cboAnticipoDirigidoA.Text = "" cboLegalizacionNo.Text = "" Set Con = New ADODB.Connection With Con .ConnectionString = "provider = microsoft.ace.oledb.12.0;data source=D:\PROYECTO TYT\TYT.accdb"...
2 respuestas

Trabajar con Visual Basic en Microsoft Excel, datagrid en un formulario

Vi tus excelentes respuestas y tengo una pregunta que hacerte, mira yo estoy trabajando con VBA en excel, pues el código es casi el mismo, y tengo un par de preguntas. 1. Tengo un datagrid dentro de mi formulario principal, donde muestro los campos,...
1 respuesta

¿Cómo contar registros en visual basic 6?

Tengo una base de datos en access 2000 en la que hay un tabla de prestamos y uso conexión a ella con adodc. Lo que quiero hacer es lo siguiente: Mostrar en un label pero con números la cantidad registros del campo "fechaentrega" que sean iguales al...
1 respuesta

Modificar registros y luego actualizar base de dat

Espero que me colabores en lo siguiente: Tengo en un formulario un datagrid, el botón de buscar y el de modificar, ademas adicional a esto esta otro botón para guardar cambios más abajo coloque tres textbox, mi pregunta es la siguiente:¿Qué código le...
1 respuesta

Base de Datos Access desde Visual Basic 6.0

Estoy trabajando con una base de datos access desde visual basic 6.0, cuando intento actualizar un registro o guardar uno nuevo me envía el siguiente error (Error de Sintaxis Falta Operador en la Exprision de Consulta), ya he intentado depurar el...
1 respuesta