我的代码（一部分）是这样的：
<%@ Language=VBScript %>
<% option explicit%>
<%

Response.Buffer =false

Response.Expires =0



sub getinput()

    sname=request("name")

    semail=request("email")

    ssubject=request("subject")

    smessage=request("message")

end sub

执行后出现这样的提示：
Microsoft VBScript 运行时错误 错误 '800a01f4'

变量未定义: 'ssubject'

/save.asp, 行17

为什么？