Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблема с конектом к MySQL [D6, MySQL]

Falcon(TFsoft) © (2006-02-23 23:35:00)
Собственно вопрос такой. Приложению необходимо работать с 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
Надеюсь на помошь. С ув. Алексей.

Falcon(TFSoft) (2006-02-24 01:12:00) [1]
ок. тема закрыта. спасибо. я думал это изьян...

Плохиш (2006-02-24 00:13:00) [2]

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

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

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »