צריך עזרה בבקשה פתרון שגיאה

אני מקבל את השגיאה הבאה



Microsoft VBScript runtime error '800a0005'

Invalid procedure call or argument

/steiner/admin/BannersUpdate.asp, line 84





ושורה 84 :



For i = 1 to LenB(value)
     MyFile.Write chr(AscB(MidB(value,i,1)))
Next



מה הבעיה בשורות אלו ?