码迷,mamicode.com
首页 > Web开发 > 详细

ASP 基础二 内置对象

时间:2017-09-29 16:50:45      阅读:171      评论:0      收藏:0      [点我收藏+]

标签:val   color   name   amp   ext   set   com   submit   logs   

一 Request

二 Response

三 Application

四 Session

五 Server

<script language="vbscript" runat="server">

Sub Application_OnStart
Application("applicationname")="mytest"
End Sub

Sub Application_OnEnd
Application("applicationname")="mytest2"
End Sub


Sub Session_OnStart
Session("mysession")="1111"
End Sub

Sub Session_OnEnd
Session("mysession")="2222"
End Sub

</script>
<html>
<head title="test hello world">
</head>
<%
    Application.Lock()
    application("test")="abcd"
    session("test")="abcde"
    Application.UnLock()
    
    response.Write(application("applicationname"))   
    response.Write(application("applicationname2"))  
    response.Write(session("mysession"))    

    
    
 %>
<% 
    dim a
    dim b
    a=Request.Form("fname")
    b=Request.Form("lname")
       
    response.Write(a+"<br/>"+b+"<br/>") 
    response.Write(Request.Form.Count)
    response.Write(request.QueryString("para"))
    response.Write(request.Cookies("test"))
    response.Write(request.ServerVariables("server_name")+"<br/>")
    response.Write(request.ServerVariables("request_method")+"<br/>")
%>
<%
    dim c
    
     
    
    response.Buffer=true
    response.CharSet="gb2312"
    response.ContentType="text/html"    
    response.Write("hello world")
    response.Cookies("test")="helloworld"
    response.Flush()
    response.End()
    response.Clear()
    response.Redirect("www.baidu.com")
 %>
<body>
    <form method="post" action="testRequest.asp?para=param121">
        <p>
            First Name:
            <input type="text" name="fname" />
        </p>
        <p>
            Last Name:
            <input type="text" name="lname" />
        </p>
        <input type="submit" value="Submit" />
    </form>
</body>


</html>

 

<html>
<head title="test hello world">
</head>
<body>
    <%
        dim a
        
        response.Write(Server.URLEncode("我的-8*&^%$%"))
        response.Write("aaaa<br/>bbbb")
        response.Write(Server.HTMLEncode("aaaa<br/>bbbb"))

        response.Write(Server.MapPath("index.asp"))
    %>
</body>


</html>

 

ASP 基础二 内置对象

标签:val   color   name   amp   ext   set   com   submit   logs   

原文地址:http://www.cnblogs.com/ligenyun/p/7611089.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!