Discussion :

[free07]

Bonjour,

Je suis en train de prendre une crise de nerfs... Je ne comprends vraiment pas ce problème qui doit être tout c.. à régler ( enfin j'espère )

j'utilise une expression régulière pour vérifier les numéros de tel, si je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM MaTable WHERE (MonChamp NOT REGEXP "^0[1-9](([ ])[0-9]{2}){4}$")

ça marche, j'ai bien le résultat attendu, par contre si j'ajoute ( la valeur par défaut de MonChampTel étant '' )

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM MaTable WHERE (MonChampTel <> '') AND (MonChampTel NOT REGEXP "^0[1-9](([ ])[0-9]{2}){4}$")

j'ai une erreur SQL avec REGEXP et pourtant si je copie colle le code dans MySQL Workbench : pas d'erreur

Je précise que MonChampTel est de type VARCHAR(255) et que j'utilise un TMyQuery avec MyDAC

Merci d'avance pour votre aide

[free07]

Bon je viens de trouver une solution, j'intègre le test de la chaine vide à l'expression régulière, cela me permet de virer le test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonChampTel <> ''

comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM MaTable WHERE (MonChamTel NOT REGEXP "^$|^0[1-9](([ ])[0-9]{2}){4}$")

[Andnotor]

M'est avis que tu as juste oublié de doubler les apostrophes (ça ne va pas sauter aux yeux dans Delphi ni provoquer d'erreur puisque la chaîne est vide).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MyQuery1.SQL.Text := 'SELECT * FROM MaTable WHERE (MonChampTel <> '''') AND (MonChampTel NOT REGEXP "^0[1-9](([ ])[0-9]{2}){4}$")';

Avec MySQL, ça ne pose pas de problème de remplacer les apostrophes par des guillemets. Tu pourrais écrire MonChampTel <> "" ce qui simplifiera les copier/coller Delphi/Workbench.

Et l'expression peut être simplifiée par ^0\d( \d{2}){4}$, mais tu ne gères pas l'outre-mer avec ça

[free07]

M'est avis que tu as juste oublié de doubler les apostrophes (ça ne va pas sauter aux yeux dans Delphi ni provoquer d'erreur puisque la chaîne est vide).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MyQuery1.SQL.Text := 'SELECT * FROM MaTable WHERE (MonChampTel <> '''') AND (MonChampTel NOT REGEXP "^0[1-9](([ ])[0-9]{2}){4}$")';

Et oui... Je me doutais que c'était un problème tout simple, une bête faute d'inattention, merci. je vais quant même garder l'ajout à l'expression régulière.

Avec MySQL, ça ne pose pas de problème de remplacer les apostrophes par des guillemets. Tu pourrais écrire MonChampTel <> "" ce qui simplifiera les copier/coller Delphi/Workbench.

Je sais, il faut que je prenne l'habitude de cela.