谁有局域网连接数据库的代码？

Question

要求：用sql数据库，但主机不运行sql server,
能不能不用odbc,请教连接的方法：
最好能够给出代码!!thank you

Answer 1

应该可以使用odbc建立文件dsn，只要主机上有filedsn文件就可以了

Answer 2

使用OLEDB方式连接数据库其他方法和本机连数据库没有任何区别

Answer 3

dim gConOraDataBase as New ADODB.Connection
dim StrConn as string Public Function FG_OraDatabaseConnect() As Boolean
   strconn="data source=服务器ip;user id=数据库登陆明;password=密码;initial catalog=数据库明"
  If gConOraDataBase.State = adStateOpen Then gConOraDataBase.Close
    With gConOraDataBase
         .CursorLocation = adUseClient
         .Open lstrConnect
    End With
    FG_OraDatabaseConnect = True
    Exit Function
end function

Answer 4

Dim rs As New ADODB.Recordset
Dim cn As New ADODB.Connection
cn.ConnectionString = "driver={sql server};server=jrserver(数据库服务器名);uid=sa;password='';database=tempdb"
cn.Open
rs.Open "select * from sysmembers", cn, adOpenStatic, adLockOptimistic
MsgBox rs.RecordCount应该是客户机不运行sql server吧