[CODE=vb]dim Fld_Name
Fld_Nam =inputbox ("Enter the Folder Name","Creating of Log Folder","Log's Files")
Public Function Folder_Creation (Fld_Nam)
Dim fso, f,c
Set fso = CreateObject("S cripting.FileSy stemObject")
Set f = fso.CreateFolde r("C:\Documen ts and Settings\shyam\ Desktop\" & Fld_Nam)
' CreateFolderDem o = f.Path
End...