Se connecter avec
S'enregistrer | Connectez-vous

[Delphi] connection à mysql

Dernière réponse : dans Programmation

Bonjour,

Voila j'essaie de me connecté à partir de mon programme en Pascal à une base de donnée en ligne... MySql

J'ai trouvé un tuto pour une bdd en local : http://delphipage.free.fr/delphimysql.html

Donc aucun problème ça fonctionne.

J'ai essayé de recup le code de connection pour me connecter maintenant à une base de donnée MySql situé sur internet avec mes identifiants:

Citation :
procedure TForm1.Button1Click(Sender: TObject);
Var user,host,pwd:string;
portip:integer;
begin
user:='MonUser';
pwd:='MonMdp';
host:='ServeurdelaBdD';
portip:=3306;
MySQL := mysql_init(nil);
mysql_options(mysql,MYSQL_OPT_COMPRESS,0);
if mysql_real_connect(mysql, pChar(host), pChar(user), pChar(pwd), nil, portip, nil, 0)=nil then
Label1.Caption:='La connexion a echouée'
else
Label1.Caption:='Connexion OK';
end;


Problème : la connection echoue systématiquement ( j'ai essayé avec d'autres BdD que j'ai en ligne la connection ne fonctionne pas non plus :(  )

Voila si qqun peut m'aider, ce serait sympa :) 

Autres pages sur : delphi connection mysql

Lassé par la pub ? Créez un compte

frenchman a dit :
Bonjour,

Voila j'essaie de me connecté à partir de mon programme en Pascal à une base de donnée en ligne... MySql

J'ai trouvé un tuto pour une bdd en local : http://delphipage.free.fr/delphimysql.html

Donc aucun problème ça fonctionne.

J'ai essayé de recup le code de connection pour me connecter maintenant à une base de donnée MySql situé sur internet avec mes identifiants:

Citation :
procedure TForm1.Button1Click(Sender: TObject);
Var user,host,pwd:string;
portip:integer;
begin
user:='MonUser';
pwd:='MonMdp';
host:='ServeurdelaBdD';
portip:=3306;
MySQL := mysql_init(nil);
mysql_options(mysql,MYSQL_OPT_COMPRESS,0);
if mysql_real_connect(mysql, pChar(host), pChar(user), pChar(pwd), nil, portip, nil, 0)=nil then
Label1.Caption:='La connexion a echouée'
else
Label1.Caption:='Connexion OK';
end;


Problème : la connection echoue systématiquement ( j'ai essayé avec d'autres BdD que j'ai en ligne la connection ne fonctionne pas non plus :(  )

Voila si qqun peut m'aider, ce serait sympa :) 






J'ai le même problème, si quelqu'un à la réponse
Lassé par la pub ? Créez un compte

Créer un nouveau sujet

Tom's guide dans le monde