MAJ du champs Description dans Access
Firekube
Messages postés
1
Date d'inscription
mercredi 13 avril 2005
Statut
Membre
Dernière intervention
22 janvier 2009
-
22 janv. 2009 à 11:28
c148270 Messages postés 303 Date d'inscription mercredi 12 janvier 2005 Statut Membre Dernière intervention 3 octobre 2013 - 28 janv. 2009 à 03:00
c148270 Messages postés 303 Date d'inscription mercredi 12 janvier 2005 Statut Membre Dernière intervention 3 octobre 2013 - 28 janv. 2009 à 03:00
A voir également:
- MAJ du champs Description dans Access
- Vb access - Conseils pratiques -Visual Basic / VB.NET
- Stock access bde - Forum Delphi / Pascal
- Insert into access - Forum SQL
- Access sql date ✓ - Forum SQL
- Update plusieurs champs sql - Forum SQL
1 réponse
c148270
Messages postés
303
Date d'inscription
mercredi 12 janvier 2005
Statut
Membre
Dernière intervention
3 octobre 2013
1
28 janv. 2009 à 03:00
28 janv. 2009 à 03:00
Bonjour
A essayer
For Each tdf In CurrentDb.TableDefs
If tdf.Attributes = 0 Then 'les autres valeurs correspondent à des tables externes ou système
Set table = CurrentDb.OpenRecordset(tdf.Name)
table.Edit
For Each fld In table.Fields
fld.Properties.Item("Description").Value = "toto" 'info stockée dans caption
Next fld
table.Update
table.Close
End If
Next tdf
Bon amusement
A essayer
For Each tdf In CurrentDb.TableDefs
If tdf.Attributes = 0 Then 'les autres valeurs correspondent à des tables externes ou système
Set table = CurrentDb.OpenRecordset(tdf.Name)
table.Edit
For Each fld In table.Fields
fld.Properties.Item("Description").Value = "toto" 'info stockée dans caption
Next fld
table.Update
table.Close
End If
Next tdf
Bon amusement