Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Weryfikacja danych (logowanie)
PAWKO




Typ: neutral
Postów: 42
Zarejestrowany: Mar 2003
Weryfikacja danych (logowanie)

Witam. Jestem początkujący w programowaniu bazy danych w Visual Basic.
Mam w bazie MYSQL tabelke o nazwnie user w której są między innymi pola login i haslo.
Nastepnie utworzyłem formatke z polami textwymi login i haslo. Musze teraz dodać odpowiedni kod który sprawdza z bazy czy istnieje urzytkownik podany w txtLogin i jezeli istnieje to czy haslo jest poprawne.
W gre wchodzi adodc lub data environment.
Byłbym bardzo wdzieczny za pomoc.
GG#602311

29-03-2005 16:06
Pokaż profil PAWKO  Wyślij email do PAWKO   
PAWKO




Typ: neutral
Postów: 42
Zarejestrowany: Mar 2003

Z logowanie juz sobie poradzilem za pomoca adodc. Zrobilem to tak:
Private Sub cmdOK_Click()
Dim login As String
Dim haslo As String

Adodc1.RecordSource = "SELECT * FROM user WHERE login = " & "'" & txtLogin.Text & "'"
Adodc1.Refresh
login = Adodc1.Recordset.RecordCount

If login = 0 Then
Dim x As VbMsgBoxResult
x = MsgBox("Urzytkownik " + txtLogin + " nie istnieje", vbCritical + vbRetryCancel, "Login Error"
   
    If x = vbCancel Then
    End
    End If
   
Else
Adodc1.RecordSource = "SELECT * FROM user WHERE login = " & "'" & txtLogin.Text & "' AND haslo= " & "'" & txtHaslo & "'"
Adodc1.Refresh
haslo = Adodc1.Recordset.RecordCount

    If haslo = 0 Then
        Dim y As VbMsgBoxResult
        y = MsgBox("Haslo nie poprawne", vbCritical + vbRetryCancel, "Login Error"
   
            If y = vbCancel Then
            End
            End If
    Else
    Form1.Show
    End If
End If
End Sub

Zastanawia mnie jeszcze jak to wykonac, ale z data environment. Jak ktos wie bardzo bym poprosil o pomoc.

Teraz mam jeszcze drugi problem, mianowicie w tabeli ksiazki mam pola tytol i opis.
w data environment dodalem tabelke ksiazki oraz na formatce umiescilem datalist w ktorej sa wylistowane tytoly. Chcialbym aby po kliknieciu na dany tytol w kontrolce textbox lub innej wyswietlal sie opis ksiazki.

29-03-2005 18:27
Pokaż profil PAWKO  Wyślij email do PAWKO   
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1