一个sql server 的意外错误啊！！！！帮忙啊，给分（50）

Question

请教了，我用VB连接的SQL SERVER 刚开始的时候没有问题，后来的我用另外打开了一个VB用了ODBC连接了数据一下，现在我的VB不能运行了，必须要把原来的计算机名换为IP地址才可以连接数据库。这是为什么啊？？？？
Set myconn = New ADODB.Connection
myconn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=data_base;Data Source=IP"
myconn.Open
Set myrecord = New ADODB.Recordset
myrecord.Open "admin", myconn, adOpenDynamic, adLockOptimistic
这是我的连接方法