problème de code

Question

salut a tous voila j'ai taper le code suivant (dont certain m'on aide pour le faire Set tbl db.OpenRecordset("select* from salut where nom_serveur'" & serveur1 & "';") If tbl.RecordCount <> 0 Then Do Until tbl.EOF tbl.MoveFirst For i = 1 To 31 '*************** nombre des champs -1 fld(i) = tbl.Fields(i) tbl.MoveNext Next Loop End If Set ajout db.OpenRecordset("select * from temporaire where nom_serveur'" & serveur1 & "';") If ajout.RecordCount <> 0 Then Do Until tbl.EOF ajout.MoveFirst For j = 1 To 31 tableau(j) = ajout.Fields(j) tbl.MoveNext Next Loop Set modif = db.OpenRecordset("salut", dbOpenDynaset) modif.MoveFirst If Not modif.EOF Then modif.Edit If tableau(j) <> "" Then ajout.Fields(i) = tableau(j) modif.Update End If Set tbl = Nothing Set db = Nothing End If End Sub mais lors de l'execution rien ne se passe et ce que je voudrai c'est que dans la table salut apparaisse les modification de la ligne serveur en effet normalement les données contenue dans la ligne serveur dans la table temporaire doive ecraser les données de la table salut

crn_c21 · Answer

Pour cette ligne de code :

If tableau(j) <> "" Then ajout.Fields(i) = tableau(j)

j n'est plus défini (tu es sorti de la boucle), i non plus

et si :

ajout.Fields(i) = tableau(j)

doit modifier les infos de la table ajout ca ne marche pas il faut passer par une requète UPDATE

fab101 · Answer

merci pour ta reponse

comment integre tu une requete update
et quelle sa syntaxe
car je ne voudrai pas marque le nom des champs
mais mettre un * pour avoir l'ensemble de la table

merci

crn_c21 · Answer

impossible!

pour un update il faut marquer le nom des champs

sauf si tu passes des variables en paramètres!

UPDATE Nom_Table set Nom_Champ where ........

Problème de code

3 réponses

Discussions similaires