adspace
Write a script to delete all the files in a folder except one desired file.
Answer Posted / Ashish Saxena
In Visual Basic, you can use the FileSystemObject to delete all files in a folder except one. Here's a sample code:
```vbnet
Dim objFSO, objFolder, objFile, strDesiredFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("Your Folder Path") 'Replace with your folder path
strDesiredFile = "Your Desired File Name" 'Replace with your desired file name
For Each objFile In objFolder.Files
If Not (objFile.Name = strDesiredFile) Then
objFile.Delete
End If
Next
```
This script will delete all files in the specified folder except for the one with the given name.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
No New Questions to Answer in this Category !! You can
Post New Questions
Answer Questions in Different Category