您所在位置：主题：如何加上错误判断语句
xuexidelphi
[专家分：0] 发布于 2010-01-14 10:33:00
朋友们你们好，我是一位DELPHI的初学者，我写了一段代码，主要是想连接数据库成功时提示成功，连接不成功时提示不成功，可是连接成功的时候能正常提示，可是我要录错用户名或密码的时候就提示系统报的错而不是我自己的SHOWMESSAGE提示信息。
begin
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=''edit1.Text'';Persist Security Info=True;User ID=''edit2.Text'';Initial Catalog=demo;Data Source=DAVIDZHOUYU';
adoconnection1.Open(edit2.Text,edit1.Text);
if adoconnection1.Connected=true then
showmessage('数据库连接成功')
else
showmessage('数据库连接失败');
end;
begin
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=''edit1.Text'';Persist Security Info=True;User ID=''edit2.Text'';Initial Catalog=demo;Data Source=DAVIDZHOUYU';
adoconnection1.Open(edit2.Text,edit1.Text);
if adoconnection1.Connected=true then
showmessage('数据库连接成功')
else
showmessage('数据库连接失败');
end;
