Problème avec une boucle while wend

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
wolfjeremy
Messages : 1202
Inscription : sam. 31/déc./2005 23:52

Message par wolfjeremy »

:cry: je commence a desperer la... sa fait depuis le matin que je me casse le cul la dessus :cry:

Ton code renvoye seulement Stop... comme les codes precedent quoi :cry:

A oui aussi, id_dom est l'id qui a été récuperer a la boucle precedente, comme sa quand on a fait le tour de toutes les lignes ayant le même utilisateur et bien comme Purebasic recupere le 1er qui est present dans la base id = id_dom donc on peut sortir de la boucle. (id étant le premier champ de la ligne qui se trouve dans la table.)
Avatar de l’utilisateur
flaith
Messages : 1487
Inscription : jeu. 07/avr./2005 1:06
Localisation : Rennes
Contact :

Message par flaith »

pas évident en effet, surtout qd on a pas tout le code et que je peux pas faire de test car j'ai pas de serveur mysql de lancé :?
wolfjeremy
Messages : 1202
Inscription : sam. 31/déc./2005 23:52

Message par wolfjeremy »

Le truc c'est que ta pas besoin de plus de code car c'est un code de test donc y a pas plus... a part les debut :


#libmysql = 1

If OpenLibrary ( #libmysql , "libmysql.dll" ) ;charger la dll et choper l'adresse des fonctions qui vont etre utiles à ce mini tut
  Global init = GetFunction( #libmysql , "mysql_init" )
  Global close = GetFunction( #libmysql , "mysql_close" )
  Global list_tables = GetFunction( #libmysql , "mysql_list_tables" )
  Global real_connect=GetFunction( #libmysql , "mysql_real_connect" )
  Global num_rows=GetFunction( #libmysql , "mysql_num_rows" )
  Global fetch_row=GetFunction( #libmysql , "mysql_fetch_row" )
  Global free_result=GetFunction( #libmysql , "mysql_free_result" )
  Global query = GetFunction( #libmysql , "mysql_query" )
  Global store_result = GetFunction( #libmysql , "mysql_store_result" )
  Global real_query = GetFunction( #libmysql , "mysql_real_query" )
  Global field_count = GetFunction( #libmysql , "mysql_field_count" )
  Global affected_rows = GetFunction( #libmysql , "mysql_affected_rows" )
  Global num_fields = GetFunction( #libmysql , "mysql_num_fields" )
  Global num_rows = GetFunction( #libmysql , "mysql_num_rows" )
  Global fetch_row = GetFunction( #libmysql , "mysql_fetch_row" )
  Global fetch_lengths = GetFunction( #libmysql , "mysql_fetch_lengths" )

dbHnd = CallCFunctionFast (init,0)
 
   If dbHnd = 0
     MessageRequester ( "Erreur" , "Impossible d'initialiser la connection" , #PB_MessageRequester_Ok )
     End
   EndIf
Else
   MessageRequester ( "Erreur" , "Impossible de charger libmysql.dll" , #PB_MessageRequester_Ok )
   End
EndIf


Procedure.s GetError(db_ID) ; permet de choper l'erreur revoyée par la DB.
  Errormsg.s
   If CallFunction ( #libmysql , "mysql_errno" ,db_ID) > 0
    *Error = CallFunction ( #libmysql , "mysql_error" ,db_ID)
    i=-1
     Repeat
      i=i+1
      Errormsg=Errormsg+ PeekS (*Error+i,1)
     Until PeekB (*Error+i)=0
     MessageRequester ( "Sql a renvoyé une erreur" , Errormsg, #PB_MessageRequester_Ok )
     Debug Errormsg
   EndIf
EndProcedure

; Entrez les infos sur votre base sql (là, c'est celles par défaut de Easy PHP)
IPsql$ = "127.0.0.1"
user$ = "root"
pass$ = ""
portsql =0
pipe$ = ""
conconf =0


;Se connecter à la base de donnée est tres simple!
If CallFunctionFast (real_connect,dbHnd, IPsql$, user$, pass$, "projet1" , portsql, pipe$, conconf) = 0
  GetError(dbHnd)
EndIf

numero$= "sd-18462"
password$ = "demo"


Après et bien c'est le code qu'on arrive pas a faire marcher... (le debut que je t'ai donner est bon)
A part que dans mon code on recupere le nom d'utilisateur et password dans des string gadget avant mais bon sa change rien.
De toute façon tu ne saura pas le faire aller vu que tu na pas les meme base de donnée que moi et que tu na pas de base de donnée en local :?
Avatar de l’utilisateur
flaith
Messages : 1487
Inscription : jeu. 07/avr./2005 1:06
Localisation : Rennes
Contact :

Message par flaith »

Bon t'as gagné, tu me donne envie de tester et voir ca de plus près :D
wolfjeremy
Messages : 1202
Inscription : sam. 31/déc./2005 23:52

Message par wolfjeremy »

:P lol merci pour ton aide.
Répondre