Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to check for the existence of the Temporary folder namedTemporary Folder a , 2 and so on before deleting as the name is not fixed
Hi All,
I am using the following code Set FSO = CreateObject("scripting.filesystemobject") FSO.DeleteFolder Environ("Temp") & "\Temporary Directory*", True The purpose is that I want to delete the Folder NAmed as Temporay Directory a and Temporary Directory b. I want to check the existence of the folder before deleting. I am wondering how to do it as the name is not constant. What is constant is Temporary Dirctory and then variable names I also do not want to delete all the folders. Hence can some one provide some guidance. Regards, Yuvraj |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to check for the existence of the Temporary folder named Tempo
This should get you started.
Option Explicit Sub test() Dim FSO As Object Dim myParentFolder As Object Dim myChildFolder As Object Dim Verify As VbMsgBoxResult Dim FoundFolder As Boolean Set FSO = CreateObject("scripting.filesystemobject") Set myParentFolder = FSO.Getfolder(Environ("temp")) Do FoundFolder = False For Each myChildFolder In myParentFolder.Subfolders Debug.Print myChildFolder.Name If myChildFolder.Name Like "*Temporary Directory*" Then Verify = MsgBox("Do you want to delete folder: " & myChildFolder.Name & "?", vbYesNo) If Verify = vbYes Then myChildFolder.Delete FoundFolder = True Exit For End If End If Next myChildFolder Loop While Verify = vbYes End Sub HTH, Barb Reinhardt "Yuvraj" wrote: Hi All, I am using the following code Set FSO = CreateObject("scripting.filesystemobject") FSO.DeleteFolder Environ("Temp") & "\Temporary Directory*", True The purpose is that I want to delete the Folder NAmed as Temporay Directory a and Temporary Directory b. I want to check the existence of the folder before deleting. I am wondering how to do it as the name is not constant. What is constant is Temporary Dirctory and then variable names I also do not want to delete all the folders. Hence can some one provide some guidance. Regards, Yuvraj |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to check for the existence of the Temporary folder namedTemporary Folder 1,2 and so on As | Excel Programming | |||
Check if folder exists, if yes just copy sheet in to folder? | Excel Programming | |||
Temporary Folder Location | Excel Programming | |||
Can VBA clear the Temporary Internet File folder? | Excel Programming | |||
Checking for the Existence of a Folder | Excel Programming |