Discussion :

[etnoig]

Bonjour j'ai lu la faq et les tutos mais je n'ai pu resoudre qu'une partie de mon probleme j'aimerai savoir si apres avoir envoyer des variables a un script grace a indy http on peut en recuperer une :

Code :

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

1
2
3
4
 
log :=T_log.Text;
pass := T_pass.Text;
IdHTTPconnexion.Get(Format('http://uneURL/authentification.php?log=%s&pass=%s',[IdHTTPconnexion.URL.PathEncode(log),IdHTTPconnexion.URL.PathEncode(pass)]));

la j'ai envoyer mes paramètres. ensuite sous php je fait une requete qui compare
==> log et pass a ceux de ma base SQL sur la page php.

j'aimerai savoir comment renvoyer a delphi si Oui ou Non l'utilisateur est present dans la base, si c'est possible.

merci d'avance.

[sjrd]

Code PHP :

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

1
2
3
4
5
6
7
8
9
10
11
12
<?php
// connexion à la BD
 
$log = $_GET['log'];
$passwd = $_GET['password'];
 
if (!$result = @mysql_query("SELECT id FROM users
    WHERE log='$log' AND passwd='$password' LIMIT 1"))
  error();
 
echo mysql_num_rows($result) ? 'Yes' : 'No';
?>

Code :

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

1
2
3
4
5
6
7
8
9
10
11
var Result : string;
 
Result := IdHTTPconnexion.Get(Format(
  'http://uneURL/authentification.php?log=%s&pass=%s',
  [IdHTTPconnexion.URL.PathEncode(log), IdHTTPconnexion.URL.PathEncode(pass)]
));
 
if Result = 'Yes' then
  // utilisateur trouvé
else
  // utilisateur non trouvé

[etnoig]

j'ai corrigé le code php que tu ma fourni et l'ai mit à la place du mien de ce coté la ça marche impec

apres donc quand je passe sous delphi je lance le prgm et la c'est le drame ^^
il me renvoir bien Yes ou No mais suivi de plein d'autres caractères donc il switch directement au cas 'else'
enfin ce n'est pas genant je vait faire une extraction des 3 1ers caractères de ma chaine

Merci Sjrd de cette reponse rapide et correcte, t un chef
Problème Résolu