下列代码无法链接局域网内ip为192.168.0.100电脑的SQL数据库,只能连接本机上的数据库(Data Source=计算机名)!但是用adodc1可以链接局域网IP为192.168.0.100的数据库
'连接数据库
Private Sub Connect()
On Error Resume Next
conn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=bank;Data Source=192.168.0.100;uid=sa;pwd=123;"If IsConnect = True Then
Exit Sub
End If
Set cnn = New ADODB.Connection
cnn.ConnectionString = conn
'cnn.Open conn
cnn.Open
If cnn.State = adStateClosed Then
MsgBox "连接数据库出错,请重新配置数据库连接!", vbCritical + vbOKOnly, "系统提示"
m_isdb = False
Form20.Show
Exit Sub
End Ifm_isdb = True
IsConnect = True
End Sub
解决方案 »
- VBA 中如何定义Office.CommandBarButton的动态数组,并定义事件?
- 有没有完美的屏闭XP里面的Ctrl+Alt+Del键的控件、代码、或Dll???
- vb数据库中find能多条件查吗?
- 简单的问题!!!!!!!!!!!!!
- 如何正确declare 一个c dll 里面得函数?
- 各位老大,有个问题(关于信使服务的)
- 菜鸟问题~~~~ WEB上可不可以嵌入treeview控件啊~~
- 如何把年、月、日的值组成日期/时间格式!(急要)
- 今晚考试的小题,难住俺了
- 请问SQL命令中除了Insert以外,还有别的添加记录的命令吗?我有一近百个字段的表间要复制记录,两个表结构完全相同,除了逐个字段地Inser
- VB中调用API函数的问题
- 用GetWindow枚举子窗口句柄的问题
此问题属于 域名解析不对~~
修改一下hosts文件即可避免此类事情。具体修改方法可以参照网上的说明。注意备份!
conn = "Provider=SQLOLEDB;Initial Catalog=bank;Data Source=192.168.0.100;User Id=sa;Password=123;"
我觉得就应该是这个问题!刚才忘了看连接字符串了。
用了SSPI还写什么User……
直接转到系统权限验证去了……
还是不行
楼主这个问题应该去SQL版本问
我那天也遇到该问题,2000大概原因如下:
1、是否允许客户端连接、
2、是否映射1433端口。
2005的话,去SQL版本问,有个很详细的步骤。