1
2dim user
3dim flag
4dim pwd
5dim say
6Response.buffer=trye
7Response.ContentType="text/HTML"
8Response.Charset="gb2312"
9user=Request.form("username")
10pwd=Request.QueryString("say")
1<form action="asp7.asp" method="post">
2<p>用户名：<input name="username" size="12" type="text"/><br/>
3口令：<input name="password" size="12" type="password"/><br/>
4<input name="B1" type="submit" value="提交"/><input name="B2" type="reset" value="取消"/>
5</p>
6</form>
1
2If say=1 then
3Response.Write(欢迎书生大驾光临!)
4end if
5if say>1 then
6response.Write(欢迎再次光临书生的ASP网站)
7end if
8if user="Adm" adn pwd="shusheng" then
9response.Expires=1
10flag=1
11elseif user="guest" and pwd="guest" then
12response.Expires=0
13response.clear
14flag=2
15elseif user="vip" and pwd="vip" then
16response.Write(欢迎VIP光临书生的ASP网站)
17flag=3
18else
19flag=0
20response.End
21end if
22response.Write "
<p><a href='asp7b.asp?flag="&flag&"'>动态网站设计十八般武艺--ASP篇</a></p>
1"
提示错误：
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a0408'
无效字符
/index.asp，行20
Response.Write(欢迎书生大驾光临!)
-------^
怎么回事啊，我是根据书上打的，怎么还错我，请高手指教
---------------------------------------------------------------
应该是
Response.Write("欢迎书生大驾光临!")
字符串要加双引号！
---------------------------------------------------------------
不加双引号就是一个变量。但你没有这个变量，所以抱错
还有不要加括号
response.write "欢迎书生大架光临"
---------------------------------------------------------------
1.用双引号
2.不能有括号
Response.Write "欢迎书生大驾光临!"
---------------------------------------------------------------
加括号可以，但是字符串一定要有引号！！！！
---------------------------------------------------------------
Response.Write "欢迎书生大驾光临!"