怪问题
wxhfi 2003-10-16 01:57:15 为什么我连数据库(sql7.0)的时候用ip连不上,改为计算机名竟能连上?
代码是:
Dim inifn As String
Dim ini(2) As String
inifn = App.Path & "\" & "Inti.txt"
Open inifn For Input As #1 'Len = Len(Name(0))
Input #1, ini(0), ini(1), ini(2)
gDbServer = ini(0)
gDbName = ini(1)
gUserName = "sa"
gUserPwd = ""
'bDb = gDbName
Close #1
'Set conn = New ADODB.Connection
conn.CursorLocation = adUseClient
conn.ConnectionString = "Provider=SQLOLEDB.1;Password=" & gUserPwd & ";Persist Security Info=True;User ID=" & gUserName & ";Initial Catalog=" & gDbName & ";Data Source=" & gDbServer
conn.Open
Inti.txt文件的内容为:
177.19.6.1(ip地址)
dataname(数据库名)
这样竟连不上数据库,后来把ip改为计算机名竟可以了,到底为什么呀?
请赐教,谢谢