📄 getparam.asp

📁 Active Server Pages 网页制作教程看之前请传到ASP空间。或者本地用iis。或安装pws内有说明

💻 ASP

字号:

<%
Params = Request.ServerVariables("QUERY_STRING")
ParamList = Split( Params, "&" )
ReDim Name(UBound(ParamList)), Data(UBound(ParamList))
For I = 0 To UBound(ParamList)
    X = Split(ParamList(I), "=")
    Name(I) = X(0)
    Data(I) = X(1)
Next
%>

<HTML>
<BODY>
<H2>读取附带在网址后面的参数<HR></H2>
<BLOCKQUOTE>
<%
For I = 0 To UBound(ParamList)
    Response.Write Name(I) & " = " & Data(I) & "<P>"
Next
%> 
</BLOCKQUOTE>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -