小弟目前在学习使用DbExpress开发数据库程序,目前有一问题想请教:如何通过一段代码来测试指定数据库连接是否正常呢?数据库服务器是在外网上的,地址为61.132.XXX.XXX或者为WWW.ABC.COM这类地址上的。谢谢。分不够可提,可再加分。
解决方案 »
- 如何获取当前窗口的所有输入框内容
- 求高手解决Delphi7 DBComboBox使用問题
- 如何获取数据库表中字段为"是否"的问题
- 在线等,三方控件JvPlugin怎么安装呢,
- bmp图像旋转的速度问题
- 如何在delphi7中安装jpeg image component ver 1.0
- 关于hextobin函数的问题请教(急,在线等待)
- 请问我照书编写了一个两台机器tcp聊天工具,其中有问题请教!谢谢!
- 导出数据到EXCEL表格中后,但需要设置选择范围的四边边框,如何实现呢?
- 急急,都问两次了,众大侠救兄弟一救!!?(关于bmp处理)
- 给分!
- 用ole 显示WORD文档,说是“interface not supported”。
ADOConnection1.ConnectionString:='......';
ADOConnection1.Open;
showmessage('ok');
except
showmessage('error');
end;
SQLConnection1.params.Text:='DriverName=MSSQL'+#13+'HostName='+edit1.Text+#13+'DataBase=master'+#13+'User_Name='+edit2.Text+#13+'Password='+edit3.Text+#13+'BlobSize=-1'+#13+'ErrorResourceFile='+#13+'LocaleCode=0000'+#13+'MSSQL TransIsolation=ReadCommited'+#13+'OS Authentication=False'+#13;
SQLConnection1.Connected:=True;
MessageBox(Form3.Handle,'恭喜你,服务器连接成功','成功',MB_OK+MB_ICONINFORMATION+MB_SYSTEMMODAL);
SQLConnection1.Connected:=False;
except
MessageBox(Form3.Handle,'对不起,服务器连接失败','失败',MB_OK+MB_ICONSTOP+MB_SYSTEMMODAL);
end;