ASP的19个基本技巧(2)

2022-07-15 80酷酷网 80kuku.com

技巧如下例：
  <%
  forI=1 to request.fron("input1").count
  response.write request.From("input1")(I)&"
"
  next
  %>
  若input1有两个值则都显示出
  *若未采用index指定读取哪个.可用
  〈%
  for each item request.From("input"))
  repomse.write item &"
"
  next
  %>
  也可用" for each x in tewuest.From"重复取得所有字段的输入值。

  <% for each x in request.Form %>
  request.From (<%=x%)=<%=request.Form
  (x)%>

  <% next %>


  12.获取客户端TCP/IP端口的方法:
  如: tcp/ip port is <%=request("server_port")%>
  使用server_port可以得到接收HTTP request的连接port信息


  13.通过HTTP_ACCEPT_LANGUAGE的HTTP表头信息,可以得到用户端的使用语言
  环境.
  以下例子判断用户端的语言环境,给出不同的页面.
  <% language=request.servervariables("HTTP_ACCEPT_LANGUAGE")
  if language="en" then %>
  <!--#include file="english.asp">
  <% else %>
  <!--#include file="china.asp">
  <% end if%>

  14.主页保留的期限
  如果用户端浏览器在一个主页保留的期限内,再度浏览此主页,则原在用
  户端硬盘上的主页内容将被显示.
  response.expires[=number]
  其中NUMBER为记录数据盒(PAGE BOX)的保留期限,单位是分钟.
  或:
  response.expiresabsolute[=[date][time]]
  如:设定一个主页保留期到某个日子.

  15.连接到指定的URL地址
  如:你希望确认用户已经看过INDEX.HTM,则可以检查是否已经看过,如
  尚未确认,则自动连接到首页
  <%
  if not session("BEEN_to_home_page") then
  response.redirect "index.asp"
  end if
  %>

  16.判断是回到本页还是第一次进入
  <%
  if user_has_been_here_before then
  response.write "<h3 align=center> Welcome Back
  again"
  else
  response.write "Welcome!"
  end if
  %>


  17.显示数据库中的图片与超级连接

  <%
  set conn=server.creatobject("ADODB.connection")
  conn.open "myaddress"
  set rs=conn.execute("select name,tel,url,image from
  myaddress")
  %>

  <p>
  <tabel>
  <tr>
  <% for i=0 to rs.fields.count-1 %>
  <td>
  <b>
  <%=rs(i).name %>
  </b>
  </td>
  <% next %>
  </tr>
  <% do while not rs.eof %>
  <tr>
  <% for i=0 to rs.fields.count-1 %>
  <td valign =top>
  <%
  if rs(i).name="image" then
  response.write "<img src="""&rs(i)&""" >"
  else
  if rs(i).name="url" then
  response.write "<a href="""&rs(i)&""">"&rs(i)&"</a>"
  else
  response.write rs(i)
  end if
  end if
  %>
  </td>
  <%next%>
  </tr>
  <% rs.movenext
  loop
  rs.close
  conn.close
  %>
  </html>


  18. 用ASP取得浏览器信息
  <%
  set a=server.creatobject("MSWC.BROWSERTYPE")
  msg="您使用的浏览器是:"+a.browser+"version"+a.version
  %>
  <%=msg%>


  19. asp访问cookies的方式(使用response和request)
  如下：
  写入cookies:
  response.cookies("待写入的coookies名称")
  ="待写入数据“
  读取cookies:
  读取数据=request.cookies("待读的cookies名称")

  * 写入时注意
   写入cookies的response.cookies程序段必须放在<html>标记
  之前。而且不可以有任何的其他html代码
   COOKIES中必须使用expires设定有效期， COOKIES才能真正的
  写入客户端硬盘中。如：
  response.cookies("待写入的名称“).expires=#july 1,1998#
  或response.cookies("名称").expires=DATE+365