- 论坛徽章:
- 0
|
我的是sybase11.92 for windows,主机的名字是ser2000(192.168.0.80),现在编一vb程序连接sybase数据库,但是无法连接,程序提错为“找不到指定的 SQL SERVER." 相关vb代码如下:
Public Function ConnectToDatabase() As Boolean
On Error GoTo ERR_CONN
Set g_Cn = New Connection
'设置服务器名称,数据库名称,登录名(此时假设密码为空)
Dim ServerName As String, DBName As String, UserName As String, strPwd As String
ServerName = "ser2000"
DBName = "test"
UserName = "sa"
strPwd = ""
'连接到数据库
With g_Cn
.CursorLocation = adUseClient
.CommandTimeout = 10
.ConnectionString = " rovider=SQLOLEDB.1 ersist Security Info=True;User ID=" & UserName & ";Initial Catalog=" & DBName & ";Data Source=" & ServerName & ";pwd=" & strPwd
.Open
End With
Err.Raise vbObjectError, , "sdljfaosjfdasjfdojfdojf"
ConnectToDatabase = True
Exit Function
ERR_CONN:
ConnectToDatabase = False
End Function
在图形界面下的server confige中Adaptive Server 的服务名就是ser2000
,为何连不上呢?? |
|