关于数据库的问题 如何弄才能有ADOCONNECTION的连接向导 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如何弄才能有ADOCONNECTION的连接向导 object inspector里的adoconnection向导. 这样做,假设Edit1是数据库服务名,Edit2是数据库名,Edit3是用户名,Edit4是用户密码,这样写代码:begin try begin with ADOConnection1 do begin Connected := False; ConnectionString := 'Initial Catalog=' + Edit2.Text + ';'; ConnectionString := ConnectionString + 'Data Source='; ConnectionString := ConnectionString + Edit1.Text + ';'; ConnectionString := ConnectionString + 'uid='; ConnectionString := ConnectionString + Edit3.Text + ';'; ConnectionString := ConnectionString + 'password='; ConnectionString := ConnectionString + Edit4.Text; ConnectionTimeOut := 30; LoginPrompt := False; KeepConnection := False; Connected := True; end; except on e: Exception do begin ShowMessage('连接错误'); Exit; end; end;按错了,这是后半段,你可以利用ConnectionString来实现动态问题 Merry Christmas 如何用Delphi打开pdf文件? DCOM 编程问题“权限拒绝” 帮我看看,,这个问题(新手) 让statictext中的内容换行怎么设置? 一个菜鸟的难题 我学delphi已经好一段时间了,但水平不能说高手也不是初学者,请教各位高手,如何提高delphi的编程水平呢,需要读那些书籍呢? 一个函数调用如何转换成pb使用啊。 怎麽不能运行? 紧急求教:如何释放QuickReport占用的内存 请大家进来讨论一下DM(Data Module)...... 如何把一个整型转换成ascii的字符 char
begin
try
begin
with ADOConnection1 do begin
Connected := False;
ConnectionString := 'Initial Catalog=' + Edit2.Text + ';';
ConnectionString := ConnectionString + 'Data Source=';
ConnectionString := ConnectionString + Edit1.Text + ';';
ConnectionString := ConnectionString + 'uid=';
ConnectionString := ConnectionString + Edit3.Text + ';';
ConnectionString := ConnectionString + 'password=';
ConnectionString := ConnectionString + Edit4.Text;
ConnectionTimeOut := 30;
LoginPrompt := False;
KeepConnection := False;
Connected := True;
end;
except
on e: Exception do begin
Exit;
end;
end;
按错了,这是后半段,你可以利用ConnectionString来实现动态问题