各位斑主,急啊!! mySQL服务器的问题? 怎样列出局域网内所有的mySQL服务器的名称?选择其中一个服务器,怎样列出该服务器下的所有数据库名称?先谢谢了. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1、不知道2、SHOW DATABASES http://www.csdn.net/develop/Read_Article.asp?id=25532中說到的 三、 SQLBrowseConnect可修改試下 回复人: aiirii(ari-爱的眼睛) 能说得祥细一点吗?最好有源码。 我給你的鏈接, 不就有源碼???將 MsSql的 odbc 連接串改一下, 不就知道?? procedure tform1.FindSQLServer;var SQLServer : Variant; ServerList : Variant; i,nServers : integer;begin Screen.Cursor := crHourGlass; try SQLServer := CreateOleObject('SQLDMO.Application'); ServerList:= SQLServer.ListAvailableSQLServers; nServers:=ServerList.Count; try for i := 1 to nservers do cbDBServer.Items.Add(ServerList.Item(i)); finally SQLServer := Null; ServerList := Null ; end; except end; Screen.Cursor := crDefault ; FindOk := True;end; 在连接组件中设置MySQL驱动,这样不就行了吗? 在你的SqlQuery中执行SHOW DATABASES会返回一个当前的数据库列表.各位、各位,楼主说的好象是MYSQL不是MSSQL 请问用SimpleDataSet控件怎么通过登陆界面进入指定的数据库?谢谢 [求助]delphi调用PB写的dll文件 请提示:窗体显示 点窗体 后隐藏窗体 ,失败? 怎么改? 数据库方面的问题 请求帮助:我想写一个杀死进程的程序 请教打印问题,急 Win2003远程调用COM+的问题?谢谢! 这样的项目报价该是多少才算合理? 老问题(关于资源调用及光标位置) 最短的dvd解码程序(c),我实在是看不懂,高手请指教 Dbgrid条数选择问题?(菜鸟问题) 关于ParamStr和ParamCount的问题
2、SHOW DATABASES
中說到的
三、 SQLBrowseConnect
可修改試下
能说得祥细一点吗?最好有源码。
var
SQLServer : Variant;
ServerList : Variant;
i,nServers : integer;
begin
Screen.Cursor := crHourGlass;
try
SQLServer := CreateOleObject('SQLDMO.Application');
ServerList:= SQLServer.ListAvailableSQLServers;
nServers:=ServerList.Count;
try
for i := 1 to nservers do
cbDBServer.Items.Add(ServerList.Item(i));
finally
SQLServer := Null;
ServerList := Null ;
end;
except
end;
Screen.Cursor := crDefault ;
FindOk := True;
end;
各位、各位,楼主说的好象是MYSQL不是MSSQL