Article View: pl.comp.lang.vbasic
Article #92386Re: kopiowanie pliku
From: Robert Wojtczak
Date: Tue, 25 Oct 2005 09:28
Date: Tue, 25 Oct 2005 09:28
46 lines
2511 bytes
2511 bytes
Wielkie dzięki. Choć bardzo skomplikowane rozwiazanie. A nie ma czegos w stylu: CopyFile c:\aaa.txt d:\aaa.txt ??? Przesunąć plik mozna wlasnie w ten sposob... -- Pozdrawiam Robert Wojtczak Użytkownik "Marcin Miga" <Marcin.Miga[@]gmail.com> napisał w wiadomości news:C57BDD8470737A4D9F2CE5DEE25D7B9007E47456@mailserver2.domdata.local... > Robert Wojtczak wrote: > > > Jak skopiowac plik komendą vb? Chodzi o to, że chce miec pod > > przyciskiem mozliwosc skopiowania jednego pliku w inne miejsce, a > > nawet zastapienie jesli juz byl o tej samej nazwie. Probowalem z > > komenda Name, ale ona przenosi plik a nie kopiuje. Mi zalezy zeby w > > miejscu zrodlowym plik jednak zostal. Prosze o pomoc. > > VBA.FileSystem.FileCopy(Source As String, Destination As String) > > Możesz też użyć API: > Public Enum API_BOOLEAN > API_FALSE = 0& > API_TRUE = 1& > End Enum > > Private Declare Function CopyFile Lib "kernel32.dll" Alias "CopyFileA" _ > (ByVal lpExistingFileName As String, _ > ByVal lpNewFileName As String, _ > ByVal bFailIfExists As API_BOOLEAN) As Long > > Private Declare Function MoveFile Lib "kernel32.dll" Alias "MoveFileA" _ > (ByVal lpExistingFileName As String, _ > ByVal lpNewFileName As String) As Long > > Gdzie CopyFile ma trzeci parametr, który określa, czy ma nadpisywać > plik, czy też nie... Pewnie też jest szybsze... > > pozdrawiaMM > -- > Marcin M. Miga > "More matter with less art" >
Technical Details
Message-ID:
<djktnd$hb8$1@atlantis.news.tpi.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.nask.pl!news.nask.org.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mailReferences:
<djknsr$ocj$1@nemesis.news.tpi.pl> <C57BDD8470737A4D9F2CE5DEE25D7B9007E47456@mailserver2.domdata.local>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.nask.pl!news.nask.org.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail From: "Robert Wojtczak" <wojtczak@elekol.neostrada.pl> Newsgroups: pl.comp.lang.vbasic Subject: Re: kopiowanie pliku Date: Tue, 25 Oct 2005 11:28:18 +0200 Organization: wr Lines: 48 Message-ID: <djktnd$hb8$1@atlantis.news.tpi.pl> References: <djknsr$ocj$1@nemesis.news.tpi.pl> <C57BDD8470737A4D9F2CE5DEE25D7B9007E47456@mailserver2.domdata.local> NNTP-Posting-Host: baq40.neoplus.adsl.tpnet.pl X-Trace: atlantis.news.tpi.pl 1130232367 17768 83.27.180.40 (25 Oct 2005 09:26:07 GMT) X-Complaints-To: usenet@tpi.pl NNTP-Posting-Date: Tue, 25 Oct 2005 09:26:07 +0000 (UTC) X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2800.1506 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1506 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit