Bonjour à toutes et à tous.
J'ai effectué une petite recherche rapide, et n'ayant pas trouvé mon bonheur, je me permet d'ouvrir ce topic.
Je fait un programme en VB et j'ai besoin de copier des valeurs d'une cellule d'une BDD (Base de Donnée, sous Access) A vers une cellule d'une BDD B.
J'ai crée une requête pour visualiser la chose, voici les screens 
http://img8.hostingpics.ns.net/pics/277489Requete01.jpg
http://img8.hostingpics.ns.net/pics/436528Requete02.jpg
Mon but est de copier les valeurs de ng_pin_from vers Connexio.
Voici 2 bouts de programme que j'ai essayé :
1) 'sans utiliser la requête de visualisation
Dim rst_input, rst_bdd_cablage
Set b = OpenDatabase("U:\etc.\BDD.mdb") 'récupération BDD
'req_input_data est une requête qui correspond à la table input_data + le critère N°page = 3
Set rst_input = b.OpenRecordset("select * from req_input_data")
Set rst_bdd_cablage = b.OpenRecordset("select * from import_bdd_cablage")
'je m'assure que je démarre du début de table / requête
rst_input.MoveFirst
rst_bdd_cablage.MoveFirst
Do While rst_input.EOF = False
Do While rst_bdd_cablage.EOF = False
'condition équivalente à ma requête
If rst_input!Matri = rst_bdd_cablage!ng_matri_from_court And rst_input!Nom_symb = "bo_rs1cs" And rst_input!Repere = rst_bdd_cablage!ng_scheme Then
rst_input.Edit
rst_input!Connexio = rst_bdd_cablage!ng_pin_from 'copie de la valeur
rst_input.Update
End If
rst_bdd_cablage.MoveNext
Loop
rst_bdd_cablage.MoveFirst
rst_input.MoveNext
Loop
2) 'en utilisant la requête de visualisation
Dim rstMissingPin
Set b = OpenDatabase("U:\etc.\BDD.mdb") 'récupération BDD
Set rstMissingPin = b.OpenRecordset("select * from reqMissingPin")
rstMissingPin.MoveFirst
Do While rstMissingPin.EOF = False
rstMissingPin.Edit
rstMissingPin!Connexio = rstMissingPin!ng_pin_from
rstMissingPin.Update
rstMissingPin.MoveNext
Loop
Dans les 2 cas ca ne fonctionne pas, mais pas pour les mêmes raisons.
1) Ca copie bien de ng_pin_from vers Connexio, mais en fait ca copie les valeurs dans TOUS les champs, donc au final je me retrouve par exemple avec toutes les cellules de Connexio qui valent "J7" (par exemple), au lieu de chacune une valeur différente (= ng_pin_from)
2) J'obtiens un message d'erreur me disant que la requête est en lecture seule et donc non-modifiable.
Après divers essais en tout genre, j'en viens à la conclusion que mon bout de code est mauvais (logique nan ? xD)
Quelqu'un serait-il capable de me donner une correction pour que ca fonctionne enfin ?
D'avance merci 
PS : désolé pour la mise en page du code, mes tabulations ne sont pas restée quand j'ai copié/collé, j'ai fait au mieux pour que ça reste lisible 
