标题:????delphi 代码de 意思?
取消只看楼主
hyfcn
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-11-10
 问题点数:0 回复次数:1 
????delphi 代码de 意思?
请各位老师、前辈帮我。 感谢回复者!
请各位老师、前辈帮我解释下这段代码。
begin
      if application.messagebox('确定要恢复数据库吗?)','提示信息', MB_OKCANCEL+MB_ICONINFORMATION) <> IDCANCEL then
      begin
          try
              ADOQ_check.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=master';
              with ADOQ_check do
              begin
                  close;
                  sql.Clear;
                  sql.Add('select name from sysdatabases where name=:sname');
                  parameters.ParamByName('sname').value:=trim(CB_name.Text);
                  open;
              end;
          except
              showmessage('连接数据库失败,'+chr(13)+chr(13)+'请核实是否已正确安装 MS SQL Server7.0!');
              exit;
          end;


提供我学习的地址也行

[[it] 本帖最后由 hyfcn 于 2008-11-10 10:05 编辑 [/it]]
搜索更多相关主题的帖子: delphi 代码 
2008-11-10 09:53
hyfcn
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-11-10
得分:0 
谢谢 二楼
2008-11-10 14:10



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-243321-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.376317 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved