求教高手(跪求)关于Function过程问题

求教高手:
我想在一个Function过程中调用zxft.asp这个文件,请问应该怎么写
如下代码不行,应该怎么改?
Function url()
    Dim t,R1
    t =  "<a target=""_self"" href=""javascript:goUrl()""><span class=""f14b"">"
    t = t & "<script type=""text/javascript"">" & vbCrlf
    t = t & " var focus_width=230 ; " & vbCrlf
    t = t & " var focus_height=168; "& vbCrlf
    t = t & " var text_height=7; "& vbCrlf        
    R1 = "zxft.asp"
End function

[[it] 本帖最后由 波段天元 于 2008-3-9 22:36 编辑 [/it]]