zoukankan html css js c++ java

ASP 基础二内置对象

一 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>

天生我材必有用，千金散尽还复来

查看全文

相关阅读:
O021、创建 Image
O020、理解 Glance
O019、通过例子学习 Keystone
O018、理解 Keystone 核心概念
 O017、部署DevStack
O016、搭建实验环境
 O015、OpenStack 架构
 O014、云计算与OpenStack
O013、动手实践Linux VLAN
O012、Linux如何实现VLAN

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

ASP 基础二 内置对象

ASP 基础二内置对象