だから〜
If　<フォルダが存在している>　then
　<フォルダ削除処理>
End If
<新規フォルダ作成処理>
というロジックはおかしいでしょ。削除処理が完了する前に
フォルダ作成処理に突入する可能性があるんだから。