Проблема с конектом к MySQL

← →
Falcon(TFsoft) © (2006-02-23 23:35) [0]

Собственно вопрос такой. Приложению необходимо работать с MSql на удалённом сервере. Не хочеться его грузить лишними компонентами, посему решил использовать DirectMysqlObjects.

Нашёл статейку, прочитал попробовал на локальном сервере - всё работает. Попробовал переписать на внешний - ошибка с коннектом. Помогите пожалуйста. Код следующий:

unit u_main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,
uMySqlVio, uMysqlCT, uMysqlClient, uMysqlHelpers, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
MySQLClient: TMySQLClient;
MySQLResult: TMysqlResult;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
MySQLClient := TMySQLClient.Create;
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
MySQLClient.Free;
if MySQLResult <> nil then
MySQLResult.Free;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
ok : Boolean;
i : integer;
str : String;
begin
MySQLClient.Host := "db1.ho.com.ua";
MySQLClient.port := 3306;
MySQLClient.user := "tmp";
MySQLClient.password := "rE6nXHn3jA";
MySQLClient.UnixSocket := "";
MySQLClient.Db := "tmp";
MySQLClient.UseNamedPipe := false;
MySQLClient.UseSSL := false;
MySQLClient.Compress := false;
MySQLClient.TrySockets := false;
if MySQLClient.Connect then
ShowMessage("connected ok!")
else begin
ShowMessage("connected BAD :(");
exit;
end;
end;
end.

Для полноты эксперимента захостился на бесплатном хостинге.Я надеюсь люди здесь с совестью, и забирать данный хостинг некому не нужно, так как зарегестрроваться там не составит труда.Параметры:Login: tmpPassword: rE6nXHn3jAHosting server: s1.ho.com.uaServer Name: tmp.ho.com.uaServer Alias: www.tmp.ho.com.ua
Для управления хостингом используйте страницу:https://ho.com.ua/cgi-bin/hosting.cgi
Для БД сделал пароль тотжебаза: tmp Login: tmpPassword: rE6nXHn3jAhttps://s1.ho.com.ua/phpMyAdmin
Надеюсь на помошь. С ув. Алексей.

← →
Плохиш © (2006-02-24 00:13) [1]

> MySQLClient.Host := "db1.ho.com.ua";
> Для полноты эксперимента захостился на бесплатном хостинге

Можешь забыть, нормальный провайдер не даст тебе доступ к БД из вне, а если даст, то от такого дырявого якобыпровайдера надо бегом бежать.

ок. тема закрыта. спасибо. я думал это изьян...

Проблема с конектом к MySQL Найти похожие ветки