Update 2 Chsql

Le
jfd
Bonsoir et Bonne Année à tous
Comment est-il possible de faire 2 mises à jour Chsql sur la même action

Dim chsql As String
Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "'"
chsql = "UPDATE MaTable SETMaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True

Merci par avance
jfd
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Eric
Le #18306661
Bonjour,

du genre :
Dim chsql As String
' Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SET MaTable.DatIns ='" & (Me.Text14) & "'"
DoCmd.RunSQL chsql
chsql = "UPDATE MaTable SET MaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True

si DatIns et DatIns2 représentent des champs de type Date, il faudra
mettre Text14 & Text18 au format Date


jfd a écrit :
Bonsoir et Bonne Année à tous
Comment est-il possible de faire 2 mises à jour Chsql sur la même action

Dim chsql As String
Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "'"
chsql = "UPDATE MaTable SETMaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True

Merci par avance
jfd




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
CErnst
Le #18325041
S'il s'agit de la même table dans les 2 cas :

Dim chsql As String
Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "',
MaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True




"jfd"
Bonsoir et Bonne Année à tous
Comment est-il possible de faire 2 mises à jour Chsql sur la même action

Dim chsql As String
Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "'"
chsql = "UPDATE MaTable SETMaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True

Merci par avance
jfd



jfd
Le #18327751
Merci de vos réponses je vais essayer cela.
Bonne soirée
jfd

"CErnst" a écrit :

S'il s'agit de la même table dans les 2 cas :

Dim chsql As String
Set dbBaseDonnees = CurrentDb
DoCmd.SetWarnings False
chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "',
MaTable.DatIns2 ='" & (Me.Text18) & "'"
DoCmd.RunSQL chsql
DoCmd.SetWarnings True




"jfd"
> Bonsoir et Bonne Année à tous
> Comment est-il possible de faire 2 mises à jour Chsql sur la même action
>
> Dim chsql As String
> Set dbBaseDonnees = CurrentDb
> DoCmd.SetWarnings False
> chsql = "UPDATE MaTable SETMaTable.DatIns ='" & (Me.Text14) & "'"
> chsql = "UPDATE MaTable SETMaTable.DatIns2 ='" & (Me.Text18) & "'"
> DoCmd.RunSQL chsql
> DoCmd.SetWarnings True
>
> Merci par avance
> jfd
>





Publicité
Poster une réponse
Anonyme