RECORSET

MAICONLS 20/07/2005 16:14:58
#95208
Boa tarde, é possivel fazer um recordset desse jeito ?

Autorizado = "SIM"
Set Cnn = New ADODB.Connection
Set Rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient

On Error GoTo erros
Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:    riade\Data\dbase.mdb;Jet OLEDB:Database Password=tmonrsr2308sbnu;"
Rs.Open "Select * From TabFuncionarios where Codigo='" & txtnome.Text & "' and Senha='" & txtsenha.Text & "' and AutorizaAcesso='" & Autorizado & "'", Cnn, adOpenStatic

Com 3 escolhas ? Obrigado..
LREZANI 20/07/2005 16:26:05
#95212 Resposta escolhida
Sim, Tranquilamente.
Veja:
 
Autorizado="Sim"
Autorizado2="Não Definido"

 Rs.Open "Select * From TabFuncionarios where Codigo='" & txtnome.Text & "' and Senha='" & txtsenha.Text & "' and AutorizaAcesso='" & Autorizado & "' Or Codigo='" & txtnome2.Text & "' and Senha='" & txtsenha2.Text & "' and AutorizaAcesso='" & Autorizado2 & "'", Cnn, adOpenStatic

Fique de olho apenas na sintaxe.
Tópico encerrado , respostas não são mais permitidas
Voltar