Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:\baseAccess\Copie de
AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:\baseAccess
En partant de ça comment voir si c:\baseAccess\Copie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
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
Patrice
bonjour,
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then else delete endif
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
bonjour,
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then
else
delete
endif
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de
AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then else delete endif
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Pierre CFI [mvp]
bonjour if dir("c:baseAccessCopie de AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de AstucesBDr.mdb" ou plus radical On error resume next kill "c:baseAccessCopie de AstucesBDr.mdb" si le fichier n'existe pas erreur, mais on passe outre
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"Guy FALESSE" a écrit dans le message de news: OsQ9Uo%
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
bonjour
if dir("c:baseAccessCopie de
AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de
AstucesBDr.mdb"
ou plus radical
On error resume next
kill "c:baseAccessCopie de AstucesBDr.mdb"
si le fichier n'existe pas erreur, mais on passe outre
--
Pierre CFI
MVP Microsoft Access
Site pour bien commencer
Access http://www.mpfa.info
"Guy FALESSE" <guy.falesse@skynet.be> a écrit dans le message de news: OsQ9Uo%23gGHA.4892@TK2MSFTNGP02.phx.gbl...
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
bonjour if dir("c:baseAccessCopie de AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de AstucesBDr.mdb" ou plus radical On error resume next kill "c:baseAccessCopie de AstucesBDr.mdb" si le fichier n'existe pas erreur, mais on passe outre
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"Guy FALESSE" a écrit dans le message de news: OsQ9Uo%
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Guy FALESSE
Salut Patrice,
Merci beaucoup, c'est ce que je cherchais en vain, me reste plus qu'à trouver la syntaxe exacte pour delete, en principe, je devrais trouver :-) Encore merci @+
Guy FALESSE
"Patrice" a écrit dans le message de news:
bonjour,
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then else delete endif
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Salut Patrice,
Merci beaucoup, c'est ce que je cherchais en vain, me reste plus qu'à
trouver la syntaxe exacte pour delete, en principe, je devrais trouver :-)
Encore merci
@+
Guy FALESSE
"Patrice" <Patrice@discussions.microsoft.com> a écrit dans le message de
news: 0A578B60-C4F9-4E96-831B-A5CD0FD53E2F@microsoft.com...
bonjour,
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then
else
delete
endif
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie
de
AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
Merci beaucoup, c'est ce que je cherchais en vain, me reste plus qu'à trouver la syntaxe exacte pour delete, en principe, je devrais trouver :-) Encore merci @+
Guy FALESSE
"Patrice" a écrit dans le message de news:
bonjour,
if dir(fCurrentDBDir & "Copie de AstucesBDr.mdb"="" then else delete endif
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
welcome
Bonjour Guy; pour trouver un fichier je crois qu'utiliser desktop de google est une bonne initiative! pour le télécharger ; voici le lien :
http://desktop.google.com/ et pour en savoir plus : http://desktop.google.com/fr/about.html bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Bonjour Guy;
pour trouver un fichier je crois qu'utiliser desktop de google est une
bonne initiative!
pour le télécharger ; voici le lien :
http://desktop.google.com/
et pour en savoir plus :
http://desktop.google.com/fr/about.html
bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de
AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
Bonjour Guy; pour trouver un fichier je crois qu'utiliser desktop de google est une bonne initiative! pour le télécharger ; voici le lien :
http://desktop.google.com/ et pour en savoir plus : http://desktop.google.com/fr/about.html bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Guy FALESSE
Salut Pierre,
Merci beaucoup, c'est exactement ce que je cherchais aussi. @+
Guy FALESSE
"Pierre CFI [mvp]" a écrit dans le message de news: OxGPT8%
bonjour if dir("c:baseAccessCopie de AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de AstucesBDr.mdb" ou plus radical On error resume next kill "c:baseAccessCopie de AstucesBDr.mdb" si le fichier n'existe pas erreur, mais on passe outre
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"Guy FALESSE" a écrit dans le message de news: OsQ9Uo%
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Salut Pierre,
Merci beaucoup, c'est exactement ce que je cherchais aussi.
@+
Guy FALESSE
"Pierre CFI [mvp]" <XXX_pierresalaun@wanadoo.fr> a écrit dans le message de
news: OxGPT8%23gGHA.1864@TK2MSFTNGP02.phx.gbl...
bonjour
if dir("c:baseAccessCopie de
AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de
AstucesBDr.mdb"
ou plus radical
On error resume next
kill "c:baseAccessCopie de AstucesBDr.mdb"
si le fichier n'existe pas erreur, mais on passe outre
--
Pierre CFI
MVP Microsoft Access
Site pour bien commencer
Access http://www.mpfa.info
"Guy FALESSE" <guy.falesse@skynet.be> a écrit dans le message de news:
OsQ9Uo%23gGHA.4892@TK2MSFTNGP02.phx.gbl...
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie
de AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
Merci beaucoup, c'est exactement ce que je cherchais aussi. @+
Guy FALESSE
"Pierre CFI [mvp]" a écrit dans le message de news: OxGPT8%
bonjour if dir("c:baseAccessCopie de AstucesBDr.mdb") <> "" then kill "c:baseAccessCopie de AstucesBDr.mdb" ou plus radical On error resume next kill "c:baseAccessCopie de AstucesBDr.mdb" si le fichier n'existe pas erreur, mais on passe outre
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"Guy FALESSE" a écrit dans le message de news: OsQ9Uo%
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Guy FALESSE
Salut Welcome, Oui, bien sûr, excellent outil que j'utilise d'ailleurs, mais le but du jeu était de retrouver le fichier par visual basic dans Access :-) Mais merci tout de même.:-)
@+
Guy FALESSE
"welcome" a écrit dans le message de news:
Bonjour Guy; pour trouver un fichier je crois qu'utiliser desktop de google est une bonne initiative! pour le télécharger ; voici le lien :
http://desktop.google.com/ et pour en savoir plus : http://desktop.google.com/fr/about.html bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+
Guy FALESSE
Salut Welcome,
Oui, bien sûr, excellent outil que j'utilise d'ailleurs, mais le but du jeu
était de retrouver le fichier par visual basic dans Access :-)
Mais merci tout de même.:-)
@+
Guy FALESSE
"welcome" <ass3di@gmail.com> a écrit dans le message de news:
1148998502.523289.182980@g10g2000cwb.googlegroups.com...
Bonjour Guy;
pour trouver un fichier je crois qu'utiliser desktop de google est une
bonne initiative!
pour le télécharger ; voici le lien :
http://desktop.google.com/
et pour en savoir plus :
http://desktop.google.com/fr/about.html
bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-(
J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie
de
AstucesBDr.mdb
(une partie de ce code vient de Dev Ashich)
J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me
donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb
existe et s'il existe, le supprimer.
J'ai essayé avec Right, left, instr etc maus rien ne va.
Evidemment, on peut supprimer ce fichier "à la main"
D'avance merci à celles ou ceux qui me dépanneraient.
@+
Salut Welcome, Oui, bien sûr, excellent outil que j'utilise d'ailleurs, mais le but du jeu était de retrouver le fichier par visual basic dans Access :-) Mais merci tout de même.:-)
@+
Guy FALESSE
"welcome" a écrit dans le message de news:
Bonjour Guy; pour trouver un fichier je crois qu'utiliser desktop de google est une bonne initiative! pour le télécharger ; voici le lien :
http://desktop.google.com/ et pour en savoir plus : http://desktop.google.com/fr/about.html bonne chance.
Guy FALESSE wrote:
Bonjour à tous,
Je patauge lamentablement :-( J'essaye de retrouver un fichier qui porte le nom de c:baseAccessCopie de AstucesBDr.mdb (une partie de ce code vient de Dev Ashich) J'ai fait ceci:
Dim strDBPath As String, strDBPath As String, strDBFile As String
fCurrentDBDir = Left(strDBPath, InStr(strDBPath, strDBFile) - 1) me donne c:baseAccess
En partant de ça comment voir si c:baseAccessCopie de AstucesBDr.mdb existe et s'il existe, le supprimer. J'ai essayé avec Right, left, instr etc maus rien ne va. Evidemment, on peut supprimer ce fichier "à la main" D'avance merci à celles ou ceux qui me dépanneraient. @+