Access-Datenbank mit Passwort erstellen/lesen

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von PCUser.

    Access-Datenbank mit Passwort erstellen/lesen

    Hi,

    Arbeite gerade an einem lokalen Loginsystem für mein Programm. Ich schreibe die Rechte die der Benutzer hat in die Datenbank. Wenn die Datenbank erstellt wird, soll sie jedoch verschlüsselt werden, damit der User nicht irgendwelche veränderungen vornehmen kann. Den Code habe ich damals glaube ich von VB-Paradise!
    Hier ist der Ausschnitt der die Datenbank erstellt, und der Provider:

    VB.NET-Quellcode

    1. Public Sub Datenbank_und_Tabelle_erstellen()
    3. Dim catalog As Object
    4. catalog = CreateObject("ADOX.Catalog")
    5. catalog.create( _
    6. "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
    7. sDatabasePath)
    10. Dim conn As OleDbConnection = New OleDbConnection( _
    11. "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" _
    12. & sDatabasePath)
    13. conn.Open()
    15. Dim sql As String = "CREATE TABLE " & sTableName & "(" & _
    16. "ID COUNTER NOT NULL CONSTRAINT PK_ID_no PRIMARY KEY, " & _
    17. "UserName Varchar(44) NOT NULL, " & _
    18. "Passwort Varchar(44) NOT NULL, " & _
    19. "Vollzugriff Varchar(44) NOT NULL, " & _
    20. "Ändern Varchar(44) NOT NULL, " & _
    21. "Löschen Varchar(44) NOT NULL, " & _
    22. "Schreiben Varchar(44) NOT NULL" & _
    23. ")"
    25. Dim cmd As OleDbCommand = New OleDbCommand(sql, conn)
    26. cmd.ExecuteNonQuery()
    27. conn.Close()
    28. End Sub
    30. Public Sub Provider()
    31. con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & sDatabasePath & ";"
    32. cmd.Connection = con
    33. End Sub


    Hoffe ihr könnt mir helfen!

    Grüße

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „PCUser“ ()

Facebook
Telefonspende