If anyone knows VB heres my code to test the connection:
Private Sub btn_test_Click()
'Create new variables
Dim str_db_path As String 'Holds database path
Dim str_db_username As String 'Holds database username
Dim str_db_password As String 'Holds database password
Dim str_connection As String 'Holds connection string for DB
Dim rs As Object 'Recordset
Dim ds As Object 'RDS.DataSpace
Dim df As Object 'RDSServer.DataFactory
Dim strCn As Variant 'Connection string
Dim strSQL As Variant 'SQL string
'Grab values from form
str_db_path = txt_db_path.Text
str_db_username = txt_db_username.Text
str_db_password = txt_db_password.Text
'Replace harmful quotations
str_db_path = Replace(str_db_path, "'", "''")
str_db_username = Replace(str_db_username, "'", "''")
str_db_password = Replace(str_db_password, "'", "''")
Set ds = CreateObject("RDS.DataSpace")
Set df = ds.CreateObject("RDSServer.DataFactory", str_db_path)
strCn = "dsn=pubs;uid='" & str_db_username & "';pwd='" & str_db_password & "'"
strSQL = "select * from tbl_operators"
Set rs = df.Query(strCn, strSQL)
'Open new recordset
Set rst_common = New ADODB.Recordset
End Sub
Comes up with a handler error.....