# Re: 请各位高手帮忙........

Posted by ComBilLi on September 14, 1999 at 21:23:33:

In Reply to: Re: 请各位高手帮忙........ posted by 小琳 on September 14, 1999 at 21:03:33:

: : Private Sub mnubackup_Click()

: : Select Case MsgBox("Please insert a floppy to the floppy drive.", vbOKCancel + vbQuestion, "Backup Data")
: :
: : Case vbOK:
: : FileCopy CurDir & "\*.*", "A:\" =====================>我在这个位置总是出现Error 52，怎会这样?
: : Exit Sub
: :
: : Case vbCancel:
: : Exit Sub
: : End Select

: : End Sub

: :::不要使用万用字元看看，假如是一个档案的话应该是可以
: !!!

::但我是要copy所有files。
::有没有其他方法copy一个directory内的所有files?

Follow Ups:

- FileSystemObject wei 02:37:12 9/15/99 (0)