如何读写局域网内的另一台电脑上的数据库文件 如何读写局域网内的另一台电脑上的数据库文件 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 .... 哈哈 还UP有分这个不难呀。。比如你用ADO连接SQL SRV 你用.udl文件先连接到你的目的机器...然后ado connection使用该udl文件。。然后 操作就跟本地一样。。100分呀 好多 具体点行吗,我不懂。udl文件 AdoConnection.connectionString不就可以连吗? 关键是另一台电脑数据库的网络功能,如SQLSERVER,用ADO就可以连接了,UDL文件就是记载这种连接信息的。研究下ADOEXPRESS面板就OK了。 我这几天在做这样的系统,,ADOConnection+SQL Servers 20000几天前找的文章://连接SQL Serverfunction TFrmlog.GetConnectionString: Boolean;var SYSINI: TINIFile; ServerName, UserName, Password, InitDB: string;begin Result := False; ClientDM.ADOConnection.Connected := False; if ClientDM.ADOConnection.Connected = False then begin try SYSINI := TIniFile.Create(getcurrentdir + '\INI\server.ini'); ServerName := SYSINI.ReadString('Database', 'ServerName', '127.0.0.1'); UserName := SYSINI.ReadString('Database', 'UserName', 'sa'); InitDB := SYSINI.ReadString('Database', 'InitDB', 'Room'); Password := SYSINI.ReadString('Database', 'Password', ''); finally SYSINI.Free; end; end; try ClientDM.ADOConnection.ConnectionString := 'Provider=SQLOLEDB;Password=' + Password + ';Persist Security Info=True;User ID=' + UserName + ';Initial Catalog=' + InitDB + ';Data Source=' + ServerName; ClientDM.ADOConnection.Connected := True; Result := True; except Result := False; end;end;INI配置文件夹:[Database]ServerName=192.168.1.133 //局域网内的另一台电脑的IPInitDB=Room // 数据库UserName=sa //登录数据库的用户名Password=8251043 //密码希望对你有帮助呀 用TClientDataSet 和TDatasetProvider,通赤MIDAS.DLL通信 新建一个文本文件,重命名, 扩展名为.udl, 然后双击, 在弹出的对话框中连接你远程的数据库文件, 连接完毕,保存你的udl文件到你的应用程序目录中, 在程序中就可以使用些连接了 with Adoqury do begin ConnectionString = 'FILE NAME=MyUdl.udl'//这里可以是绝对路径也可以是相对路径 Active = True .............. ............ end; 就ok了! 呵呵 udl 比较简单 但是没那么安全 如果你对安全性要求不高的话 没什么的。。 用ado控件可以直接连到 局域网其他机器的 ms sql server oracle等数据库也可以用三层结构 也就是delphi的midas框架 armyguo(山坡羊) IFindit(寻找其中的乐趣) 说的没错 duxin(小伍) : ^^ ^http://community.csdn.net/Expert/topic/3220/3220238.xml?temp=.5864069 呵呵,一个初学者常会遇到的问题,建议多看看数据库的书(比如:SQL SERVER),具体的方法,用zxcnmv(--*==流浪==*--) 的方法比较通用。 我感觉连接SQL SERVER好象不用那么费劲吧,楼主说的是不是单机版数据库呀,如ACCESS,FOXBASE之类的。 用Udl,新建记事本----改扩展名为udl新建一个文本文件,重命名, 扩展名为.udl, 然后双击, 在弹出的对话框中连接你远程的数据库文件, 连接完毕,保存你的udl文件到你的应用程序目录中, 在程序中就可以使用些连接了 with Adoqury do begin ConnectionString = 'FILE NAME=MyUdl.udl'//这里可以是绝对路径也可以是相对路径 Active = True .............. ............ end; 就ok了! 用UDL文件连接时,测试始终要出错。 在delphi中操作SQLSERVER数据恢复出错 advstringgrid中SaveColSizes如何使用 TADODataSet Filter 多条件过滤问题 要做一个B/S上用的activeX控件,能弹出模态窗口,格式是DLL。 fastreport 打印预览疑问题! 请问在窗口中如何拖动一个控件? 求XP风格的控件 Treeview控件问题 求助!!!哪位大侠用过formula one 中的ttf16.ocx插件实现甘特图,网络图。不胜感激。 如何单步调试ocx控件 用delphi写过插件的同志们看过来.100分. DbgridEh
然后ado connection使用该udl文件。。
然后 操作就跟本地一样。。100分呀 好多
如SQLSERVER,
用ADO就可以连接了,UDL文件就是记载这种连接信息的。
研究下ADOEXPRESS面板就OK了。
几天前找的文章:
//连接SQL Server
function TFrmlog.GetConnectionString: Boolean;
var
SYSINI: TINIFile;
ServerName, UserName, Password, InitDB: string;
begin
Result := False;
ClientDM.ADOConnection.Connected := False;
if ClientDM.ADOConnection.Connected = False then begin
try
SYSINI := TIniFile.Create(getcurrentdir + '\INI\server.ini');
ServerName := SYSINI.ReadString('Database', 'ServerName', '127.0.0.1');
UserName := SYSINI.ReadString('Database', 'UserName', 'sa');
InitDB := SYSINI.ReadString('Database', 'InitDB', 'Room');
Password := SYSINI.ReadString('Database', 'Password', '');
finally
SYSINI.Free;
end;
end; try
ClientDM.ADOConnection.ConnectionString := 'Provider=SQLOLEDB;Password='
+ Password + ';Persist Security Info=True;User ID='
+ UserName + ';Initial Catalog=' + InitDB
+ ';Data Source=' + ServerName;
ClientDM.ADOConnection.Connected := True;
Result := True;
except
Result := False;
end;
end;INI配置文件夹:
[Database]
ServerName=192.168.1.133 //局域网内的另一台电脑的IP
InitDB=Room // 数据库
UserName=sa //登录数据库的用户名
Password=8251043 //密码希望对你有帮助呀
begin
ConnectionString = 'FILE NAME=MyUdl.udl'//这里可以是绝对路径也可以是相对路径
Active = True
..............
............ end;
就ok了!
说的没错
^
http://community.csdn.net/Expert/topic/3220/3220238.xml?temp=.5864069
新建一个文本文件,重命名, 扩展名为.udl, 然后双击, 在弹出的对话框中连接你远程的数据库文件, 连接完毕,保存你的udl文件到你的应用程序目录中, 在程序中就可以使用些连接了 with Adoqury do
begin
ConnectionString = 'FILE NAME=MyUdl.udl'//这里可以是绝对路径也可以是相对路径
Active = True
..............
............ end;
就ok了!