- ASP 常用的18个函数
- 作者：未知 来源：未知 添加时间：2003年3月24日 字体:大 中 小
- 835461. 现在的日期时间命令是
^Bt]Fh<%=now%> 即可
^Bt]Fh
^Bt]Fh2.ASP取得表格(from)数据输入的方法，是使用一个内置的对象(object)—Requect, 它以get,post而异。
^Bt]Fh
^Bt]Fh3.若要自己用VB或其它语言编写，.dll文件供ASP使用需将DLL文件注册方可：DOS下输入 regsbr32 *.dll
^Bt]Fh
^Bt]Fh4.显示五个重复的句子，字体越来越大
^Bt]Fh
^Bt]Fh<% for i=1 to 5 %>
^Bt]Fh<font size=<% =i %> color=#00ffff>
^Bt]Fh快速ASP
^Bt]Fh</font>
^Bt]Fh
^Bt]Fh
^Bt]Fh<% next %>
^Bt]Fh
^Bt]Fh5.传送字符串到用户端
^Bt]Fhresponse.write string
^Bt]Fh如：<% response.write "Welcome" %>
^Bt]Fh
^Bt]Fh6.链接到指定的URL地址
^Bt]Fh
^Bt]Fhresponse.redirect url
^Bt]Fh如：
^Bt]Fh<% response.redirect "homepage.asp"
^Bt]Fh%>
^Bt]Fh
^Bt]Fh*但是如果此.ASP的文件内容已经传送到用户断，则再用redirect时会发生错误。
^Bt]Fh
^Bt]Fh7.其他语言与ASP的结合：
^Bt]Fh
^Bt]Fh如：早上显示早安，下午显示你好
^Bt]Fh<%
^Bt]Fhif time>+#12:00:00 AM# and time<#12:00:00 PM #
^Bt]Fhthen
^Bt]Fhgreeting="早安!"
^Bt]Fhelse
^Bt]Fhgreeting="你好!"
^Bt]Fhend if
^Bt]Fh%>
^Bt]Fh<%=greeting %>
^Bt]Fh
^Bt]Fh8.<script>标记在ASP中的应用
^Bt]Fh例：
^Bt]Fh
^Bt]Fh<html>
^Bt]Fh<body>
^Bt]Fh<% call function1 %>
^Bt]Fh</body>
^Bt]Fh</html>
^Bt]Fh<script runat=server language=javascript>
^Bt]Fhfunction function1()
^Bt]Fh{
^Bt]Fh...
^Bt]Fh}
^Bt]Fh</script>
^Bt]Fh
^Bt]Fh9.#include 包括其它文件
^Bt]Fh
^Bt]Fh
^Bt]Fh
^Bt]Fh而且可以层层嵌套。另外#include 不能在<%--%>之内
^Bt]Fh
^Bt]Fh10.ASP取得表格输入数据的方法：GET POST
^Bt]Fh
^Bt]Fh一.get:用户端将数据加到URL后，格式为”？字段1=输入数据1&字段2=输入数据2&...", 再将其送到服务器。
^Bt]Fh
^Bt]Fh如: actionwww.abc.com, 字段Name输入数据为jack,字段age的数据为15，则用get方法为 http://www.abc.com?Name=jack&;Age=15
^Bt]Fh
^Bt]Fh二.post:用户端用http信息数据传送到服务器ASP中：
^Bt]Fh
^Bt]Fhget:使用“输入数据= Request.QueryString("字段名")",将附加于URL的数据取出。
^Bt]Fh
^Bt]Fhpost:使用“输入数据=Request.Forml"(字段名")",读取HTTP信息数据字段。
^Bt]Fh
^Bt]Fh* Request.QueryString范例
^Bt]Fh如：〈A hery="aspform.asp?Name=jack&Age=15">
^Bt]Fh按此〈/A〉〈p〉
^Bt]FhName:<%=request.QueryString("Name")%)
^Bt]FhAge:<%=request.QeueryString("Age")%)
^Bt]Fh* get 范例
^Bt]Fh·aspturm.asp:
^Bt]Fh<form action="asp1b.asp" method="get">
^Bt]Fh姓名: <input type=text name="input1" ＆#118alue="Your name">
^Bt]Fh
^Bt]Fh
^Bt]Fh
^Bt]Fh特征: <select name="input2">
^Bt]Fh<option>cool!
^Bt]Fh<option>handsome
^Bt]Fh<option>warmhearted
^Bt]Fh</select>
^Bt]Fh<input type=submit ＆#118alue="ok">
^Bt]Fh</form>
^Bt]Fhasp1b.asp的内容
^Bt]Fh<html><body>
^Bt]Fh<% =request.querystring("input1") %> hi, your character is
^Bt]Fh<%= request.querystring("input2") %>
^Bt]Fh</body></html>
^Bt]Fh
^Bt]Fh11.request.From
^Bt]Fh
^Bt]Fh语法： request.From(name)[(index)|.count]
^Bt]Fhname:字段名
^Bt]Fhindex:当同一字段输入多个值时，指针值index指定要读取同一字段的那一个值，范围由1到 request.From(name).count
^Bt]Fh
^Bt]Fhcount:由request.From(name).count可知name字段输入几个值，若无此name字段，count为0
^Bt]Fh
^Bt]Fh如下例：
^Bt]Fh
^Bt]Fh<%
^Bt]FhforI=1 to request.fron("input1").count
^Bt]Fhresponse.write request.From("input1")(I)&"
^Bt]Fh"
^Bt]Fhnext
^Bt]Fh%>
^Bt]Fh若input1有两个值则都显示出
^Bt]Fh*若未采用index指定读取哪个.可用
^Bt]Fh〈%
^Bt]Fhfor each item request.From("input"))
^Bt]Fhrepomse.write item &"
^Bt]Fh"
^Bt]Fhnext
^Bt]Fh%>
^Bt]Fh也可用" for each x in tewuest.From"重复取得所有字段的输入值。
^Bt]Fh
^Bt]Fh<% for each x in request.Form %>
^Bt]Fhrequest.From (<%=x%)=<%=request.Form
^Bt]Fh(x)%>
^Bt]Fh
^Bt]Fh<% next %>
^Bt]Fh
^Bt]Fh
^Bt]Fh12.获取客户端TCP/IP端口的方法:
^Bt]Fh
^Bt]Fh如: tcp/ip port is <%=request("server_port")%>
^Bt]Fh使用server_port可以得到接收HTTP request的连接port信息
^Bt]Fh
^Bt]Fh
^Bt]Fh13.通过HTTP_ACCEPT_LANGUAGE的HTTP表头信息,可以得到用户端的使用语言环境.
^Bt]Fh
^Bt]Fh以下例子判断用户端的语言环境,给出不同的页面.
^Bt]Fh
^Bt]Fh<% language=request.servervariables("HTTP_ACCEPT_LANGUAGE")
^Bt]Fhif language="en" then %>
^Bt]Fh<!--#include file="english.asp">
^Bt]Fh<% else %>
^Bt]Fh<!--#include file="china.asp">
^Bt]Fh<% end if%>
^Bt]Fh
^Bt]Fh14.主页保留的期限
^Bt]Fh
^Bt]Fh如果用户端浏览器在一个主页保留的期限内,再度浏览此主页,则原在用
^Bt]Fh户端硬盘上的主页内容将被显示.
^Bt]Fhresponse.expires[=number]
^Bt]Fh其中NUMBER为记录数据盒(PAGE BOX)的保留期限,单位是分钟.
^Bt]Fh或:
^Bt]Fhresponse.expiresabsolute[=[date][time]
^Bt]Fh如:设定一个主页保留期到某个日子.
^Bt]Fh
^Bt]Fh15.连接到指定的URL地址
^Bt]Fh
^Bt]Fh如:你希望确认用户已经看过INDEX.HTM,则可以检查是否已经看过,如
^Bt]Fh尚未确认,则自动连接到首页
^Bt]Fh
^Bt]Fh<%
^Bt]Fhif not session("BEEN_to_home_page") then
^Bt]Fhresponse.redirect "index.asp"
^Bt]Fhend if
^Bt]Fh%>
^Bt]Fh
^Bt]Fh16.判断是回到本页还是第一次进入
^Bt]Fh
^Bt]Fh<%
^Bt]Fhif user_has_been_here_before then
^Bt]Fhresponse.write "<h3 align=center> Welcome Back
^Bt]Fhagain"
^Bt]Fhelse
^Bt]Fhresponse.write "Welcome!"
^Bt]Fhend if
^Bt]Fh%>
^Bt]Fh
^Bt]Fh
^Bt]Fh17.显示数据库中的图片与超级连接
^Bt]Fh
^Bt]Fh<%
^Bt]Fhset conn=server.creatobject("ADODB.connection")
^Bt]Fhconn.open "myaddress"
^Bt]Fhset rs=conn.execute("select name,tel,url,image from
^Bt]Fhmyaddress")
^Bt]Fh%>
^Bt]Fh
^Bt]Fh
^Bt]Fh
^Bt]Fh
^Bt]Fh<tabel>
^Bt]Fh<tr>
^Bt]Fh<% for i=0 to rs.fields.count-1 %>
^Bt]Fh<td>
^Bt]Fh<b>
^Bt]Fh<%=rs(i).name %>
^Bt]Fh</b>
^Bt]Fh</td>
^Bt]Fh<% next %>
^Bt]Fh</tr>
^Bt]Fh<% do while not rs.eof %>
^Bt]Fh<tr>
^Bt]Fh<% for i=0 to rs.fields.count-1 %>
^Bt]Fh<td valign =top>
^Bt]Fh<%
^Bt]Fhif rs(i).name="image" then
^Bt]Fhresponse.write "<img src="""&rs(i)&""" >"
^Bt]Fhelse
^Bt]Fhif rs(i).name="url" then
^Bt]Fhresponse.write "<a href="""&rs(i)&""">"&rs(i)&"</a>"
^Bt]Fhelse
^Bt]Fhresponse.write rs(i)
^Bt]Fhend if
^Bt]Fhend if
^Bt]Fh%>
^Bt]Fh</td>
^Bt]Fh<%next%>
^Bt]Fh</tr>
^Bt]Fh<% rs.movenext
^Bt]Fhloop
^Bt]Fhrs.close
^Bt]Fhconn.close
^Bt]Fh%>
^Bt]Fh</html>
^Bt]Fh
^Bt]Fh18. 用ASP取得浏览器信息
^Bt]Fh
^Bt]Fh<%
^Bt]Fhset a=server.creatobject("MSWC.BROWSERTYPE")
^Bt]Fhmsg="您使用的浏览器是:"+a.browser+"version"+a.version
^Bt]Fh%>
^Bt]Fh<%=msg%> 83543
- 返回页面顶端
- 上一篇：快乐的方法
- 下一篇：网页特效介绍
返回上一页
打印本文
加入收藏
页面最后更新时间：2011年5月18日
