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
3stone
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access | externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
"Bob"
| Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application
accObj.OpenCurrentDatabase "CheminCompletDeLaBase"
accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable"
accObj.CloseCurrentDatabase
Set accObj = Nothing
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access | externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access | externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
En fait je te confirme que ça marche, j'ai un code similaire que je
n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$)
'** intType : 0 pour table, 1 pour requête, 2 pour formulaire
'** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.DeleteObject intType, strObject
.CloseCurrentDatabase
End With
acApp.Quit: Set acApp = Nothing
End Function
--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"3stone" <spam@spam> a écrit dans le message news:
OFcR1L38EHA.3596@TK2MSFTNGP12.phx.gbl...
Salut,
"Bob"
| Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application
accObj.OpenCurrentDatabase "CheminCompletDeLaBase"
accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable"
accObj.CloseCurrentDatabase
Set accObj = Nothing
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access | externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
"Jessy Sempere [MVP]" a écrit dans le message de news: 41dcecd5$
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
"Jessy Sempere [MVP]" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news: 41dcecd5$1@news.sncf.fr...
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je
n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$)
'** intType : 0 pour table, 1 pour requête, 2 pour formulaire
'** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.DeleteObject intType, strObject
.CloseCurrentDatabase
End With
acApp.Quit: Set acApp = Nothing
End Function
--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"3stone" <spam@spam> a écrit dans le message news:
OFcR1L38EHA.3596@TK2MSFTNGP12.phx.gbl...
Salut,
"Bob"
| Comment peut-on faire pour effacer une table d'une base de donnée
access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application
accObj.OpenCurrentDatabase "CheminCompletDeLaBase"
accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable"
accObj.CloseCurrentDatabase
Set accObj = Nothing
"Jessy Sempere [MVP]" a écrit dans le message de news: 41dcecd5$
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
Salut, J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer est lié. Comment faire pour forcer l'effacement de la table en question. D'avance merci
"Bob" a écrit dans le message de news: 41ddae13$0$3533$
merci
"Jessy Sempere [MVP]" a écrit dans le message de
news: 41dcecd5$
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
Salut,
J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer
est lié.
Comment faire pour forcer l'effacement de la table en question.
D'avance merci
"Bob" <bob.zimm@free.fr> a écrit dans le message de news:
41ddae13$0$3533$8fcfb975@news.wanadoo.fr...
merci
"Jessy Sempere [MVP]" <jessy.sempere@prg.sncf.fr> a écrit dans le message
de
news: 41dcecd5$1@news.sncf.fr...
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je
n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$)
'** intType : 0 pour table, 1 pour requête, 2 pour formulaire
'** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.DeleteObject intType, strObject
.CloseCurrentDatabase
End With
acApp.Quit: Set acApp = Nothing
End Function
--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"3stone" <spam@spam> a écrit dans le message news:
OFcR1L38EHA.3596@TK2MSFTNGP12.phx.gbl...
Salut,
"Bob"
| Comment peut-on faire pour effacer une table d'une base de donnée
access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application
accObj.OpenCurrentDatabase "CheminCompletDeLaBase"
accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable"
accObj.CloseCurrentDatabase
Set accObj = Nothing
Salut, J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer est lié. Comment faire pour forcer l'effacement de la table en question. D'avance merci
"Bob" a écrit dans le message de news: 41ddae13$0$3533$
merci
"Jessy Sempere [MVP]" a écrit dans le message de
news: 41dcecd5$
Bonjour
En fait je te confirme que ça marche, j'ai un code similaire que je n'ai pas encore mis sur mon site :
Public Function DeleteObjectExterne(strDb$, intType%, strObject$) '** intType : 0 pour table, 1 pour requête, 2 pour formulaire '** 3 pour état, 4 pour macro et 5 pour module
Dim acApp As Object Set acApp = CreateObject("Access.Application")
With acApp .OpenCurrentDatabase strDb .DoCmd.DeleteObject intType, strObject .CloseCurrentDatabase End With acApp.Quit: Set acApp = Nothing End Function
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "3stone" a écrit dans le message news:
Salut,
"Bob" | Comment peut-on faire pour effacer une table d'une base de donnée access
| externe (se trouvant dans un autre répertoire)?
Pas testé, mais ca devrait le faire...
Dim accObj As New Access.Application accObj.OpenCurrentDatabase "CheminCompletDeLaBase" accObj.DoCmd.DeleteObject acTable, "LeNomDeLaTable" accObj.CloseCurrentDatabase Set accObj = Nothing
"Bob" | J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer | est lié. | Comment faire pour forcer l'effacement de la table en question.
"Bob"
| J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer
| est lié.
| Comment faire pour forcer l'effacement de la table en question.
"Bob" | J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer | est lié. | Comment faire pour forcer l'effacement de la table en question.
Que veux-tu dire de la supprimer d'abord dans la base en cours? La table que je souhaite effacer n'est pas dans la base en cours mais dans une base externe As-tu une solution?
"3stone" a écrit dans le message de news:
Salut,
"Bob" | J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer
| est lié. | Comment faire pour forcer l'effacement de la table en question.
Que veux-tu dire de la supprimer d'abord dans la base en cours?
La table que je souhaite effacer n'est pas dans la base en cours mais dans
une base externe
As-tu une solution?
"3stone" <spam@spam> a écrit dans le message de news:
enZriA99EHA.2568@TK2MSFTNGP10.phx.gbl...
Salut,
"Bob"
| J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à
effacer
| est lié.
| Comment faire pour forcer l'effacement de la table en question.
Que veux-tu dire de la supprimer d'abord dans la base en cours? La table que je souhaite effacer n'est pas dans la base en cours mais dans une base externe As-tu une solution?
"3stone" a écrit dans le message de news:
Salut,
"Bob" | J'ai testé le code ci-dessous ca fonctionne, sauf quand la table à effacer
| est lié. | Comment faire pour forcer l'effacement de la table en question.
"Bob" | Que veux-tu dire de la supprimer d'abord dans la base en cours? | La table que je souhaite effacer n'est pas dans la base en cours mais dans | une base externe
oui, mais lorsque cette table est liée, tu retrouve son "image" dans la base en cours !
"Bob"
| Que veux-tu dire de la supprimer d'abord dans la base en cours?
| La table que je souhaite effacer n'est pas dans la base en cours mais dans
| une base externe
oui, mais lorsque cette table est liée, tu retrouve son "image" dans la base en cours !
"Bob" | Que veux-tu dire de la supprimer d'abord dans la base en cours? | La table que je souhaite effacer n'est pas dans la base en cours mais dans | une base externe
oui, mais lorsque cette table est liée, tu retrouve son "image" dans la base en cours !
