cs_Kruger
Messages postés68Date d'inscriptionvendredi 31 janvier 2003StatutMembreDernière intervention 4 octobre 2004
-
20 févr. 2004 à 04:56
cs_Kruger
Messages postés68Date d'inscriptionvendredi 31 janvier 2003StatutMembreDernière intervention 4 octobre 2004
-
25 févr. 2004 à 21:49
Salut, j'ai un probleme depuis maintenant quelques jours que j'arrive pas à résoudre, voilà, quand je fais une requete SELECT xxx FROM yyy WHERE zzz avec un "zzz" numerique, tout va bien par contre quand le "zzz" est alphanumerique, la requete plante, voilà le code en cause, si qqn peut me venir en aide.
{Initialisation des variables de connection à la base de donnée}
user:='root';
pwd:='';
host:='127.0.0.1';
port:=3306;
{Initialisation de la connection base de donnée}
MySQL := mysql_init(nil);
mysql_options(mysql,MYSQL_OPT_COMPRESS,nil);
{Connection base de donnée}
if mysql_real_connect(mysql, pChar(host), pChar(user), pChar(pwd), nil, port, nil, 0)= nil then showmessage('Connection impossible');
{Selection de la base de donnée}
if mysql_select_db(mysql, pChar(dbname))<>0 then showmessage('Selection base impossible') ;
{Controle remplissage combo}
if combobox1.Text = '' then
begin
showmessage('Spécifier le mode de recherche!');
end;
{Requete de recherche}
try
if ComboBox1.Text='Code rayon' then
begin
if mysql_query(mysql, pChar('SELECT * FROM '+table+' WHERE code = '+Edit2.Text ))<>0 then
ShowMessage('requête selection plantée');
resultat:=mysql_use_result(MySQL);
row := mysql_fetch_row(Resultat);
{Remplissage des cellules avec les données}
for i := 1 to 6 do
begin
StringGrid1.Cells[i,1]:= row[i];
end;
{Affichage du nombre d'article en stock}
if mysql_query(mysql, pChar('SELECT COUNT(*) FROM '+table+' WHERE code = '+Edit2.Text )) <> 0 then showmessage('requete compteur plantée');
article:=mysql_use_result(MySQL);
nombre := mysql_fetch_row(article);
Edit1.Text := nombre[0];
end
Donc je résume, si le contenu de mon Edit2.text est numerique "123559" tout fonctionne par contre quand c'est de l'alphanumerique "SZOF5547", ça plante.
Au fait, j'ai delphi 7 personnel et je gère ma partie sql avec mysql.pas et la librairie officielle libmysql.dll.