• Home
 · 
• Files/File Controls/Input/Output
 · 
• The Easy way to make a copy of a file and change the file type to whatever you want. Just need a Di

The Easy way to make a copy of a file and change the file type to whatever you want. Just need a Di

The Easy way to make a copy of a file and change the file type to whatever you want. Just need a Dir1, file1, commmand1,

Rate The Easy way to make a copy of a file and change the file type to whatever you want. Just need a Di

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim a As String

Private Sub Command1_Click()
On Error Resume Next
FileCopy Dir1.Path + "\" + File1.FileName, _
Dir1.Path + "\" + Text1.Text
File1.refresh
End Sub

Private Sub Command2_Click()
Kill (Dir1.Path & "\" & File1.FileName)
File1.Refresh
End Sub

Private Sub Dir1_Change()
File1.FileName = Dir1.Path
End Sub

Private Sub File1_Click()
On Error Resume Next
a = VBA.Format$(FileLen(Dir1.Path & "\" & File1.FileName), "###,###,###")
Label1.Caption = "Size: " & a
End Sub

Private Sub Form_Load()
Dir1.Path = "C:\"
command1.caption = "Rename"
command2.caption = "Delete"
End Sub