problema access

Javi
04 de Febrero del 2005
Hola, estoy usando el siguiente código para obtener el valor de un elemento seleccionado en un lista y necesito usar ese valor para realizar una consulta y actualiza tres cuadros de textos. Dicho código me da un error al hacer la consulta. A ver si alguien me echa un cable, porque no tengo forma de encontrar la solución.

Private Sub Lista5_Click()

Dim r As Recordset
Dim bd As Database
Dim valor As String

Set bd = CurrentDb()

'For i = 0 To Lista5.ListCount - 1
If Lista5.Value <> "" Then
valor = [Lista5].Value
Set r = bd.OpenRecordset("SELECT Programas.Ubicacion, Programas.Documentacion, Programas.Descripcion FROM Programas WHERE (((Programas.Nombre)= valor));", dbOpenSnapshot)
End If
'Next i



'[Texto1].????
'[Texto2].????
'[Texto3].????

End Sub

Javi
04 de Febrero del 2005
Muchísimas gracias Juan. Un saludo.

Juan
04 de Febrero del 2005
hacelo asi:

Set r = bd.OpenRecordset("SELECT Ubicacion, Documentacion, Descripcion FROM Programas WHERE Nombre='" & valor & "';", dbOpenSnapshot)


Si el campo Nombre es numerico, sacale la comilla simple

Si vas a usar variables para formar la consulta, tenes que unir las cadenas con &

Como lo estas haciendo la consulta pregunta por nombre igual a la palabra valor y no por el contenido de la variable valor.

Un saludo

linamary
04 de Febrero del 2005
Hola

Estoy creando una base de datos para calidad y necesito que las fechas de las tareas sean enviadas segun su fecha de cumplimiento por medio de un mensaje en outlook.
Es posible?

te agradeceria cualquier información sobre esto.

Gracias

LINA