BUSQUEDA
COMO BUSCO UN REGISTRO EN UNA BASE DE DATOS Y EXTRAIGO PARA UNA VARIABLE SOLO UNO DE LOS CAMPOS DEL REGISTRO
Hay dos formas para seleccionar el reg:
1.- objeto.recodrset.findfirst
2.- Hacer un Select * from Tabla where Campo = criterio
Para asignar el campo a la variable
variable = objeto.recordset("nombredelcampo")
variable = objeto.recordset![nombredelcampo]
variable = objeto.recordset(indice del campo)
1.- objeto.recodrset.findfirst
2.- Hacer un Select * from Tabla where Campo = criterio
Para asignar el campo a la variable
variable = objeto.recordset("nombredelcampo")
variable = objeto.recordset![nombredelcampo]
variable = objeto.recordset(indice del campo)
Dim rstDatos As Recordset
Dim cSQL As String
Dim IDModelo As Integer \'<----Variable donde se almacena el campo del registro
cSQL = "SELECT * FROM Marcas WHERE Marca=\'" & Me.cboMarca.Text & "\'"
Set rstDatos = db.OpenRecordset(cSQL)
If rstDatos.EOF = False Then \'Quiere decir que tiene datos...
IDModelo = rstDatos![Nombre del campo]
End If
rstDatos.Close
Dim cSQL As String
Dim IDModelo As Integer \'<----Variable donde se almacena el campo del registro
cSQL = "SELECT * FROM Marcas WHERE Marca=\'" & Me.cboMarca.Text & "\'"
Set rstDatos = db.OpenRecordset(cSQL)
If rstDatos.EOF = False Then \'Quiere decir que tiene datos...
IDModelo = rstDatos![Nombre del campo]
End If
rstDatos.Close
