我在看在线教程，用例子在自己机子上试的时候出错，请帮忙看下是哪里的问题。程序名是asp7.asp，错误是Microsoft VBScript 编译器错误 (0x800A0408)，无效字符，/aspsample/asp7.asp, line 4 Dim user
大概是从开始就出错了。怀疑是什么组件没装，请各位高手帮忙。 代码是手敲入的。
<html>
<head><title></title></head><body>
<%
Dim user
Dim flag
Dim pwd
Dim say
Response.buffer=true
Response.C
Response.Charset="gb2312"
user=Request.Form("username")
pwd=Request.Form("password")
say=Request.QueryString("say")
<p>用户名 :<input type="text" name="username" size="12"><br>
口 令 :<input type="password" name="password" size="12"><br>
<input type="submit" value="提交" name="B1"><input type="reset" value="取消"
name="B2"></p>
If say=1 then
Response.Write "欢迎书生大驾光临!"
ElseIf say >1 then
Response.Write "欢迎再次光临书生的 ASP 网站!"
End If
If user="Adm" and pwd="shusheng" Then
Response.Expires=1
flag=1
ElseIf user="guest" and pwd="guest" Then
Response.Expires=0
Response.Clear
flag=2
ElseIf user="vip" and pwd="vip" Then
Response.Write " 欢迎 VIP 光临书生的 ASP 网站 "
flag=3
Else
flag=0
Response.End
End If
%>
</Script>
</body>
</html>
论坛设施
