Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Login Script mit access datenbank

Mitglied: Bassdriver

Bassdriver (Level 1) - Jetzt verbinden

02.09.2010, aktualisiert 18:16 Uhr, 4679 Aufrufe, 2 Kommentare

Login mit access Datenbank

Hallo zusammen,

ich möchte ein Login Script erstellen, wobei der Username und das Passwort von einer Access Datenbak abgefragt wird.
Derzeit hab ich mit Tutorials schon ein Script gefunden bzw. angepasst.
Leider hab ich das Problem, das immer bei einer Zeile ein fehler erscheint.

Das Script:
01.
        Dim conn As New OleDbConnection 
02.
        Dim myConnectionString As String 
03.
        Dim PW As String 
04.
        Dim Nickname As String 
05.
        PW = txtPasswort.Text.Replace("'", "") 
06.
        Nickname = txtBenutzername.Text.Replace("'", "") 
07.
        myConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:/SCC/scc.mdb" 
08.
        conn.ConnectionString = myConnectionString 
09.
        Try 
10.
            conn.Open() 
11.
        Catch ex As Exception 
12.
            MessageBox.Show(ex.Message) 
13.
        End Try 
14.
        Dim myAdapter As New OleDbDataAdapter 
15.
        Dim sqlquery = "SELECT personalnummer, passwort FROM s_login Where personalnummer='" & Nickname & "' and passwort='" & PW & "'" 
16.
        Dim myCommand As New OleDbCommand 
17.
        myCommand.Connection = conn 
18.
        myCommand.CommandText = sqlquery 
19.
        myAdapter.SelectCommand = myCommand 
20.
        Dim myData As OleDbDataReader 
21.
        myData = myCommand.ExecuteReader() 
22.
 
23.
        If myData.HasRows = 0 Then 
24.
            MsgBox("Die Logindaten wurden Falsch angegeben!", MsgBoxStyle.Information, " Login...!") 
25.
        Else 
26.
 
27.
            myData.Close() 
28.
            conn.Close() 
29.
            Menü.Visible = True 
30.
        End If
Bei der Zeile:

myData = myCommand.ExecuteReader()

Zeigt er mir immer einen Fehler an:

"OleDBExeption wurde nicht behandelt"

Was muss ich da machen?
ich verstehe den einfach Fehler nicht

MFG Bassdriver

[Edit Biber] Code-Formatierung. [/Edit]
Mitglied: Biber
02.09.2010 um 18:22 Uhr
Moin Bassdriver,

auch wenn ich kein ausgesprochener Anhänger der so genannten Copy&Paste-Programmierung bin...
Was spricht denn in deinem Fall dagegen, den Try-Catch-Block, den du bei der Connection verwendest, zweimal an die anderen Stellen zu kopieren, wo definitiv eine Vielzahl von Fehlern auftreten kann?

Oder gibt es eine unternehmensinterne Richtlinie bei euch, die nur einen behandelten Fehler pro Modul erlaubt?

Grüße
Biber
Bitte warten ..
Mitglied: Bassdriver
02.09.2010 um 22:43 Uhr
Hi Biber,

vielen Dank erstmal für die schnelle antwort.

Sorry ich bin ein totaler anfänger bei der Datenbankprogrammierung in VB 2010.

Ich hab jetzt nochein Try-Catch hinzugefügt und der angezeigte Fehler wurde behoben.
Allerdings wenn ich jetzt die Daten und anschließend auf Login klicke, passiert einfach nichts.

Wie kann das sein und was kann ich dort verbessern?

Script aktuell:
01.
        Dim conn As New OleDbConnection 
02.
        Dim myConnectionString As String 
03.
        Dim PW As String 
04.
        Dim Nickname As String 
05.
        PW = txtPasswort.Text.Replace("'", "") 
06.
        Nickname = txtBenutzername.Text.Replace("'", "") 
07.
        myConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:/SCC/scc.mdb" 
08.
        conn.ConnectionString = myConnectionString 
09.
        Try 
10.
            conn.Open() 
11.
        Catch ex As Exception 
12.
            MessageBox.Show(ex.Message) 
13.
        End Try 
14.
        Dim myAdapter As New OleDbDataAdapter 
15.
        Dim sqlquery = "SELECT personalnummer, passwort FROM s_login Where personalnummer='" & Nickname & "' and passwort='" & PW & "'" 
16.
        Dim myCommand As New OleDbCommand 
17.
        myCommand.Connection = conn 
18.
        myCommand.CommandText = sqlquery 
