Delphi通过ADO连接MYSQL

procedure TForm1.Button1Click(Sender: TObject);
begin
try
      ADOCon1.ConnectionString:=('DRIVER={MySQL ODBC 3.51 Driver};'+
                     'SERVER=localhost;'+
                     'DATABASE=lionx;'+
                     'USER=root;'+
                     'PASSWORD=109;'+
                     'OPTION=3;');
      ADOCon1.Close;
      ADOCon1.Open;
      except
      application.MessageBox('无法连接数据库服务器.请与管理员联系','提示',MB_ICONINFORMATION);
      end ;
       ADOQ1.Active:=true;
end;

 
阅读更多
想对作者说点什么? 我来说一句

最简洁的delphi连接mysql数据库

2014年01月16日 257KB 下载

没有更多推荐了,返回首页

不良信息举报

Delphi通过ADO连接MYSQL

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