Jag håller på med ett program som ska kunna läsa en databas från internet, men det närmaste jag kommit är koden här nedanför. När jag kör programmet så står det "Det gick inte att skapa organisationsobjektet" sedan markerar den raden "RS.Open "Select * from Users", Conn"

<code>
Dim Conn As ADODB.Connection
Dim RS As ADODB.Recordset
Dim Server As String
Dim Source As String

Server = 'mitt ip-nummer
Source = 'min databas
Set Conn = New ADODB.Connection

Conn.ConnectionString = "Provider=MS Remote;" & _
"Remote Server=" & Server & ";" & _
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Source & ";" & _
"admin"

Conn.Open

Set RS = New ADODB.Recordset

RS.CursorLocation = adUseClient
RS.Open "Select * from Users", Conn

'Här ska man kunna läsa ur databasen

RS.Close
Set RS = Nothing

Conn.Close

Set Conn = Nothing
</code>

Kan ni se felet om ni inte kan det så skulle jag gärna vilja ha hjälp med ett annat sätt att läsa från en databas på internet.

Tacksam för svar!
MvH
Zorek