我现在用下面的连接方式.但有个问题,就是客户端如果只能PING通服务器还不行,还一定要通过 \\服务器计算机名(IP) 访问得了或在网上邻居打开服务器才行.
有没有什么办法可以只要客户端能PING通服务器就可以? (不用 \\服务器计算机名(IP) 访问得了或在网上邻居打开服务器 这一步). 谢谢.GlServerName:=trim(edit1.Text);
GlServerDBName:=trim(Edit3.Text);
GlServerUserName:=trim(Edit4.Text);
GlServerUserPass:=trim(edit2.Text);
if Trim(GlServerUserPass)='' then
myTmpStr:='Provider=SQLOLEDB.1;'+
'Persist Security Info=False;'+
'User ID='+GlServerUserName+';'+
'Initial Catalog='+GlServerDBName+';'+
'Data Source='+GlServerName+';'+
'Connect Timeout=1000;Use Procedure for Prepare=1;'+
'Auto Translate=True;Packet Size=4096;' else
myTmpStr:='Provider=SQLOLEDB.1;'+
'Password='+GlServerUserPass+';'+
'Persist Security Info=False;'+
'User ID='+GlServerUserName+';'+
'Initial Catalog='+GlServerDBName+';'+
'Data Source='+GlServerName+';'+
'Connect Timeout=1000;Use Procedure for Prepare=1;'+
'Auto Translate=True;Packet Size=4096;'; try
begin
if ADOConnection1.connected=true then ADOConnection1.Close;
ADOConnection1.ConnectionString:=myTmpStr;
ADOConnection1.Open;
end
except
showmessage('连接失败! ');
end;
有没有什么办法可以只要客户端能PING通服务器就可以? (不用 \\服务器计算机名(IP) 访问得了或在网上邻居打开服务器 这一步). 谢谢.GlServerName:=trim(edit1.Text);
GlServerDBName:=trim(Edit3.Text);
GlServerUserName:=trim(Edit4.Text);
GlServerUserPass:=trim(edit2.Text);
if Trim(GlServerUserPass)='' then
myTmpStr:='Provider=SQLOLEDB.1;'+
'Persist Security Info=False;'+
'User ID='+GlServerUserName+';'+
'Initial Catalog='+GlServerDBName+';'+
'Data Source='+GlServerName+';'+
'Connect Timeout=1000;Use Procedure for Prepare=1;'+
'Auto Translate=True;Packet Size=4096;' else
myTmpStr:='Provider=SQLOLEDB.1;'+
'Password='+GlServerUserPass+';'+
'Persist Security Info=False;'+
'User ID='+GlServerUserName+';'+
'Initial Catalog='+GlServerDBName+';'+
'Data Source='+GlServerName+';'+
'Connect Timeout=1000;Use Procedure for Prepare=1;'+
'Auto Translate=True;Packet Size=4096;'; try
begin
if ADOConnection1.connected=true then ADOConnection1.Close;
ADOConnection1.ConnectionString:=myTmpStr;
ADOConnection1.Open;
end
except
showmessage('连接失败! ');
end;
如果不安装客户端,则可以看看你的注册表中
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Client\ConnectTo
这项中的设置是什么样的.
正确的是应该有个名称:可以是IP地址:192.168.122.99,值:DBMSSOCN,192.168.122.99,1433
端口默认是1433.如果这样还不行,你找找你们网管吧.
樓主可以試試
另外,为什么在有的电脑上不打补丁,却能连接上呢?(同一个操作系统)
up