delphi 7 连接mysql 提示internalconnection:dll/shared library nam
我用的无驱动连接的两个dll,libmysql.dll和dbxopenmysql50.dll
with simpledataset1.Connection do
begin
try
Close;
GetDriverFunc := 'getSQLDriverMYSQL50';
LibraryName := 'dbxopenmysql50.dll';
VendorLib := 'LIBMYSQL.dll';
DriverName:= 'dbxmysql';
Params.Values['drivername']:= 'MySQL';
Params.Values['port'] := '3306';
Params.Values['hostname'] := '127.0.0.1';
Params.Values['database'] := 'root';
Params.Values['user_name'] :='root';
Params.Values['password'] := '123';
form1.SimpleDataSet1.Active:=false;
form1.SimpleDataSet1.DataSet.CommandText:=' select * from user where username=:username';
form1.SimpleDataSet1.DataSet.ParamByName('username').Asstring:=username;
form1.SimpleDataSet1.Active:=true;
form1.SimpleDataSet1.Edit;
password:=form1.SimpleDataSet1.FieldByName('password').Asstring;
except on E: Exception do
raise Exception.Create('数据库连接错误:'+E.Message);
end;
end;
错误提示入题