ASP 代码

<%
strAdURL=Request.QueryString("url")
strUserIP=Request.QueryString("REMOTE_ADDR")
Set FSOObject.OpenTextFile("D:\drecord.txt",8")
TS.Write("The Advertisement has been hit:"""&strAdURL&"""and this user`s ip is:"""&strUserIP&""")
response.Redirect("Adroator.asp")
%>

Microsoft VBScript 编译器错误 (0x800A0409)
未结束的字符串常量
/21.asp, line 13, column 47
Set FSOObject.OpenTextFile("D:\drecord.txt",8")
----------------------------------------------^

Set FSOObject.OpenTextFile("D:\drecord.txt",8)