Je cherche un moyen de récupérer le script de création d'une table sous
access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous
access permettant cela. Le cas échéant si vous connaissez un programme ou un
bout de code permettant d'arriver au même résultat.
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
Eric
Bonjour Nicolas,
Sous réserve d'avoir bien compris la question ;-)
1 - Charger un script de création de table initialement créé sous SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String) Dim strSQL As String Dim f As Integer Dim chemin As String chemin = CurrentProject.Path ' à modifier si nécessaire f = FreeFile Open chemin & "" & NomFich For Input As f strSQL = Input(LOF(f), f) Close f DoCmd.RunSQL strSQL End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous Access.
Sub zz2(NomRequete As String) Dim strSQL As String strSQL = CurrentDb.QueryDefs(NomRequete).SQL MsgBox strSQL End Sub
Je cherche un moyen de récupérer le script de création d'une table sous access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous access permettant cela. Le cas échéant si vous connaissez un programme ou un bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour Nicolas,
Sous réserve d'avoir bien compris la question ;-)
1 - Charger un script de création de table initialement créé sous
SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour
extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String)
Dim strSQL As String
Dim f As Integer
Dim chemin As String
chemin = CurrentProject.Path ' à modifier si nécessaire
f = FreeFile
Open chemin & "" & NomFich For Input As f
strSQL = Input(LOF(f), f)
Close f
DoCmd.RunSQL strSQL
End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous
Access.
Sub zz2(NomRequete As String)
Dim strSQL As String
strSQL = CurrentDb.QueryDefs(NomRequete).SQL
MsgBox strSQL
End Sub
Je cherche un moyen de récupérer le script de création d'une table sous
access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous
access permettant cela. Le cas échéant si vous connaissez un programme ou un
bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
1 - Charger un script de création de table initialement créé sous SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String) Dim strSQL As String Dim f As Integer Dim chemin As String chemin = CurrentProject.Path ' à modifier si nécessaire f = FreeFile Open chemin & "" & NomFich For Input As f strSQL = Input(LOF(f), f) Close f DoCmd.RunSQL strSQL End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous Access.
Sub zz2(NomRequete As String) Dim strSQL As String strSQL = CurrentDb.QueryDefs(NomRequete).SQL MsgBox strSQL End Sub
Je cherche un moyen de récupérer le script de création d'une table sous access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous access permettant cela. Le cas échéant si vous connaissez un programme ou un bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Nicolas
Bonjour,
Merci tout d'abord pour ta réponse mais en fait je crois que ce n'est pas tout à fait cela que je recherche, je vais formuler autrement :
Mettons que j'ai une base propriétaire SAGE, laquelle contient entre autres tables, la table F_ARTICLE. Une fois sous Access je me crée une liaison à cette table via le driver ODBC SAGE et celle ci apparait alors comme convenu avec son petit globe terrestre devant. A présent je souhaiterais générer le code permettant de créer la définition de cette table (de manière à pouvoir la récréer dans un autre environnement). Je précise par ailleurs que cela doit être indépendant de SQL Server, que je ne possède pas.
En espérant avoir plus clair dans mes explications cette fois ci.
Merci d'avance
Nicolas
-- Nicolas
"Eric" wrote:
Bonjour Nicolas,
Sous réserve d'avoir bien compris la question ;-)
1 - Charger un script de création de table initialement créé sous SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String) Dim strSQL As String Dim f As Integer Dim chemin As String chemin = CurrentProject.Path ' à modifier si nécessaire f = FreeFile Open chemin & "" & NomFich For Input As f strSQL = Input(LOF(f), f) Close f DoCmd.RunSQL strSQL End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous Access.
Sub zz2(NomRequete As String) Dim strSQL As String strSQL = CurrentDb.QueryDefs(NomRequete).SQL MsgBox strSQL End Sub
Je cherche un moyen de récupérer le script de création d'une table sous access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous access permettant cela. Le cas échéant si vous connaissez un programme ou un bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Merci tout d'abord pour ta réponse mais en fait je crois que ce n'est pas
tout à fait cela que je recherche, je vais formuler autrement :
Mettons que j'ai une base propriétaire SAGE, laquelle contient entre autres
tables, la table F_ARTICLE. Une fois sous Access je me crée une liaison à
cette table via le driver ODBC SAGE et celle ci apparait alors comme convenu
avec son petit globe terrestre devant. A présent je souhaiterais générer le
code permettant de créer la définition de cette table (de manière à pouvoir
la récréer dans un autre environnement). Je précise par ailleurs que cela
doit être indépendant de SQL Server, que je ne possède pas.
En espérant avoir plus clair dans mes explications cette fois ci.
Merci d'avance
Nicolas
--
Nicolas
"Eric" wrote:
Bonjour Nicolas,
Sous réserve d'avoir bien compris la question ;-)
1 - Charger un script de création de table initialement créé sous
SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour
extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String)
Dim strSQL As String
Dim f As Integer
Dim chemin As String
chemin = CurrentProject.Path ' à modifier si nécessaire
f = FreeFile
Open chemin & "" & NomFich For Input As f
strSQL = Input(LOF(f), f)
Close f
DoCmd.RunSQL strSQL
End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous
Access.
Sub zz2(NomRequete As String)
Dim strSQL As String
strSQL = CurrentDb.QueryDefs(NomRequete).SQL
MsgBox strSQL
End Sub
Je cherche un moyen de récupérer le script de création d'une table sous
access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous
access permettant cela. Le cas échéant si vous connaissez un programme ou un
bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Merci tout d'abord pour ta réponse mais en fait je crois que ce n'est pas tout à fait cela que je recherche, je vais formuler autrement :
Mettons que j'ai une base propriétaire SAGE, laquelle contient entre autres tables, la table F_ARTICLE. Une fois sous Access je me crée une liaison à cette table via le driver ODBC SAGE et celle ci apparait alors comme convenu avec son petit globe terrestre devant. A présent je souhaiterais générer le code permettant de créer la définition de cette table (de manière à pouvoir la récréer dans un autre environnement). Je précise par ailleurs que cela doit être indépendant de SQL Server, que je ne possède pas.
En espérant avoir plus clair dans mes explications cette fois ci.
Merci d'avance
Nicolas
-- Nicolas
"Eric" wrote:
Bonjour Nicolas,
Sous réserve d'avoir bien compris la question ;-)
1 - Charger un script de création de table initialement créé sous SQLServer par exemple et l'exécuter. (Il s'agit de fichiers ayant pour extension .sql et ce sont des fichiers Texte.)
Sub zz(NomFich As String) Dim strSQL As String Dim f As Integer Dim chemin As String chemin = CurrentProject.Path ' à modifier si nécessaire f = FreeFile Open chemin & "" & NomFich For Input As f strSQL = Input(LOF(f), f) Close f DoCmd.RunSQL strSQL End Sub
La procédure est appelée par Call zz("CreateTable.sql") par exemple
OU
2 - Récupérer le sql d'une requête Création de table, requête crée sous Access.
Sub zz2(NomRequete As String) Dim strSQL As String strSQL = CurrentDb.QueryDefs(NomRequete).SQL MsgBox strSQL End Sub
Je cherche un moyen de récupérer le script de création d'une table sous access (ex : CREATE TABLE Employés ( ... )), y'a t il une fonction sous access permettant cela. Le cas échéant si vous connaissez un programme ou un bout de code permettant d'arriver au même résultat.
Merci infiniment et bonne prog à tous !
-- A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
