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
Raymond [mvp]
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
D'avance merci
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence
Microsoft scripting Runtime.
des exemples se trouvent sur les pages :
http://access.seneque.free.fr/filesystemobjects.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" <frisque@datamovers.be> a écrit dans le message de news:
uS4F6xL0EHA.1296@TK2MSFTNGP10.phx.gbl...
Le help donne le code suivant : (A2k)
FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb",
"c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ?
(j'ai à peu près tout essayé ..)
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
D'avance merci
Bruno Frisque
Tout grand merci. Je vais rapidement essayer tout çà Merci encore
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
D'avance merci
Tout grand merci.
Je vais rapidement essayer tout çà
Merci encore
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:etCpmbM0EHA.1408@TK2MSFTNGP10.phx.gbl...
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence
Microsoft scripting Runtime.
des exemples se trouvent sur les pages :
http://access.seneque.free.fr/filesystemobjects.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" <frisque@datamovers.be> a écrit dans le message de news:
uS4F6xL0EHA.1296@TK2MSFTNGP10.phx.gbl...
Le help donne le code suivant : (A2k)
FileSystemObject.CopyFile "c:mydocumentsletters*.doc",
"c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb",
"c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ?
(j'ai à peu près tout essayé ..)
Tout grand merci. Je vais rapidement essayer tout çà Merci encore
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject Dim Fso_File As File FileCopy = False Debug.Print "passing function FileCopy" If Not fso.FileExists(PathName) Then Exit Function If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit Function Set Fso_File = fso.GetFile(PathName) Fso_File.Copy NewPathName, OverWrite FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb", "c:dataMyDB_ET.mdb" End Function
Mais rien ne se passe .... (la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional
OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject
Dim Fso_File As File
FileCopy = False
Debug.Print "passing function FileCopy"
If Not fso.FileExists(PathName) Then Exit Function
If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit Function
Set Fso_File = fso.GetFile(PathName)
Fso_File.Copy NewPathName, OverWrite
FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb",
"c:dataMyDB_ET.mdb"
End Function
Mais rien ne se passe ....
(la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:etCpmbM0EHA.1408@TK2MSFTNGP10.phx.gbl...
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence
Microsoft scripting Runtime.
des exemples se trouvent sur les pages :
http://access.seneque.free.fr/filesystemobjects.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" <frisque@datamovers.be> a écrit dans le message de news:
uS4F6xL0EHA.1296@TK2MSFTNGP10.phx.gbl...
Le help donne le code suivant : (A2k)
FileSystemObject.CopyFile "c:mydocumentsletters*.doc",
"c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb",
"c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ?
(j'ai à peu près tout essayé ..)
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject Dim Fso_File As File FileCopy = False Debug.Print "passing function FileCopy" If Not fso.FileExists(PathName) Then Exit Function If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit Function Set Fso_File = fso.GetFile(PathName) Fso_File.Copy NewPathName, OverWrite FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb", "c:dataMyDB_ET.mdb" End Function
Mais rien ne se passe .... (la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
D'avance merci
Bruno Frisque
SORRY SORRY !!! J'avais simplement mis un mauvais nom de fichier ...... avec MsgBox FileCopy("c:dataEtrangers_BE.mdb", "c:datacopyEtrangers.mdb", il affiche TRUE et copie le fichier !!
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject Dim Fso_File As File FileCopy = False Debug.Print "passing function FileCopy" If Not fso.FileExists(PathName) Then Exit Function If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit Function
Set Fso_File = fso.GetFile(PathName) Fso_File.Copy NewPathName, OverWrite FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb", "c:dataMyDB_ET.mdb" End Function
Mais rien ne se passe .... (la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence
Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)
D'avance merci
SORRY SORRY !!!
J'avais simplement mis un mauvais nom de fichier ......
avec
MsgBox FileCopy("c:dataEtrangers_BE.mdb", "c:datacopyEtrangers.mdb",
il affiche TRUE et copie le fichier !!
Tout grand merci Raymond !
"Bruno Frisque" <frisque@datamovers.be> wrote in message
news:OnDTNPv0EHA.2568@TK2MSFTNGP11.phx.gbl...
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional
OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject
Dim Fso_File As File
FileCopy = False
Debug.Print "passing function FileCopy"
If Not fso.FileExists(PathName) Then Exit Function
If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit
Function
Set Fso_File = fso.GetFile(PathName)
Fso_File.Copy NewPathName, OverWrite
FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb",
"c:dataMyDB_ET.mdb"
End Function
Mais rien ne se passe ....
(la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:etCpmbM0EHA.1408@TK2MSFTNGP10.phx.gbl...
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la
référence
Microsoft scripting Runtime.
des exemples se trouvent sur les pages :
http://access.seneque.free.fr/filesystemobjects.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" <frisque@datamovers.be> a écrit dans le message de news:
uS4F6xL0EHA.1296@TK2MSFTNGP10.phx.gbl...
Le help donne le code suivant : (A2k)
FileSystemObject.CopyFile "c:mydocumentsletters*.doc",
"c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb",
"c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable
not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ?
(j'ai à peu près tout essayé ..)
SORRY SORRY !!! J'avais simplement mis un mauvais nom de fichier ...... avec MsgBox FileCopy("c:dataEtrangers_BE.mdb", "c:datacopyEtrangers.mdb", il affiche TRUE et copie le fichier !!
En cliquant le bouton le message apparait en disant 'false'
Dans un nouveau Mod1 j'ai mis :
Function FileCopy(PathName As String, NewPathName As String, Optional OverWrite As Boolean = True) As Boolean
Dim fso As New FileSystemObject Dim Fso_File As File FileCopy = False Debug.Print "passing function FileCopy" If Not fso.FileExists(PathName) Then Exit Function If (fso.FileExists(NewPathName)) And (Not OverWrite) Then Exit Function
Set Fso_File = fso.GetFile(PathName) Fso_File.Copy NewPathName, OverWrite FileCopy = True
'FileSystemObject.CopyFile "c:datala lEtrangers.mdb", "c:dataMyDB_ET.mdb" End Function
Mais rien ne se passe .... (la ref MS scripting runtime est bien cochée)
Un petit coup de pouce serait génial.
D'avance tout grand merci.
"Raymond [mvp]" wrote in message news:
Bonsoir.
Il faut déclarer un objet FileSystemObject après avoir coché la référence
Microsoft scripting Runtime. des exemples se trouvent sur les pages : http://access.seneque.free.fr/filesystemobjects.htm -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Bruno Frisque" a écrit dans le message de news:
Le help donne le code suivant : (A2k) FileSystemObject.CopyFile "c:mydocumentsletters*.doc", "c:tempfolder"
J'ai donc fait : FileSystemObject.CopyFile "c:dataMonFichier.mdb", "c:dataMaCopie.mdb"
Quand on compile il surligne FileSystemObject avec erreur 'Variable not
defined' ....
Que faut-il mettre à la place de FileSystemObject ?? avant copyfile ? (j'ai à peu près tout essayé ..)