בעיה בקוד asp

שלום, אני מנסה להעתיק טקסט לדף Html.
הקוד עובד נהדר ב-iis, אבל אחרי מעבר לשרת (1gb.co.il תומך ב-asp) הקוד אינו עובד כלל … אין הודעת שגיאה … הקוד מופיע ולא מתבצע.
אני בטוחה שאני מפספסת משהו קטן (אולי גדול??)
הנה הקוד:
<%
dim f,sf
  set fs=Server.CreateObject("Scripting.FileSystemObject")
  set f=fs.OpenTextFile(Server.MapPath("texthome.txt"), 1)
   do while f.AtEndOfStream = false
    Response.Write(f.ReadLine)
    Response.write("<br>")
   loop
   f.Close
   set f=nothing
   set fs=nothing
%>