• Home
 · 
• Databases/Data Access/DAO/ADO
 · 
• Deleting the file without API

Deleting the file without API

Deleting the file without API

API Declarations


'Take the dirlistbox, drivelistbox, Filelistbox on the form with
' one commandbutton



Rate Deleting the file without API

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

   Kill (File1.Path & "\" & File1.List(File1.ListIndex))
   File1.Refresh
   File1.Selected(1) = True
   File1.SetFocus
 End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub Form_Load()
Form1.Top = 2200
End Sub