Question

delphi连接远程sql server数据库

服务器和客户机都在同一局域网内，如果通过局域网访问服务器上的数据库，通过输入IP地址来访问远程数据库。用什么控件连接，详细代码

Answer 1

放一个连接组件 ADOConnection 其它组件TADODataSet,TADOQuery等的connection指向ADOConnection就可以了.

function OpenADOConn:boolean;
begin
result:=false;
try
with ADOConnection do
begin
Connected:= false;
Provider:= 'SQLOLEDB.1';
Properties['Data Source'].Value:= HostName; //服务器名或者ip地址
Properties['Initial Catalog'].Value:= DatabaseName; //表名
Properties['User ID'].Value:= UserID; //用户名
Properties['password'].Value:= UserPWD; 密码
LoginPrompt:= false;
try
Connected:= true;

except
begin
Application.MessageBox('无法连结远程数据库！'
,'注意', MB_OK);
exit;
end;

end;
end;
finally

end;
result:=true;
end;