Discussion :

[PhRey]

Bonjour,
je travaille sur une base client en Access2003 sous XP

J'ai crée un formulaire continu important les données de 2 tables (Contacts, et Contacts_transit) avec la requete suivante sur le champs source du formulaire :

Code :

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

SELECT * FROM Contacts LEFT JOIN contacts_transit ON contacts_transit.Numéro=contacts.Numéro;

Tout est ok, les données s'affichent bien dans le form qques soient les champs !

Par contre j'avais un bouton "Annuler" qui executait une suppression des enregistrements en fonction des infos contenues dans un champs. Cette fonction ne marche plus maintenant !

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
Dim rcs As DAO.Recordset
 
Set rcs = Me.RecordsetClone
rcs.MoveFirst
 
While Not rcs.EOF
 
  If rcs.Fields("export") = "Exporter" Then
 CurrentDb.Execute "Update [Contacts] SET [export]= ' ' WHERE Numéro =" & rcs.Fields("numéro")
 rcs.MoveNext
  End If
Wend
 
rcs.Close
Set rcs = Nothing
 
Me.Requery

J'ai un message d'erreur sur la ligne

Code :

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

If rcs.Fields("export") = "Exporter" Then

disant :

"Element non trouvé dans cette collection"

Ce qui est sans doute logique etant donné que la requete source de mon formulaire porte maintenant sur 2 tables, mais je n'arrive pas a surmonter ce pb ! Il ne reconnait plus mon champs "export"...

Avez vous une solution svp ? Je coince !

[Tofalu]

Le champ ne se nomme peut être plus export mais Table1.Export

Regarde dans la requête comment est nommé le champ

[PhRey]

Oui c'est ca ! j'ai carrement oublié de reactualiser mes champs !
Mais je pense que le fait d'avoir specifié ensuite les champs a ramener dans ma requete (au lieu de "select *") y est pour qqchose....

Merci !!!!