已知另一台计算机的IP地址,怎么编写Delphi程序实现远程操作另一台计算机的数据库。
解决方案 »
- 在DELPHI中用了ScriptControl,如何让VBScript 脚本和DELPHI程序互相发送消息
- serversocket.open和serversocket.active有什么区别?
- 〓〓如何控制不允许向EDIT中输入全角字符?
- 组件事件问题
- 请问如何在程序中改变ACCESS数据库的密码?
- 怎么写:函数的参数可有可无?如:
- 如何在B/S结构中调用多媒体程序呢?
- 21CMM遭封杀!
- 各位大哥帮看一下,好吗???
- 如何让dbcombobox下拉框显示表table1中name字段的全部值?
- delphi 怎么调用sendmessage获取取其它程序窗口listviewj里的数据内容
- 气死我了,XE8的IDHttp的Post返回始终是乱码
创建一个delphi 工程,
拖 一个 Button, ADOConnection, ADOQuery, DBGrid, DataSource
设置好关联。Button 双击事件连接数据库,并显示一个表 Table1 的数据。procedure TForm1.Button1Click(Sender: TObject);
begin
ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;'+
'Persist Security Info=True;'+
'User ID='+用户名+';'+
'Password='+密码+';'+
'Initial Catalog='+数据库名+';'+
'Data Source='+服务器IP+';';
//连接指定的数据库
ADOConnection1.LoginPrompt := False;
ADOConnection1.Connected := True;
ADOQuery1.Connection := ADOConnection1; //连接数据源
with ADOQuery1 do //用ADO组件连接数据表
begin
close;
SQL.Clear;
SQL.Add('Select top 100 * from Table1'); //使用SQL语句查询数据表中的内容
open;
end;
ADOQuery1.Active := True;
DataSource1.DataSet := ADOQuery1;
DBGrid1.DataSource := DataSource1;
end;
这种方案解决直连速度慢,不安全,容易掉线的问题,代码也不需要修改。