Tu peux effectivement faire un alter table : CurrentDb.Execute "ALTER TABLE TaTable ADD CONSTRAINT PrimaryKey PRIMARY KEY (TonChamp);"
En revanche je en comprends pas pourquoi tu dois le faire tous les jours ? Tu supprimes et tu réimportes à chaque fois ?
Arnaud
"ran" a écrit dans le message news: 24d301c503bc$d16a0b50$ Bonjour
Je récupère des tables d'une base externe.
Comment fait-on pour ajouter une clef unique sur le champ ad-hoc (en l'occurence, l'ID)
Je voudrais pouvoir automatiser dans un module, parceque je le fais tous les jours.
Merci
Eric
Bonjour,
Le code suivant devrait le faire :
Sub PKTable1() Dim strSQL As String strSQL = "Alter Table Table1 Add Constraint PK_ID Primary Key(ID);" CurrentDb.Execute strSQL End Sub
et si tu veux l'appeler pour d'autres tables :
Sub PKTable(NomTable As String) Dim strSQL As String strSQL = "Alter Table " & NomTable & " Add Constraint PK_ID Primary Key(ID);" CurrentDb.Execute strSQL End Sub
Sub TestPK() PKTable "Table1" 'Appel Add Primary Key End Sub
-- A+ Eric Lien à suivre : http://users.skynet.be/mpfa/
Bonjour
Je récupère des tables d'une base externe.
Comment fait-on pour ajouter une clef unique sur le champ ad-hoc (en l'occurence, l'ID)
Je voudrais pouvoir automatiser dans un module, parceque je le fais tous les jours.
Merci
Bonjour,
Le code suivant devrait le faire :
Sub PKTable1()
Dim strSQL As String
strSQL = "Alter Table Table1 Add Constraint PK_ID Primary Key(ID);"
CurrentDb.Execute strSQL
End Sub
et si tu veux l'appeler pour d'autres tables :
Sub PKTable(NomTable As String)
Dim strSQL As String
strSQL = "Alter Table " & NomTable & " Add Constraint PK_ID
Primary Key(ID);"
CurrentDb.Execute strSQL
End Sub
Sub TestPK()
PKTable "Table1" 'Appel Add Primary Key
End Sub
--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/
Bonjour
Je récupère des tables d'une base externe.
Comment fait-on pour ajouter une clef unique sur le champ
ad-hoc (en l'occurence, l'ID)
Je voudrais pouvoir automatiser dans un module, parceque
je le fais tous les jours.
Sub PKTable1() Dim strSQL As String strSQL = "Alter Table Table1 Add Constraint PK_ID Primary Key(ID);" CurrentDb.Execute strSQL End Sub
et si tu veux l'appeler pour d'autres tables :
Sub PKTable(NomTable As String) Dim strSQL As String strSQL = "Alter Table " & NomTable & " Add Constraint PK_ID Primary Key(ID);" CurrentDb.Execute strSQL End Sub
Sub TestPK() PKTable "Table1" 'Appel Add Primary Key End Sub
-- A+ Eric Lien à suivre : http://users.skynet.be/mpfa/
Bonjour
Je récupère des tables d'une base externe.
Comment fait-on pour ajouter une clef unique sur le champ ad-hoc (en l'occurence, l'ID)
Je voudrais pouvoir automatiser dans un module, parceque je le fais tous les jours.
Merci
-----Message d'origine----- Bonjour, En revanche je en comprends pas pourquoi tu dois le faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev je réimporte mes tables ts les jours
-----Message d'origine-----
Bonjour,
En revanche je en comprends pas pourquoi tu dois le
faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui
le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev
je réimporte mes tables ts les jours
-----Message d'origine----- Bonjour, En revanche je en comprends pas pourquoi tu dois le faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev je réimporte mes tables ts les jours
Gafish
Je dis peut-être une bétise, mais au travers du lien odbc qui est fourni avec windev tu n'as pas moyen d'importer que les données du jour passé par une requête ? Ce serait peut être plus simple
a écrit dans le message news: 24fe01c503c0$aefda5f0$
-----Message d'origine----- Bonjour, En revanche je en comprends pas pourquoi tu dois le faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev je réimporte mes tables ts les jours
Je dis peut-être une bétise, mais au travers du lien odbc qui est fourni
avec windev tu n'as pas moyen d'importer que les données du jour passé par
une requête ? Ce serait peut être plus simple
<anonymous@discussions.microsoft.com> a écrit dans le message news:
24fe01c503c0$aefda5f0$a501280a@phx.gbl...
-----Message d'origine-----
Bonjour,
En revanche je en comprends pas pourquoi tu dois le
faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui
le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev
je réimporte mes tables ts les jours
Je dis peut-être une bétise, mais au travers du lien odbc qui est fourni avec windev tu n'as pas moyen d'importer que les données du jour passé par une requête ? Ce serait peut être plus simple
a écrit dans le message news: 24fe01c503c0$aefda5f0$
-----Message d'origine----- Bonjour, En revanche je en comprends pas pourquoi tu dois le faire tous les jours ?
Tu supprimes et tu réimportes à chaque fois ?
oui le temps de mettre l'interface access au point
on interroge avec access et mon modifie avec windev je réimporte mes tables ts les jours
Je ne suis pas trop calée sur les requêtes et il ne s'agit pas de simples ajouts.
Or créer des requêtes qui interrogent toutes les tables (il y en a 50) quand à la possibilité de voir une modification ... me semble beaucoup plus hazardeux que de supprimer les relations, réimporter mes tables toutes fraiches, et les recréer , ça prends 2 minutes via macro.
Je joue d'abord la prudence. Avec mes petites connaissances. merci
Ranette :-)
-----Message d'origine----- Je dis peut-être une bétise, mais au travers du lien odbc qui est fourni
avec windev tu n'as pas moyen d'importer que les données du jour passé par
une requête ? Ce serait peut être plus simple
Je ne suis pas trop calée sur les requêtes et il ne
s'agit pas de simples ajouts.
Or créer des requêtes qui interrogent toutes les tables
(il y en a 50) quand à la possibilité de voir une
modification ... me semble beaucoup plus hazardeux que de
supprimer les relations, réimporter mes tables toutes
fraiches, et les recréer , ça prends 2 minutes via macro.
Je joue d'abord la prudence.
Avec mes petites connaissances.
merci
Ranette :-)
-----Message d'origine-----
Je dis peut-être une bétise, mais au travers du lien
odbc qui est fourni
avec windev tu n'as pas moyen d'importer que les données
du jour passé par
Je ne suis pas trop calée sur les requêtes et il ne s'agit pas de simples ajouts.
Or créer des requêtes qui interrogent toutes les tables (il y en a 50) quand à la possibilité de voir une modification ... me semble beaucoup plus hazardeux que de supprimer les relations, réimporter mes tables toutes fraiches, et les recréer , ça prends 2 minutes via macro.
Je joue d'abord la prudence. Avec mes petites connaissances. merci
Ranette :-)
-----Message d'origine----- Je dis peut-être une bétise, mais au travers du lien odbc qui est fourni
avec windev tu n'as pas moyen d'importer que les données du jour passé par