I am trying to check if a directory exist or not , if yes delete the contents and new contents
On Error Resume Next
ad = File1.Path & "\" & ab
Fpath = File1.Path
If (GetAttr(ab) And vbDirectory) Then
Kill (File1.Path & "\" & ab & "\*.*")
My file path is K:\Apps\CBS\MCI\0728 and it has to check for another 0728 directory in that..