Ver Mensaje Individual
  #2 (permalink)  
Antiguo 12/08/2008, 13:34
asbraha
 
Fecha de Ingreso: mayo-2008
Mensajes: 35
Antigüedad: 17 años
Puntos: 0
Respuesta: [access2000] Extraer un dato a una variable

Pues mira, no se si entendi bien, pero creo podrias manejarlo algo asi:

Código PHP:

Dim CON 
As Variant
Dim SQL 
As String
Dim RS 
As Variant
Dim busca 
As String

Set CON 
CreateObject("ADODB.Connection")
CON.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" "C:\BasedeDatos.mdb")

busca Text1.Text  

SQL 
"SELECT * FROM Tabla_Pedidos WHERE Campo_Nombre  LIKE  '" busca "'"

Set RS CON.Execute(SQL)


Do While 
Not RS.EOF

txtDato1
.Text RS("Dato1")
txtDato2.Text RS("Dato2")
txtDato3.Text RS("Dato3")

RS.MoveNext

Loop 
Para este ejemplo necesitas tu base con los campos Campo_Nombre, Dato1, Dato2, Dato3, etc, y la busqueda te devolvera todos los registros con el nombre que introduzcas en el Text1.Text por lo que te recomendaria que usaras un id y no un nombre espero te sea de utilidad