课件：as教学.ppt

HTML HEADTitle服务端变量/Title/HEAD BODY % For Each name IN Request.ServerVariables Response.write(bname/b:) Response.write(Request.ServerVariables(name)) Response.write(br) NEXT % /BODY /HTML Request对象的Servervariables集合举例 HTML HEADTITLE服务端变量/TITLE/HEAD BODY % IF InStr(request.ServerVariables(HTTP_USER_AGENT),MSIE)=0 THEN % p您使用的不是 Microsoft Internet Explorer，要浏览本页，/br 您必须使用该浏览器，请您到a href=/a 下载。 % ELSE % p您使用的是 Microsoft Internet Explorer，欢迎浏览 % END IF % /BODY /HTML 检查客户浏览器类型 获取客户的表单输入 HTML HEADTITLE注册页/TITLE/HEAD BODY h4欢迎注册，请填写以下信息：/h4 FORM Method=post Action=sample7.asp p请输入姓名：input name=username type=textbr 所在公司：input name=usercompany type=text br input type=submit value= 确认注册 /body /html Sample7.html HTML HEADTITLE注册页/TITLE/HEAD BODY % if trim(request.form(username))= or _ trim(request.form(usercompany))= then % 您没有正确输入注册信息， 请a href=register.html重新填写/a % else % h4谢谢您的注册，您的注册信息是：/h4 姓名：%=request.form(username)%/br 公司：%=request.form(usercompany)% % end if % /body /html Sample7.asp 利用QueryString获取客户输入 HTML HEADTITLE注册页/TITLE/HEAD BODY % FOR EACH QSParam IN Request.QueryString Response.Write(brQSParam=) Response.Write(Request.QueryString(QSParam)) NEXT % /body /html Response对象 集合 Cookies 方法 Write BinaryWrite End 属性 Charset ContentType Status HTML HEADTITLE注册页/TITLE/HEAD BODY % if trim(request(username))= or _ trim(request(usercompany))= then response.redirect “sample10.html” else % h4谢谢您的注册，您的注册信息是：/h4 姓名：%=request(username)%/br 公司：%=request(usercompany)% % end if % /body /html 利用Response.Redirect控制流程 THANK YOU SUCCESS * * 可编辑 HTTP/1.1 302 Object moved Server: Microsoft-IIS/5.0 Date: Mon, 05 Jun 2000 06:26:35 GMT Location: sample10.html Connection: Keep-Alive Content-Length: 134 Content-Type: text/html Cache-control: private Response.Redirect的工作原理 % Response.Status= “302 Object Moved” Response.AddHeader “Location”,”sample10.html” % Response.Redirect的等效语句 HTML HEAD TITLE 浏览器能力检测示例 /TITLE /HEAD BODY % Set MyBrow=Serv