begin process at 2008 08 30 18:24:47
1 234 151 membres
184 nouveaux aujourd'hui
14 294 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : probleme d'execution d'une methode [ Divers / Débutants ] (dam278)

probleme d'execution d'une methode le 18/07/2008 14:32:56

dam278
bonjour.

ma question est surement stupide mais je comprend pas pourquoi ca marche pas.

je declare une methode comme ca :

Sub MoveTo(GrosTitre As Integer, SousTitre As Integer, SSTitre As Integer, SSSTitre As Integer)

    Set rst = Adodc1.Recordset
    rst.MoveFirst
   
    Do While Val(LblGrosTitre.Caption) < GrosTitre
        rst.MoveNext
    Loop
    Do While Val(LblSousTitre.Caption) < SousTitre
        rst.MoveNext
    Loop
    Do While Val(LblssTitre.Caption) < SSTitre
        rst.MoveNext
    Loop
    Do While Val(LblsssTitre.Caption) < SSSTitre
        rst.MoveNext
    Loop

   
End Sub

et quand je l'appelle par ce code :


MoveTo (GrosTitre,0,0,0)

vb me repond Expected : =

help me plzzzzz

Le chameau peut travailler 8 jours sans boire. Je peux boire 8 jours sans travailler

Re : probleme d'execution d'une methode le 18/07/2008 14:56:58

lillith212
Membre Club
Salut,

Sub MoveTo(GrosTitre As Integer, SousTitre As Integer, SSTitre As Integer, SSSTitre As Integer)

    Set rst = Adodc1.Recordset
    rst.MoveFirst
   
    Do While Val(LblGrosTitre.Caption) < GrosTitre <-- Val renvoi une valeur de type Doucle or toi tu le compare à un integer. Je suppose aussi que le caption LblGrosTitre contient une valeur de type numérique? 
        rst.MoveNext
    Loop
--> Que se passe-t-il si jamais val(lblGrosTitre.caption) est toujours inférieur? Tu propovoque une erreur car tu va arriver à la fin de ton recordset.
--> Meme remarque pour la suite...
    Do While Val(LblSousTitre.Caption) < SousTitre
        rst.MoveNext
    Loop
    Do While Val(LblssTitre.Caption) < SSTitre
        rst.MoveNext
    Loop
    Do While Val(LblsssTitre.Caption) < SSSTitre
        rst.MoveNext
    Loop

   
End Sub

et quand je l'appelle par ce code :


MoveTo (GrosTitre,0,0,0) --> tu fais appel à une procédure en mettant des paramètres qui ne correspondent pas. c'est à dire tu déclare ta procédure comme toto(chiffre, chiffre, chiffre, chiffre) or la tu appelles ta  procédure avec le mot "GrosTitre" --> Comment est déclaré "GrosTitre"? c'est une variable de type Integer définie ailleurs dans ton programme?

Tu veux faire quoi exactement avec ce bout de code?

S.L.B.


*********************************************************************************
<>

Re : probleme d'execution d'une methode le 18/07/2008 15:28:53

dam278
c'est un moyen detourné de deplacer le focus sur un certain enregistrement de ma base de donnée .
ce que je comprend pas c'est que l'erreur se fait pas au niveau de l'execution mais de la compilation. Apparemment il detecte une erreur de syntaxe dans le moveto(.,.,.,.) (et oui grosTitre est un integer)

merci en tt cas

Le chameau peut travailler 8 jours sans boire. Je peux boire 8 jours sans travailler

Re : probleme d'execution d'une methode le 18/07/2008 15:37:34

lillith212
Membre Club
Normal,
Tu compare du double avec de l'integer.
plutot que "val" utilise "Cint"

S.L.B.


*********************************************************************************
<>

Re : probleme d'execution d'une methode le 18/07/2008 15:38:38

lillith212
Membre Club
re:
callMoveTo (GrosTitre,0,0,0)

S.L.B.


*********************************************************************************
<>

Re : probleme d'execution d'une methode le 18/07/2008 15:47:06

dam278
maintenant il me dit byref argument type mysmatch..

Le chameau peut travailler 8 jours sans boire. Je peux boire 8 jours sans travailler

Re : probleme d'execution d'une methode le 18/07/2008 15:51:18

dam278
ok nouvel element parce que je suis pas juste un boulet, ya un truc bizarre..

j'ai mis les 3 dernieres arguments de la fonction comme optionnels, et lors de l'appel ca fonctionne avec & argument mais dès que yen a 2 ca plante..je ne comprend  plus

Le chameau peut travailler 8 jours sans boire. Je peux boire 8 jours sans travailler

Re : probleme d'execution d'une methode le 18/07/2008 18:45:20

LIBRE_MAX
Salut;

Mets une valeur par defaut à chaque argument optionnel..


... Y'en a même qui disent qu'ils l'ont vu voler.

Re : probleme d'execution d'une methode le 18/07/2008 20:05:00

dam278
je te remercie mais j'ai trouvé
il fallai mettre les arguments de la methode byval. Me demande pas pkoi mais ca marche j'en demande pas plus

merci pour ton aide

Le chameau peut travailler 8 jours sans boire. Je peux boire 8 jours sans travailler


Classé sous : do, while, integer, val, rst

Participer à cet échange

Livres en rapport

Pub



Appels d'offres

Recherche developpeur ...
Budget : 700€
SITE MARCHAND LOCATION...
Budget : 3 000€
SITE MARCHAND POUR HOTEL
Budget : 4 000€

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Boutique

Boutique de goodies CodeS-SourceS