Здравствуйте! Только-только начал работать с MYSQL Помогите правильно Подключится к удаленному mysql серверу через DELPHI 7 Добавление новых пользователей в MySQL (По моему я не правильно создал или настроил пользователя в MYSQL.) 1) Установлена xampp-win32-1-7-4-vc6-installer 2) Apache 2.2.17 3) MySQL 5.5.8 (Community Server) 4) Выполнил запрос UPDATE mysql.USER SET Password = OLD_PASSWORD('password') WHERE Host = '%' AND USER = 'myuser'; список таблицы mysql/user (не смог поставить снимок экрана, ...)
| Код | USER / HOST / PASSWORD root / localhost / *1667((30 simvolov))bad0f0 root / 127.0.0.1 / / localhost / pma / localhost / *247(30 simvolov)C9D1E19
user / % /*247(30 simvolov)C9D1E19 myuser / % / 5d2e19393cc5ef67 (пароль по старому)
|
| Код | //************************** 1-метод procedure TForm1.SpeedButton4Click(Sender: TObject); VAR ip,DBName,psw,usr:String; begin ip:=Edit3.Text; psw:=Edit4.Text; usr:=Edit5.Text; DBName:='usr_activation'; IF SQLConnection1.Connected=False then begin SQLConnection1.Params.Text:=''; SQLConnection1.ConnectionName:='MySQLConnection'; with SQLConnection1.Params do begin Strings[1]:='HostName='+ip; Strings[2]:='Database='+DBName; Strings[3]:='User_Name='+usr; Strings[4]:='Password='+psw; end; ShowMessage(SQLConnection1.Params.GetText); SQLConnection1.Connected:=True; SQLQuery1.Close; SQLQuery1.SQL.Text:='SELECT * FROM `accccccct` LIMIT 0 , 30'; SQLQuery1.Open; end; end;
|
| Код | //************************** 2-метод procedure TForm1.SpeedButton5Click(Sender: TObject); VAR ip,DBName,psw,usr:String; begin
ip:=Edit3.Text psw:=Edit4.Text; usr:=Edit5.Text; DBName:='usr_activation'; IF ADOC_activation.Connected=False then begin ADOC_activation.ConnectionString:=''; ADOC_activation.ConnectionString:='Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="Driver=MySQL ODBC 5.1 Driver;SERVER='+ip+';UID='+usr+';PASSWORD='+psw+';DATABASE='+DBName+';PORT=3306"'; ShowMessage(ADOC_activation.ConnectionString); ADOC_activation.Connected:=true; ADOQ_a.Close; ADOQ_a.SQL.Text:='SELECT * FROM ` accccccct ` LIMIT 0 , 30'; ADOQ_a.Open; end; end;
|
на 2 типи подключения получается подключится только через Root и только на локальном компе (на удалённом никак немогу) |