我在网易ASP专栏拷了份ASP源代码下来,不能运行,提示好像是每行都有错误,很不能理解!请大家帮我看看,谢谢!

原创 2017年01月03日 05:56:11
以下是我在ASP教程中直接COPY下来的两份源代码,但是试了下都不能运行,系统貌似是每一行代码都有语法问题,但是我都看了,没有问题啊,而且是官方给的应该不会有什么问题吧

以下是两份源代码:

asp7.asp:
<%
  Dim user
Dim flag
Dim pwd
  Dim say
Response.buffer=true \\\' 开启缓冲页面功能
Response.ContentType="text/HTML"
  Response.Charset="gb2312"
  user=Request.Form("username")
pwd=Request.Form("password")
say=Request.QueryString("say")
%>
  < form method="POST" action="asp7.asp">
  < 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>< /form>
  <%
  If say=1 then
  Response.Write " 欢迎书生大驾光临 !"
End If
  If say >1 then
  Response.Write " 欢迎再次光临书生的 ASP 网站 !"
End If
  If user="Adm" and pwd="shusheng" Then
  Response.Expires=1 \\\' 设置该页面在浏览器的缓冲中存储 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
  Response.write "< p>< a href=\\\'asp7b.asp?flag="&flag&"\\\'>动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /a>< /p>"
\\\' 将变量 flag 的值传送给 asp7b.asp
  %>
  < p>动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /p>



asp7b.asp:
<%
  Dim saysay=Request.QueryString("flag")
Select case say
  case "1"
  Response.Redirect "asp7.asp?say=1"
case "2"
  Response.Redirect "asp7.asp?say=2"
case "3"
  Response.Redirect "asp7.asp?say=3"
case "0"
  Response.Redirect "asp7.asp?say=0"
End Select
  %>

[JZOJ]3858. 【NOIP2014八校联考第3场第2试10.5】挖掘机技术哪家强

Description 有人问现实中为什么总是男生追求女生,反过来很少。实际上女生也是想主动追求男生的,但是世俗中对于主动追求男生的女生有种歧视,这样就使得女生不大敢主动追求男生。但是面对喜欢的...
  • NNNeil_TK
  • NNNeil_TK
  • 2014年10月06日 15:08
  • 1746

首届广西网络安全技术大赛初赛通关攻略

首届广西网络安全技术大赛初赛通关攻略前言第一次参加安全类比赛(好吧,其实我这种宅男参加的比赛都很少,很多种比赛都是第一次 - -),同组的组员建议我在比赛完写个通关攻略出来。听起来不错,写个通关攻略,...
  • weizehua
  • weizehua
  • 2015年11月16日 16:49
  • 7901

挖掘机技术哪家强<numberTheory><欧拉函数>

【NOIP2014八校联考第3场第2试10.5】挖掘机技术哪家强(shoberu) (Standard IO) Time Limits: 1000 ms  Memory Limits: 131072...
  • cyc66
  • cyc66
  • 2014年10月06日 19:38
  • 1173

如何让打印EXCEL表中每行都有标题行?

  • 2014年12月31日 20:36
  • 13KB
  • 下载

我的asp为什么不能向oracle写入数据呢,大家帮我看看

我是连接oracle数据库的自建的info表,里面只有rbsj是日期型,数据库连接没有任何问题,可以从库中读数据出来,但是在asp的录入页面里面却不能将数据写入数据库。这个页以前是连接SqlServe...
  • yingjizheng2254
  • yingjizheng2254
  • 2017年01月03日 02:11
  • 79

解决IIS7运行ASP提示错误:An error occurred on the server when processing the URL. Please contact the system administrator

解决IIS7运行ASP提示错误:An error occurred on the server when processing the URL. Please contact the system a...
  • AppleBBS
  • AppleBBS
  • 2011年05月07日 23:27
  • 2864

s2sh启动错误,网上说包没全,请大侠帮我看看java.lang.NoClassDefFoundError: org/springframework/asm/ClassVisitor

严重: Context initialization failed java.lang.NoClassDefFoundError: org/springframework/asm/ClassVisi...
  • JEFFYU328
  • JEFFYU328
  • 2012年06月26日 10:04
  • 5228

MySQL高可用在网易的最佳应用与实践

今天分享主要包括三方面内容:一是常见的MySQL高可用架构;二是分布式数据库高可用实践;三是基于keepalive的MySQL高可用改造。第一部分会介绍业界一些经典的MySQL高可用解决方案,第二部分...
  • guying4875
  • guying4875
  • 2017年05月11日 12:16
  • 303

那些年我在网易积累的工作经验【2012-04-23】

我在网易工作了多年,到最后依依不舍地离开,感触很深,网易是一个文化轻松的大公司,有很多值得学习的地方:        1、先做人,后做事;对事不对人      人品做好了,自然好办事,事情出问题了...
  • DZ4EVER
  • DZ4EVER
  • 2012年11月24日 10:58
  • 393

我在网易的十年

10 年前的今天,我在广州 36 楼办理了入职网易的手续。     这些年陆陆续续写了很多,原本计划在今天总结一下,突然又没有什么感觉了。入职第一天,肖海彤是我的引路人。他私下跟我说,我们没有那...
  • gudongxian
  • gudongxian
  • 2015年03月14日 23:14
  • 199
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:我在网易ASP专栏拷了份ASP源代码下来,不能运行,提示好像是每行都有错误,很不能理解!请大家帮我看看,谢谢!
举报原因:
原因补充:

(最多只允许输入30个字)