Visual Basic - Problemas con el Recordset

Life is soft - evento anual de software empresarial
 
Vista:

Problemas con el Recordset

Publicado por guillermo (62 intervenciones) el 03/03/2006 13:53:09
Buenos dias a todos...
les cuento..tengo que rescatar un ultimo registro que ingrese...
lo intento hacer con una consulta y con el .MoveLast
pero no me funciona asi...pongo el cod. para que echen un vistazo...si esta mal o hay otra forma de hacerlo..les agradeceria mucho que me ayuden...porque esto es mas o menos
urgente....

If RST.State = 1 Then RST.Close
RST.Open "SELECT * FROM [detalle solicitud vacaciones] WHERE rut='" & Text1 & "' ORDER BY item", conex

If Not RST.EOF And Not RST.BOF Then
RST.MoveLast
MsgBox "ITEM correspondiente : " & RST(3), vbInformation
End If

de antemano, gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problemas con el Recordset

Publicado por Rodrigo (83 intervenciones) el 03/03/2006 15:00:21
No es lo mejor, pero podrias reordenar la consulta SQL.

SELECT * FROM [detalle solicitud vacaciones] WHERE rut='" & Text1 & "' ORDER BY item DESC

y asi obtienes el primer registro y no ocupas el movelast.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problemas con el Recordset

Publicado por wladimir (54 intervenciones) el 03/03/2006 15:03:41
hola en el where de la primera consulta deberia ser text1.text

If RST.State = 1 Then RST.Close
RST.Open "SELECT * FROM [detalle solicitud vacaciones] WHERE rut='" & Text1.text & "' ORDER BY item", conex

If Not RST.EOF And Not RST.BOF Then
RST.MoveLast
MsgBox "ITEM correspondiente : " & RST(3), vbInformation
End If

espero que sea solo ese el error. saludos de chile
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar