Kommentare zu einem VB Skript

  • VBScript

    Kommentare zu einem VB Skript

    Wäre nett, wenn ihr mal drüberschauen könntent und mir sagen könntet ob das mit den Kommentaren alles so übereinstimmt.
    Das VB Skript sollte so gestaltet sein, dass zum jeder Befehlszeile ein erklärender Kommentar gehört!!


    Quellcode

    1. 'Verbindungsparameter für den Datenbankzugriff auf den MySQL Server
    2. 'Verwendet wird der ODBC 3.51 Treiber; Ip des Servers: 10.17.171.200, Benutzername: root, Passwort: Kein Passwort, Datenbank: Benutzerverwaltung
    3. strConnection="driver=MySQL ODBC 3.51 Driver;server=localhost;uid=root;pwd=;database=Benutzerverwaltung;option=NUM"
    5. bn=Inputbox ("Geben Sie den Benutzernamen ein!") 'Variable für das Eingabefeld des Benutzernamens
    6. pw=Inputbox ("Geben Sie das Passwort ein!") 'Variable für das Eingabefeld des Passworts
    7. ausgabe="Anmeldung fehlgeschlagen" 'Variable für die Ausgabe bei fehlgeschlagener Anmeldung
    9. sql="SELECT * FROM benutzer;" 'Die MySQL Abfrage (* = Alle Spalten werden ausgegeben)
    11. set adoConnection=CreateObject("ADODB.Connection") ' Die ADODB-Verbindung wird hergestellt
    12. adoConnection.open strConnection ' Die Verbindung wird hergestellt
    13. Set rs=adoConnection.execute (sql)
    15. set Benutzername = rs.fields.item("Benutzername") '
    16. set Passwort = rs.fields.item("Passwort") '
    17. set Name = rs.fields.item("Nachname") '
    18. set Vorname = rs.fields.item("Vorname") '
    20. Do While Not rs.eof ' Durchlaufen des Recordsets
    21. IF bn=Benutzername AND pw=Passwort THEN '
    22. ausgabe= "Herzlich willkommen " & Vorname & " " & Name 'Die Variable "ausgabe" wird bei gefundenem Benutzer und Passwort geändert
    23. END IF 'Die IF-Schleife wird beendet
    24. rs.moveNext 'Springt zum nächsten Datensatz
    25. Loop 'Zum Beenden der While-Schleife
    27. MsgBox ausgabe 'Ausgabe in einer Nachrichtenbox
    29. rs.close ' Verbindung zur Datenbank wird getrennt


    Wäre super, wenn ihr mir die restlichen Zeilen noch ergänzen könntet oder falls ihr Verbesserungsvorschläge habt diese ergänzen könntet..

    Und noch eine Frage:
    Was beudetet: option="NUM" ??
    Dass die Datensätze in der Datenbank durchnumeriert sind?

    Gruß Marcel

Facebook
Telefonspende