Avoir des connaissances sur la façon de modifier une colonne avec une contrainte de clé primaire peut vous faire gagner du temps lorsque vous travaillez avec une base de données Microsoft Access. Lignes d'une table sont identifiés en utilisant une contrainte de clé primaire pour l'intégrité des données . Access crée un index unique pour permettre un accès rapide aux données dans une table avec une clé primaire. Utilisez Visual Basic pour Applications ( VBA) dans Access pour automatiser des processus tels que l'édition d'une colonne de clé primaire. Instructions
1
Démarrer Microsoft Office Access et sélectionnez " Base de données vide " puis cliquez sur "Créer". Sélectionnez le menu "Base de données Outils" puis cliquez sur " Visual Basic ". Sélectionnez le menu "Insertion " puis cliquez sur
2
type de ce qui suit pour créer une nouvelle procédure "Module ". :
Private Sub editPrimaryKey ()
presse " Entrez "
3
Tapez la commande suivante pour déclarer les variables que vous allez utiliser pour créer une nouvelle table avec une clé primaire : .
Dim strSQL As String
< p> rst As Recordset
Dim dbs As Database
4
Tapez la commande suivante pour définir la base de données à utiliser:
Set dbs = CurrentDb
5
Tapez la commande suivante pour exécuter une instruction SQL et créer une table appelée " dataTable " avec une clé primaire :
strSQL = " CREATE TABLE dataTable "
strSQL = strSQL & »( PK_Field ENTIER CONTRAINTE PK_PK_Field PRIMARY KEY , "
strSQL = strSQL & "TEXT -ville (25) ) "
DoCmd.RunSQL ( strSQL )
6
tapez la commande suivante pour ajouter trois lignes de données à la nouvelle table :
strSQL = "INSERT INTO dataTable ( [ PK_Field ], [ville] ) "
strSQL = strSQL & " VALUES ( 1 , ' Fort Worth '); "
DoCmd.SetWarnings Faux
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO dataTable ( [ PK_Field ] , [ville] ) "
strSQL = strSQL &" VALUES ( 2, ' Arlighton '); "
DoCmd.RunSQL ( strSQL )
strSQL =" INSERT INTO dataTable ( [ PK_Field ] , [ville] ) "
strSQL = strSQL &" VALUES ( 3 , ' Dallas '); "
DoCmd.RunSQL ( strSQL )
7
tapez la commande suivante pour supprimer le paramètre clé primaire dans le champ " PK_Field ":
strSQL = " ALTER TABLE dataTable "
strSQL = strSQL & " DROP CONSTRAINT PK_PK_Field ; "
< p > DoCmd.RunSQL ( strSQL )
Retrait de la contrainte de clé primaire va vous permettre de modifier la colonne de clé primaire.
8 Type de
suivantes pour ouvrir le " dataTable " et modifier le table en utilisant un jeu d'enregistrements :
Set rst = dbs.OpenRecordset ( " dataTable " )
rst.MoveFirst
rst.Edit
rst.Fields ( " PK_Field " ) . Value = 6
rst.Update
rst.Close
le code met à jour le " PK_Field " à 6 pour la première ligne . Appuyez sur la touche "F5 " pour exécuter le sous-programme.
9
revenir à la fenêtre d'accès Microsoft et cliquez-droit sur la table " dataTable " situé dans le volet gauche de l'écran de votre ordinateur. Sélectionnez « Création » et cliquez sur la ligne " PK_Field " . Cliquez sur l'icône " clé primaire " dans le volet «Outils» pour définir ce champ vers un champ de clé primaire .