File Save As Dialog Box
Posted on 2003-03-13
I have a quetion concerning the "Save As" function.
I have a label with caption of the the filename of an existing file on a CD.
I am opening a box similar to the "Open" box.
My question is this how do I "prefile" the filename listed in lable.caption to the "Filename" box?
And then when I run the Filcopy commadn..how do I make that work.
Here is my code...thanks
Private Sub mnuFileSaveAs_Click()
Dim sFile As String
.DialogTitle = "Save"
.CancelError = False
.Filter = "All Files (*.*)|*.*"
If Len(.FileName) = 0 Then
sFile = .FileName
FileCopy Label2.Caption, ""