19.
        myAdapter.SelectCommand = myCommand 
20.
        Dim myData As OleDbDataReader 
21.
        Try 
22.
 
23.
        Catch ex As Exception 
24.
            MessageBox.Show(ex.Message) 
25.
            myData = myCommand.ExecuteReader() 
26.
 
27.
            If myData.HasRows = 0 Then 
28.
                MsgBox("Die Logindaten wurden Falsch angegeben!", MsgBoxStyle.Information, " Login...!") 
29.
            Else 
30.
 
31.
                myData.Close() 
32.
                conn.Close() 
33.
                Menü.Visible = True 
34.
            End If 
35.
        End Try
Bitte warten ..
Ähnliche Inhalte
Datenbanken
Login Probleme in mysql Datenbank
gelöst Frage von bigbootykillaDatenbanken2 Kommentare

Hi, ich habe hier eine Datenbank auf einer Ubuntu Kiste. Wenn ich mich versuche mit Code: einzuloggen bekomme ich ...

Windows Server

Login Script verzögert ausführen

Frage von Intruder0001Windows Server6 Kommentare

Hallo gibt es die Möglichkeit das login Script verzögert nach der Anmeldung ca. 10-20sek auszuführen ?? Gerade bei schnellen ...

Windows Server

Pdf per login script

gelöst Frage von ToggleWindows Server4 Kommentare

Hallo zusammen, ich habe hier intern eine Fragestellung bekommen. Wir haben hier im 3 Stunden-Takt Personen, die sich an ...

Datenbanken

Zwei Access Datenbanken zusammenführen

Frage von geocastDatenbanken5 Kommentare

Hallo Zusammen Ich habe hier zwei Accessdatenbanken von einer internen Betriebssoftware. Vom Aufbau her sind sie Identisch, nur eben ...

Neue Wissensbeiträge
Humor (lol)
IoT-Gefahr: Smartes Aquarium leckt!
Information von Lochkartenstanzer vor 14 StundenHumor (lol)3 Kommentare

Moin, Die IoT-Manie hat weitere Opfer gefunden. Ein Casino-Leck durch ein smartes Aquarium: Allerdings haben sie kein Wasser, sondern ...

Router & Routing

Alte Fritzbox 7270 mit VPN und SIP-Telefonie hinter O2 Homebox 6641 als "Modem"

Erfahrungsbericht von the-buccaneer vor 22 StundenRouter & Routing3 Kommentare

Nun war es soweit: Auch O2 hat mich mit VOIP zwangsbeglückt. Heute am Privatanschluss, in 2 Wochen ist das ...

Sicherheit

Ungepatchte Remote Code Execution-Lücke in LG NAS

Information von kgborn vor 1 TagSicherheit

Nutzt wer LG NAS-Einheiten? In den NAS-Einheiten der LG Network Storage-Einheiten gibt es eine sehr unschöne Schwachstelle, die einen ...

Windows Update

Neue Version KB4099950 NIC Einstellungen gehen verloren

Information von sabines vor 1 TagWindows Update2 Kommentare

Es ist eine neue Version des KB4099950 verfügbar, die das Problem mit den verlorenen Netzwerkeinstellungen lösen soll. Das Datum ...

Heiß diskutierte Inhalte
Sicherheit
Verbindliche Zustellung per E-Mail?
Frage von ahussainSicherheit18 Kommentare

Hallo allerseits, ein Kunde von mir nutzt intensiv Fax. Hauptgrund: zusammen mit einer Empfangsbestätigung ist eine verbindliche Zustellung gewährleistet. ...

Sonstige Systeme
Wie Normenkataloge im Unternehmen bereit stellen?
Frage von MuzzepuckelSonstige Systeme14 Kommentare

Hallo Kollegen, ich lese schon lange hier mit, nun mein ersrer Beitrag, bzw. Frage. :-) Wir benötigen für unsere ...

SAN, NAS, DAS
Entscheidung SAN Dell oder HP
Frage von VincorSAN, NAS, DAS13 Kommentare

Hallo, wir wollen uns für unsere Hyper V Umgebung eine neue SAN Anschaffen. Es laufen 30 VM's darunter, DC; ...

Linux Netzwerk
Raspberry Pi 3: WLAN Power save deaktivieren
Frage von nordie92Linux Netzwerk12 Kommentare

Moin moin, mein Raspberry Pi 3 Model B benötigt eine dauerhaft aktive WLAN-Verbindung. Leider bricht die WLAN-Verbindung nach einigen ...