Schau mal die ODBCConnection und die ODBCQuery Klasse an. Damit kannst du via ODBC auf SQL Server zugreifen und SQL Statements absetzen... Bei diesem Ansatz ist einfach wichtig, dass die ODBC Data Source auf der Maschine konfiguriert ist, wo du den Code laufen lässt.
Beispiel aus der Designer-Hilfe:
The following agent creates a query that retrieves all the rows in the STUDENTS table of the ATDB data source.
Uselsx "*LSXODBC"
Sub Initialize
Dim con As New ODBCConnection
Dim qry As New ODBCQuery
Dim result As New ODBCResultSet
Dim firstName As String
Dim lastName As String
Dim msg As String
Set qry.Connection = con
Set result.Query = qry
con.ConnectTo("ATDB")
qry.SQL = "SELECT * FROM STUDENTS"
result.Execute
msg = "Student names:" & Chr(10)
If result.IsResultSetAvailable Then
Do
result.NextRow
firstName = result.GetValue("FIRSTNAME", _
firstName)
lastName = result.GetValue("LASTNAME", _
lastName)
msg = msg & Chr(10) & firstName & " " & _
lastName
Loop Until result.IsEndOfData
Messagebox msg,, "Student Names"
result.Close(DB_CLOSE)
Else
Messagebox "Cannot get result set for STUDENTS"
Exit Sub
End If
con.Disconnect
End Sub
Gruss
Ray