如何在多层系统或C/S系统中动态的连接SQL SERVER 服务器 如何在多层系统或C/S系统中动态的连接SQL SERVER 服务器!应该如何保留用户输入的信息,并每次启动时自动读取该信息??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以通过读注册表的方法连接Sql Server,保留用户信息可以使用ini文件保存 用文件存贮需要的ADOCOnnection.Connectionstring在需要时读文件取得连接参数Connectionstring即可 你可以将相关信息写进ini文件,然后每次启动时从ini文件中读取(当然用ini或注册表看你的喜好);你需要保存的内容有数据库服务器的计算机名称,数据库名称,用户名及登录口令.然后在每次建立数据库连接之前,加入这些信息即可.我举个例子,我用TDatabase连接数据库(这是我喜欢的方式):const ConnectString = 'DATABASE NAME=SERVER NAME=USER NAME=MYNAMEOPEN MODE=READ/WRITESCHEMA CACHE SIZE=8BLOB EDIT LOGGING=LANGDRIVER=SQLQRYMODE=SQLPASSTHRU MODE=SHARED AUTOCOMMITDATE MODE=0SCHEMA CACHE TIME=-1MAX QUERY TIME=300MAX ROWS=-1BATCH COUNT=200ENABLE SCHEMA CACHE=FALSESCHEMA CACHE DIR=HOST NAME=APPLICATION NAME=NATIONAL LANG NAME=ENABLE BCD=FALSETDS PACKET SIZE=4096BLOBS TO CACHE=64BLOB SIZE=32PASSWORD=';...readfromini(HostName, DatabaseName, UserName, sPass);database1.connected := false;database1.params.clear;database1.params.add(ConnectString);database1.parambyname('SERVER NAME').AsString := HostName;database1.parambyname('DATABASE NAME').AsString := DatabaseName;database1.parambyname('USER NAME').AsString := UserName;database1.parambyname('PASSWORD').AsString := sPass;database1.connected := true; thank please go on ! 首此连接时,如果INI文件不存在,如何让用户配置?我希望能有一个配置界面的例子! 给个email吧,我中午发给你.不过给我加上分先. 好的!谢谢!我的E-MAIL: [email protected] 现在给分,不够再加! BMP图操作??? 请问在delphi 里能将信息显示到 DbgView.exe 里看到吗? yiweijin()和midwinter(仲冬) 接分 我的LISTVIEW不能显示所有要显示的字段 请问blockRead(f,s1,12,nr)是什么作用? ======讨论:数据库备份速度,分不够可以另开贴。呵呵,分呀分呀。====== 如何写代码才能实现这样的功能? 想学delphi7的Indy9组件的使用和运用 在打印或打印预览前如何获取报表页数 如何知道一个进程的句柄? 求RXLIB FOR D6. 报表打印预览问题?
即可
我用TDatabase连接数据库(这是我喜欢的方式):
const
ConnectString = '
DATABASE NAME=
SERVER NAME=
USER NAME=MYNAME
OPEN MODE=READ/WRITE
SCHEMA CACHE SIZE=8
BLOB EDIT LOGGING=
LANGDRIVER=
SQLQRYMODE=
SQLPASSTHRU MODE=SHARED AUTOCOMMIT
DATE MODE=0
SCHEMA CACHE TIME=-1
MAX QUERY TIME=300
MAX ROWS=-1
BATCH COUNT=200
ENABLE SCHEMA CACHE=FALSE
SCHEMA CACHE DIR=
HOST NAME=
APPLICATION NAME=
NATIONAL LANG NAME=
ENABLE BCD=FALSE
TDS PACKET SIZE=4096
BLOBS TO CACHE=64
BLOB SIZE=32
PASSWORD=';
...readfromini(HostName, DatabaseName, UserName, sPass);database1.connected := false;
database1.params.clear;
database1.params.add(ConnectString);
database1.parambyname('SERVER NAME').AsString := HostName;
database1.parambyname('DATABASE NAME').AsString := DatabaseName;
database1.parambyname('USER NAME').AsString := UserName;
database1.parambyname('PASSWORD').AsString := sPass;
database1.connected := true;
现在给分,不够再加!