DELPHI 如何用ADO连接MYSQL数据库

sql设置好用户名跟密码以后比如sa

密码123

打开delphi放一个按钮，然后在控件栏那里选datacontrol，选第一个dbgrid放到form上，选dataaccess里面的第一个datasource，然后选ado——adoconnection放到form上，再选ado——adoquery放到form上。点选adoconnection左边的框体有个connectionstring点"…"：d出来的对话框中点Build，然后选择从下数上来第五个，双击或者下一步，填入用户名跟密码(sa

123)，在“3.选择数据库”那里选择要打开的数据库，选上保存密码，点一下“测试连接”，点OK退出。出来以后继续在左边框体里面找LoginPrompt改成False。到adoquery了，点上它然后在左边框体的

Connection

那里下拉选择ADOConnection1，然后点选datasource，在左边框体找到dataset下拉选择adoquery1，然后再点选dbgrid，在左边框体找到datasource，下拉选择datasource1。双击刚才创建的按钮，假设你要打开的数据表名叫“

销售订单

”，输入

adoquery1.close

adoquery1.sql.clear

adoquery1.sql.add('select

*

from

销售订单

')

adoquery1.open

运行，按按钮如果dbgrid有数据显示表示连接成功了，以上所有功能实现均可通过代码或者手工设置。

这个问题可以考虑两方面的情况：

第一，你的sql2000没有打sp3或以上的补丁；

第二，你的sql没有设置账号登陆，可以在(local)(windows

nt)上右键-属性-安全性-选上(sql

server和windows)-确定

问题应该就可以解决了……

提示数组越界了，建议你将下面的代码

adoquery2.parameters[0].value:=no.text

adoquery2.parameters[1].value:=name.text

adoquery2.parameters[2].value:=sex.text

adoquery2.parameters[3].value:=strtoint(grade.text)

adoquery2.parameters[4].value:=dom.text

adoquery2.parameters[5].value:=phone.text

adoquery2.parameters[6].value:=addr.text

adoquery2.parameters[7].value:=htel.text

改成:

adoquery2.parameters.parambyname('no').value:=no.text

adoquery2.parameters.parambyname('name').value:=name.text

adoquery2.parameters.parambyname('sex').value:=sex.text

adoquery2.parameters.parambyname('class').value:=strtoint(grade.text)

adoquery2.parameters.parambyname('dom').value:=dom.text

adoquery2.parameters.parambyname('tel').value:=addr.text

adoquery2.parameters.parambyname('home').value:=phone.text

adoquery2.parameters.parambyname('htel').value:=htel.text

这样可以避免错误，而且就算出错也可以很快的定位错误的位置

---