[ ask ] copy folder pada vb

Forum diskusi pemrograman VB6

[ ask ] copy folder pada vb

Postby casper » 23 Nov 2011, 11:11

mhon bantuannya om , tante skalian ..
bgimana source code copy folder dengan vb .. misalnya foldernya ada di drive c: truz zy mw copi ke d: .. slama ini zy cma bisa copy filenya aja blum bisa copy folder.. mhon bantuannya trimah ksih ...
casper
Prajurit Dua
Prajurit Dua
 
Posts: 24
Joined: 18 Jun 2011, 20:41
Memberi kopi: 15 cangkir
Mendapat kopi: 0 cangkir

Re: [ ask ] copy folder pada vb

Postby vian » 23 Nov 2011, 11:20

casper wrote:mhon bantuannya om , tante skalian ..
bgimana source code copy folder dengan vb .. misalnya foldernya ada di drive c: truz zy mw copi ke d: .. slama ini zy cma bisa copy filenya aja blum bisa copy folder.. mhon bantuannya trimah ksih ...


ane coba jawab
Code: Select all
Sub CopyFolder()
Dim fso
Dim sfol As String, dfol As String
sfol = "c:\MyFolder" ' change to match the source folder path
dfol = "e:\MyFolder" ' change to match the destination folder path
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(dfol) Then
    fso.CopyFolder sfol, dfol
Else
    MsgBox dfol & " already exists!", vbExclamation, "Folder Exists"
End If
End Sub


ubah sesuai keinginan. .

Post vian telah mendapat kopi dari:
casper
vian
Prajurit Satu
Prajurit Satu
 
Posts: 141
Joined: 05 Aug 2011, 14:23
Location: suroboyo
Memberi kopi: 9 cangkir
Mendapat kopi: 15 cangkir

Re: [ ask ] copy folder pada vb

Postby casper » 23 Nov 2011, 13:05

suksess ...
thank'z om Vian .. ;;) :-bd
casper
Prajurit Dua
Prajurit Dua
 
Posts: 24
Joined: 18 Jun 2011, 20:41
Memberi kopi: 15 cangkir
Mendapat kopi: 0 cangkir


Return to Visual Basic 6.0

Who is online

Users browsing this forum: No registered users and 6 guests