Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //Connect to a database
- Dim db As New PostgreSQLDatabase
- db.Host = "127.0.0.1"
- db.Port = 5432
- db.DatabaseName = "TestDB"
- db.UserName = "XojoUser"
- db.Password = "secret"
- //Is the database connected?
- If db.Connect = True Then
- MsgBox "The database is connected"
- Else
- MsgBox "There is an error with the database: " + db.ErrorMessage
- End If
Add Comment
Please, Sign In to add comment