Spostare files

Article View: free.it.visual-basic

Article #1392

Back to free.it.visual-basic Previous Next

#1392

From: alexia
Date: Fri, 28 May 2004 07:14

15 lines
1380 bytes

Ciao a tutti ho un problema :vorrei spostare dei files da una cartella ad
un'altra,
ho provato ad usare questa istruzione ma mi da un errore '53'.
La cosa strana e' che nonostante l'errore il file me lo sposta ugualmente.
C'e' qualcuno che mi sa aiutare?
Grazie a tutti.
------------------------------
Dim FileObject
Dim origine, destinazione
origine = ("c:\windows\desktop\files\" + (nomefile))
destinazione = ("c:\windows\desktop\uguali\" + (nomefile))
Set FileObject = CreateObject("Scripting.FileSystemObject")
FileObject.MoveFile origine, destinazione

------------------------------------

Technical Details

Message-ID: <40b6e74d@x-privat.org>

Path: arc1-ca.pugleaf.net!controlnews3.google.com!news1.google.com!news.glorb.com!news.moat.net!x-privat.org!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ITALIAN,ASCII-7-bit
X-Google-Thread: f94ee,6aadba15318ba182,start
X-Google-Attributes: gidf94ee,public
From: "alexia" <olella@libero.it>
Newsgroups: free.it.visual-basic
Subject: Spostare files
Date: Fri, 28 May 2004 09:14:50 +0200
Lines: 17
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1409
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1409
NNTP-Posting-Host: 82.185.97.218
Message-ID: <40b6e74d@x-privat.org>
X-Trace: x-privat.org 1085728589 82.185.97.218 (28 May 2004 09:16:29 +0200)
Organization: X-Privat NNTP Server - www.x-privat.org
X-Complaints-To: abuse@x-privat.org
Path: arc1-ca.pugleaf.net!controlnews3.google.com!news1.google.com!news.glorb.com!news.moat.net!x-privat.org!not-for-mail