voila je voudrais copier un fichier qui ce trouver sur le disque
ceu fichier et appeler par la base
et par un bouton je voudrais le renomer et le copier dans un autre
repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant
Dim ai As Variant
Dim bc As Variant
ia = Me.NomImage1
ai = "c:\dossiertemp\"
bb = ".jpg"
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "\" & Me!NomImage1
msgbox strChemin & "\" & Me.IdProduit
msgbox ai
bc = ai & Me.IdProduit & bb
FileSystemObject.CopyFile strChemin, bc
msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc
erreure 424 objet requi alors que je suis sur de l'emplacement de strchemin.
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
yann
Au fait bonjour a tous
"yann" a écrit dans le message de news: 4035c425$0$21665$
voila je voudrais copier un fichier qui ce trouver sur le disque ceu fichier et appeler par la base et par un bouton je voudrais le renomer et le copier dans un autre repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant Dim ai As Variant Dim bc As Variant ia = Me.NomImage1 ai = "c:dossiertemp" bb = ".jpg" strQuoi = DLookup("repertoire", "[Informations sur ma société]") strChemin = strQuoi & "" & Me!NomImage1 msgbox strChemin & "" & Me.IdProduit msgbox ai bc = ai & Me.IdProduit & bb FileSystemObject.CopyFile strChemin, bc msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc erreure 424 objet requi alors que je suis sur de l'emplacement de strchemin.
Au fait bonjour a tous
"yann" <yann.rhibaud@free.fr> a écrit dans le message de news:
4035c425$0$21665$636a15ce@news.free.fr...
voila je voudrais copier un fichier qui ce trouver sur le disque
ceu fichier et appeler par la base
et par un bouton je voudrais le renomer et le copier dans un autre
repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant
Dim ai As Variant
Dim bc As Variant
ia = Me.NomImage1
ai = "c:dossiertemp"
bb = ".jpg"
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & Me!NomImage1
msgbox strChemin & "" & Me.IdProduit
msgbox ai
bc = ai & Me.IdProduit & bb
FileSystemObject.CopyFile strChemin, bc
msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc
erreure 424 objet requi alors que je suis sur de l'emplacement de
strchemin.
"yann" a écrit dans le message de news: 4035c425$0$21665$
voila je voudrais copier un fichier qui ce trouver sur le disque ceu fichier et appeler par la base et par un bouton je voudrais le renomer et le copier dans un autre repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant Dim ai As Variant Dim bc As Variant ia = Me.NomImage1 ai = "c:dossiertemp" bb = ".jpg" strQuoi = DLookup("repertoire", "[Informations sur ma société]") strChemin = strQuoi & "" & Me!NomImage1 msgbox strChemin & "" & Me.IdProduit msgbox ai bc = ai & Me.IdProduit & bb FileSystemObject.CopyFile strChemin, bc msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc erreure 424 objet requi alors que je suis sur de l'emplacement de strchemin.
yann
ji suis arriver
avec un filecopy tous simplement
"yann" a écrit dans le message de news: 4035c481$0$21657$
Au fait bonjour a tous
"yann" a écrit dans le message de news: 4035c425$0$21665$
voila je voudrais copier un fichier qui ce trouver sur le disque ceu fichier et appeler par la base et par un bouton je voudrais le renomer et le copier dans un autre repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant Dim ai As Variant Dim bc As Variant ia = Me.NomImage1 ai = "c:dossiertemp" bb = ".jpg" strQuoi = DLookup("repertoire", "[Informations sur ma société]") strChemin = strQuoi & "" & Me!NomImage1 msgbox strChemin & "" & Me.IdProduit msgbox ai bc = ai & Me.IdProduit & bb FileSystemObject.CopyFile strChemin, bc msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc erreure 424 objet requi alors que je suis sur de l'emplacement de strchemin.
ji suis arriver
avec un filecopy tous simplement
"yann" <yann.rhibaud@free.fr> a écrit dans le message de news:
4035c481$0$21657$636a15ce@news.free.fr...
Au fait bonjour a tous
"yann" <yann.rhibaud@free.fr> a écrit dans le message de news:
4035c425$0$21665$636a15ce@news.free.fr...
voila je voudrais copier un fichier qui ce trouver sur le disque
ceu fichier et appeler par la base
et par un bouton je voudrais le renomer et le copier dans un autre
repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant
Dim ai As Variant
Dim bc As Variant
ia = Me.NomImage1
ai = "c:dossiertemp"
bb = ".jpg"
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & Me!NomImage1
msgbox strChemin & "" & Me.IdProduit
msgbox ai
bc = ai & Me.IdProduit & bb
FileSystemObject.CopyFile strChemin, bc
msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc
erreure 424 objet requi alors que je suis sur de l'emplacement de
strchemin.
"yann" a écrit dans le message de news: 4035c481$0$21657$
Au fait bonjour a tous
"yann" a écrit dans le message de news: 4035c425$0$21665$
voila je voudrais copier un fichier qui ce trouver sur le disque ceu fichier et appeler par la base et par un bouton je voudrais le renomer et le copier dans un autre repertoire du disque
voila mon code qui marche qu'a moitier
Dim ia As Variant Dim ai As Variant Dim bc As Variant ia = Me.NomImage1 ai = "c:dossiertemp" bb = ".jpg" strQuoi = DLookup("repertoire", "[Informations sur ma société]") strChemin = strQuoi & "" & Me!NomImage1 msgbox strChemin & "" & Me.IdProduit msgbox ai bc = ai & Me.IdProduit & bb FileSystemObject.CopyFile strChemin, bc msgbox bc
mais il me fais une erreure sur FileSystemObject.CopyFile strChemin, bc erreure 424 objet requi alors que je suis sur de l'emplacement de strchemin.
