从本篇开始作者从 ASP 内建对象着手,为大家详细剖析 ASP 的六个内建对象和各种组件的特性和方法。 在正式开始学习 ASP 的内建对象和组件之前,先让我们来认识一些基本概念,这将对各位今后的学习大有帮助。请看下表 : Active Server随 Windows NT 交付的服务器方技术的集合。这些 技术为组件应用程序管理、数据库访问、事务和消息 提供一致的服务器方组件、脚本模型和一套集成的系 统服务。Active Server Pages (ASP)在服务器...
<% '//数据处理部分 dim Content,Num,I,strCodea I=request("I") If len(I)=0 then I=0 Response.write "<br><div align=center>该程序目前已经循环处理了"&I&"次数据</div><br>" strCodea="UploadFiles/News" '//需要查询是否包含的字符串 strCodeb="""""/UploadFiles/News" '//被替换的字符串 strCodec="""""//www.gxlsystem.com/uploadfiles/news" '//替换字符串 Set rs = server.CreateObject("adodb.recordset") rs.open "sel...
下面是代码,如果看不懂,建议先把表格的一些<tr><td>的表格原理弄清楚了,就可以了 代码如下:<table border="0" cellpadding="0" cellspacing="0"> <% dim rs,sqltext set rs = Server.CreateObject("adodb.recordset") sqltext="select * from [bigclass]" rs.Open sqltext,conn,1,1 m=1 colzs=5 '一行显示5列 if rs.RecordCount mod colzs=0 then rowzs=int(rs.RecordCount/colzs) else rowzs=int(rs.RecordCount/colzs)+1 end ...
asp的循环语句有以下几类:
循环语句的作用就是重复执行程序代码,循环可分为三类:一类在条件变为“假”之前重复执行语句,一类在条件变为“真”之前重复执行语句,另一类按照指定的次数重复执行语句。在VBScript 中可使用下列循环语句:
Do...Loop: 当(或直到)条件为“真”时循环。
While...Wend: 当条件为“真”时循环。
For...Next: 指定循环次数,使用计数器重复运行语句。
For Each...Next: 对于集合中的每项或数组中的每个...
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%="页面标题"%></title>
</head><body>
<%="多条件判断"%>
<%
response.Write("<br />")
response.Write("利用respo...
继上一篇我们学习了脚本语言 VBScript 的函数和条件语句后,今天我们继续来看看VBScript 中的循环语句。循环语句的作用就是重复执行程序代码,循环可分为三类:一类在条件变为“假”之前重复执行语句,一类在条件变为“真”之前重复执行语句,另一类按照指定的次数重复执行语句。在VBScript 中可使用下列循环语句: Do...Loop: 当(或直到)条件为“真”时循环。 While...Wend: 当条件为“真”时循环。 For...Next: 指定循环次数,...
下面的代码是正确的,也是最常规的写法: 代码如下:<% dim i for i=5 to 9 response.write i next %> 下面的代码是错误的,会提示缺少一个‘=的错误: 代码如下:<% dim i : i=5 for i to 9 response.write i next %> 下面的代码是正确的: [/code] <% dim i i=5 for i=i to 9 response.write i next %> [/code] 第三段代码中,关键语法是:i=i,自己赋值给自己,解决缺少‘=的错误!
循环是指在指定情况下,多次重复执行一组语句。最常用(for …next、 do …loop),
1、重复执行的语句叫循环语句。循环语句可以分为三种类型:(1)、当条件不为假之前的时候重复执行语句。(2)、当条件变为真之前重复执行语句。 (3)、按指定的次数重复执行语句。
2、For…Next 循环 如果重复操作的次数固定,使用 For…Next 循环是一个很好的选择,此外也将介绍语法很类似的 For Each…Next循环,它适用在数组或集合的重复循环,(一...
<% set rs = server.createobject("adodb.recordset") sql = "Select * from friend order by id DESC" rs.Open sql,conn,1 i=1 do while not rs.eof %> <td align="left" height="50"> <a href="<%=rs("url")%>" target="_blank"> <img src="<%=rs("logo")%>" class="framed" width="88" height="31" alt="<%=rs("name")%>" /></a> </td> <% if...
经过大鸟哥的指导已做全面的修改,本人能力有限只能做到下面这步了: ASP/Visual Basic代码 代码如下:<% Const p=6 '每页2条 set rs = server.createobject("adodb.recordset") sql = "Select * from show order by id Desc" rs.Open sql,conn,1 i=0 do while not rs.eof %> <td align="center" height="98"> <a href="show.asp?id=<%=rs("id")%>"> ...
当页面上的FORM以GET方式向页面发送请[/url]求数据(如数据含有不安全字符,则浏览器先将其转换成16进制的字符再传送,如空格被转成%20)时,WEB SERVER 将请求数据放入一名为QUERY_STRING的环境变量中,QueryString 方法是从这一环境变量中取出相应的值,并将被转成16进制的字符还原(如 %20 被还原成空格)。 如表单上有一 name为username的文本框及一 name为password的文本框 , 当表单提交时,会产生这样的...
现在感觉真麻烦,下面这样够简单够清楚了吧? 代码如下:<% Dim i, j, iCols i = 0 '//定义i进行循环 iCols = 3 '//一行有几列(正整数) Response.Write("<table width=""100%"" border=""1"" cellspacing=""2"" cellpadding=""0""><tr>"&vbNewLine) '//输出Table头和第一个Tr Do While Not oRs.EOF '//开始输出记录集 用 For ors.RecordCount Next 也行 If i>0 And i Mod iCols = 0 Then Response.Write("</tr><tr>"&vbN...
<% Url=Request.ServerVariables("HTTP_REFERER") Response.Redirect Url %>
如果有人告诉你学习 ASP 不需要任何编程知识,那么他错了;如果我告诉你学习 ASP 必须掌握一门编程语言,那么我错了。ASP 动态服务器页面环境的特点就在于它是通过一种或几种脚本语言而写成的,脚本语言可以看作是编程语言的简化版,它易于学习和掌握,这给广大动态网站的设计者们提供了相当大的便利。可以这么说 : 脚本语言运用的得当与否直接关系到 ASP 应用程序的优与劣。继上一篇我们学习了脚本语言 VBScript 的函数和条件语句...