我用delphi做了一个基于SQL Server管理的数据库应用程序,建立数据库时选择的身份验证是“仅windows”,程序中连接数据库用的是本机的服务器名,那么当别人安装我的这个程序时,如何能获得他机器上的服务器名来连接数据库呢,有没有函数直接获取什么的?大家指点一下,谢谢了!
解决方案 »
- 怎么实现主窗口的自动刷新功能
- 如何用DELPHI语言编写实时监测VPN连接
- 利用Delphi的CreateProcess来启用dos程序的问题,如何安全关闭这个dos程序呢?********
- 报表输出的数据同步问题!
- 如何能知道正在运行的程序的硬盘路径?
- 怎样对dbgrid中的数据记录实现具体定位?
- 如何把richedit1的内容格式不变的复制到richedit2里?
- 请问Win2k中“services.exe”进程是干什么用的,为什么我的系统一起动它就占用100%的CPU呀?弄的我其他的大点的程序一运行就死机?
- 请问哪里可以下到关于installsheild 方面的文章?
- 请问如何用delphi在excel里插入一张图片?
- 如何重画ListView的某列(SubItem)?
- 到现在为止,还没有一个DELPHI高手能够帮我解决的?????在线
结贴!!!
SQLServer:Variant;
ServerList:Variant;
i,nServers:integer;
sRetValue:String;
begin
SQLServer := CreateOleObject('SQLDMO.Application');
ServerList:Variant;
ServerList:= SQLServer.ListAvailableSQLServers;
nServers:=ServerList.Count;
for i := 1 to nservers do
ListBox1.Items.Add(ServerList.Item(i));
SQLServer:=NULL;
serverList:=NULL;
end;
Var
SQLServer:Variant;
ServerList:Variant;
i,nServers:integer;
sRetValue:String;
begin
SQLServer := CreateOleObject('SQLDMO.Application');
//ServerList:Variant;
ServerList:= SQLServer.ListAvailableSQLServers;
nServers:=ServerList.Count;
for i := 1 to nservers do
ListBox1.Items.Add(ServerList.Item(i));
SQLServer:=NULL;
serverList:=NULL;
end;