Hallo,
ich benötige Hilfe bei der Login Funktion meines Programms.
Ich zeige euch mal den Quellcode des Buttons, sowie die SQL-Abfrage.
Login-Button:
SQL-Abfrage:
SELECT COUNT(*) AS Result, [USER] AS UserInput, [PASSWORD] AS PassInput
FROM USERS
GROUP BY [USER], [PASSWORD]
HAVING (COUNT(*) = 1) AND ([USER] = ?) AND ([PASSWORD] = ?)
Meine Frage ist nun, wie ich es hinbekomme, dass Admins zu einer anderen Form gelangen als User oder Gäste etc.
MfG Weyrn[/user]
ich benötige Hilfe bei der Login Funktion meines Programms.
Ich zeige euch mal den Quellcode des Buttons, sowie die SQL-Abfrage.
Login-Button:
Quellcode
- Dim login = USERSTableAdapter.UserPasswordString(USERTextBox.Text, PASSWORDTextBox.Text)
- ' If-Abfrage Username & Passwort '
- If login Is Nothing Then
- MsgBox("Falsches Passwort oder Username!", MsgBoxStyle.Critical, Title:="Login fehlgeschlagen")
- Else
- MsgBox("Willkommen, " + USERTextBox.Text + "!", MsgBoxStyle.Information, Title:="Login erfolgreich")
- Menü.Show()
- Me.Hide()
- End If
- End Sub
SQL-Abfrage:
SELECT COUNT(*) AS Result, [USER] AS UserInput, [PASSWORD] AS PassInput
FROM USERS
GROUP BY [USER], [PASSWORD]
HAVING (COUNT(*) = 1) AND ([USER] = ?) AND ([PASSWORD] = ?)
Meine Frage ist nun, wie ich es hinbekomme, dass Admins zu einer anderen Form gelangen als User oder Gäste etc.
MfG Weyrn[/user]