Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic vb data update

vb data update

2 réponses
Avatar
jerome
Bonjour,

j'utilise dans une appli vb, une base de donnée de type dataenvironment.
Je voudrais mettre à jour plusieurs données, je fais donc :
dtcompte.commands(2).commandtext="UPDATE matable SET Nom='" & txtNom.text
& _
"', Taille=" & txttaill.text & ", age=" & txtage.text & " WHERE ID=" &
txtID.text

if dtcompte.rscmcompte.state<>1 Then
dtcompte.rscmcompte.open
end if

etc...

Apparemment, cela cloche avec les virgules (SET nom1=valeur, nom2=valeur).
Comment puis-je faire pour mettre à jour plusieurs données ?

Merci
jerome
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
David
Bonjour Jérome,

Voila comment j'ai structurer mon
programme. en espérant que
cela d'aidera !

Data1.Database.Execute "Update mouvement " & _
"SET quantite=" & "'" & Text7(1) & "'" & _
",Datelivrais=" & "'" & DTPicker4.Value & "'" & _
",VOLUME=" & "'" & Text7(2) & "'" & _
",DESIGNATION=" & "'" & Text7(3) & "'" & _
",teinte=" & "'" & Text7(4) & "'" & _
",HTVAEURO=" & "'" & Format(Text7(5), "###.00") &
"'" & _
",CAUTION=" & "'" & Val(Combo1) & "'" & _
"Where Item =" & Text7(0)



a+
Jean-Pol DAVID
mailto:
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ?
Quomodo ? Quando ?

"jerome" a écrit
dans le message news:
3fb141aa$0$7691$
t...
Bonjour,

j'utilise dans une appli vb, une base de donnée


de type dataenvironment.
Je voudrais mettre à jour plusieurs données, je


fais donc :
dtcompte.commands(2).commandtext="UPDATE


matable SET Nom='" & txtNom.text
& _
"', Taille=" & txttaill.text & ", age=" &


txtage.text & " WHERE ID=" &
txtID.text

if dtcompte.rscmcompte.state<>1 Then
dtcompte.rscmcompte.open
end if

etc...

Apparemment, cela cloche avec les virgules (SET


nom1=valeur, nom2=valeur).
Comment puis-je faire pour mettre à jour


plusieurs données ?

Merci
jerome




Avatar
jerome
Merci David pour ton aide !
Cela n'a pas résolu mon problème, mais cela m'a permis de trouver une autre
solution :
dtCompte.rscmCompte.Fields(2).Value = txtNom.text
dtCompte.rscmCompte.Fields(3).Value = txttaill.Text
dtCompte.rscmCompte.Fields(4).Value = txtage.text
dtCompte.rscmCompte.Update

Mais bon, ca fonctionne car je suis sur l'enregistrement courant.

"David" a écrit dans le message de news:

Bonjour Jérome,

Voila comment j'ai structurer mon
programme. en espérant que
cela d'aidera !

Data1.Database.Execute "Update mouvement " & _
"SET quantite=" & "'" & Text7(1) & "'" & _
",Datelivrais=" & "'" & DTPicker4.Value & "'" & _
",VOLUME=" & "'" & Text7(2) & "'" & _
",DESIGNATION=" & "'" & Text7(3) & "'" & _
",teinte=" & "'" & Text7(4) & "'" & _
",HTVAEURO=" & "'" & Format(Text7(5), "###.00") &
"'" & _
",CAUTION=" & "'" & Val(Combo1) & "'" & _
"Where Item =" & Text7(0)



a+
Jean-Pol DAVID
mailto:
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ?
Quomodo ? Quando ?

"jerome" a écrit
dans le message news:
3fb141aa$0$7691$
t...
> Bonjour,
>
> j'utilise dans une appli vb, une base de donnée
de type dataenvironment.
> Je voudrais mettre à jour plusieurs données, je
fais donc :
> dtcompte.commands(2).commandtext="UPDATE
matable SET Nom='" & txtNom.text
> & _
> "', Taille=" & txttaill.text & ", age=" &
txtage.text & " WHERE ID=" &
> txtID.text
>
> if dtcompte.rscmcompte.state<>1 Then
> dtcompte.rscmcompte.open
> end if
>
> etc...
>
> Apparemment, cela cloche avec les virgules (SET
nom1=valeur, nom2=valeur).
> Comment puis-je faire pour mettre à jour
plusieurs données ?
>
> Merci
> jerome
>
>