Discussion :

[jlb59]

Bonjour à tous,

J'ai fait un petit prb que j'ai mis en ligne et j'ai reçu un mail d'un utilisateur me disant qu'il avait reçu le msg d'erreur n° 3265.

Je n'ai jamais rencontré ce type d'erreur et ne l'ai pas trouvé dans l'aide (à moins que je sois passé à côté !).

QQ pourrait me dire à quoi cela correspond pour essayer de faire le nécessaire ?

Merci d'avance.

Cordialement, JLB59

[SfJ5Rpw8]

?? aide en ligne VB6 :

adErrItemNotFound 3265 0x800A0CC1
ADO n'a pas pu trouver l'objet dans la collection correspondant au nom ou à la référence ordinale demandée par l'application.

[jlb59]

?? aide en ligne VB6 :

Merci de ta rapidité bbil, et du msg de cette erreur, mais là où je ne comprends plus, c'est que j'ai fait les essais sur mon PC, pas de prb.

Donc, quand tout a été OK, j'ai empaqueté le prg et l'ai mis en ligne.

Ce prb ne pourrait pas venir que de chez l'utilisateur des fois ?

[Delbeke]

D'apres le message, je ne vois qu'un problème dans la base, il doit manquer un champs dans une table

[jlb59]

D'apres le message, je ne vois qu'un problème dans la base, il doit manquer un champs dans une table

OK mais chez moi je n'ai pas eu d'erreur !!!

[SfJ5Rpw8]

cela ne pourrai pas être un probléme de version d'ADO...? ton "client" il utilise la même base de donnée que toi ...?

[Delbeke]

Et la base qui est chez toi n'est pas celle qui est chez ton client. essaye de rapatrier la base et de faire tourner ton programme dessus.

[jlb59]

Et la base qui est chez toi n'est pas celle qui est chez ton client. essaye de rapatrier la base et de faire tourner ton programme dessus.

J'utilise Access, comme beaucoup, si l'utilisateur a une autre Bdd, alors je ne peux rien faire.

[SfJ5Rpw8]

on ne te parle pas du type de base de donnée ... mais du "fichier" base de donnée... comment est-t'il crée... c'est ton appli qui la crée...?

[jlb59]

on ne te parle pas du type de base de donnée ... mais du "fichier" base de donnée... comment est-t'il crée... c'est ton appli qui la crée...?

Bonjour bbil,
Désolé du retard, mais hier soir j'ai eu de la visite.

Bon, pour revenir à ta réponse, effectivement c'est mon appli qui crée le fichier.
Ce fichier en question reprend les informations enregistrées dans une bdd et les place dans des textbox, et les champs nécessaires sont impec, j'ai encore vérifié !

Mais ce que je n'arrive pas à comprendre, c'est que je n'ai pas d'erreur et qu'un (un seul) utilisateur m'a informé de cette erreur (3265) !!!

[SfJ5Rpw8]

ben comme dit Delbeke essai de récupérer le fichier base de donnée de ton client .. puis essai de reproduire le probléme chez toi ...
c'est pas parce que tu n'arrive pas à reproduire un bug, qu'il n'existe pas dans ton programme... renseigne toi auprés de ton client sur les circonstances ou apparaissent ce probléme...

[jlb59]

ben comme dit Delbeke essai de récupérer le fichier base de donnée de ton client .. puis essai de reproduire le probléme chez toi ...
c'est pas parce que tu n'arrive pas à reproduire un bug, qu'il n'existe pas dans ton programme... renseigne toi auprés de ton client sur les circonstances ou apparaissent ce probléme...

OK, je vais faire comme ça et merci pour tout.
A bientôt.

[meriem19911]

moi aussi j'ai ce probleme dans ce code svp qulqu'un peut m'aider

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
     LabelMIC.Caption = "0" 'initialiser mois incomplet
        For J = 1 To DernierJour(mois, Année)
              If NatureRégime(J) = "F" And (CDate(J & "/" & mois & "/" & Année) > Ado_personnel.Recordset![DATE_ENT] And (CDate(J & "/" & mois & "/" & Année) < Ado_personnel.Recordset![DATE_DEMO]) Or IsNull(Ado_personnel.Recordset![DATE_DEMO])) Then
                JourFields(J) = "F"
              ElseIf NatureJours(J) = "1" Or NatureJours(J) = "2" Or CDate(J & "/" & mois & "/" & Année) < Ado_personnel.Recordset![DATE_ENT] Or CDate(J & "/" & mois & "/" & Année) > Ado_personnel.Recordset![DATE_DEMO] Then JourFields(J) = "X"
              Else
                 'If JourFields(j).Enabled = True Then
                   Select Case NatureRégime(J)
                          Case "R"
                               JourFields(J) = "7" 'DéfinitionRégimes(RRAMADAN, 1)
                               LabelITZI.Caption = LabelITZI.Caption + 1 'pour remplir les le champ  ITZI pour la paie
                          Case "P" 'jour parteculier
                               JourFields(J) = "0" 'en cours de traitement
                          Case Else
                          'modification a nouveau
 
                           If Ado_personnel.Recordset![CODE_STRUC] <> Mid(CODE_STRUC, 1, 7) Then
                               JourFields(J) = "8" 'DéfinitionRégimes(RNORMAL, 1)
                               'ajouter le 03092012 pour remplir les le champ NR (Nourriture) et ITZI pour la paie
                               LabelNR.Caption = LabelNR.Caption + 1
                               LabelITZI.Caption = LabelITZI.Caption + 1
                               Else
 
                               Call connexion
                                If rs_ado.State = adStateOpen Then rs_ado.Close
                    rs_ado.Open "select * from pointage.[F_ControlAcces] where Matricule = '" & Ado_personnel.Recordset!Matricule & "' and Structure_Pointage like RTrim  ('" & structure & "')and pointage_direction=1 and mois = " & mois & " and Année = " & Année, con, adOpenStatic, adLockOptimistic, 1 ' 13/01/2014 annuler ptg en double pr le mm Agent
              With rs_ado
                MoveLast
                  While Not rs_ado.EOF
                  X = "Jour" + CStr(J)
                   JourFields(J) = rs_ado_1![X] (le probleme est apparaitre ici)
 
           MoveNext
              Wend
              rs_ado.Close
              End With
    End If
 
         End Select

[ProgElecT]

Salut, bienvenue sur DVP

Il me semble qu'il y te toutes façons un problème ici
"' and Structure_Pointage like RTrim ('" & structure & "')and pointage_direction= ......", le rtrim dans la requête ?
"' and Structure_Pointage like '" & RTrim(structure) & "'and pointage_direction= ......", je le vois mieux de cette façon.

A moins que le nom d'un champ ou de table ne soit pas correctement orthographié.

[meriem19911]

ouii je l'ai enlevé ..mais encore le meme probleme il na pas trouve l'element ...et l'element que je cherche c'est le jour donc svp quelqu'un a subit ou bien obtenir une ce genre d'erreur..

[ProgElecT]

Salut

Difficile de trouver avec si peu de renseignements.
Peux tu nous indiquer la ligne ou se produit l'erreur, quelle partie de cette ligne est mise en surbrillance ?