BrightDream的博客_ASP析记

分页技术Page二

调用子过程进行分页：定义子过程： <%'TarUrl=要分页显示的文件名称'TotalNum=总记录条数'PageNum=每页显示条数'Page=页码'ShowTotal=是否显示总页次'ShowList=是否显示下拉页码'Unit=单位Sub ShowPage(TarUrl,TotalNum,PageNum,Page,ShowTotal,ShowList,Unit) Di

职场

技术

休闲

Page

原创 2010-04-17 22:16:33 1148 阅读

分页技术Page

一： 1，先获取数据源 <%set rs=server.CreateObject("ADODB.RecordSet")sql="select * from book"rs.open sql,conn,1,1%> 调用到控件中:循环输出： <%do while not rs.eof%&g

职场

技术

休闲

Page

原创 2010-04-17 22:13:28 1091 阅读

文件组建FSO操作

一： <%'第一步：创建，文件存取组件的实例'2、创建FSO实例'语法：Set FSO实例名称=Server.CreateObject("Scripting.FileSystemObject") set fso=server.createobject("Scripting.FileSystemObject") '第二步：创建一个文件夹'1、创建文件夹'FSO实例名称.CreateFol

职场

文件

休闲

组建

FSO

原创 2010-04-17 22:04:13 872 阅读

时间应用

<%response.Write("现在是："& now() &"")response.Write("现在是："& date() &"")response.Write("现在是："& year(#2008-8-8#) &"")response.Write("现在是："& year(d

职场

时间

应用

休闲

原创 2010-04-16 22:33:18 666 阅读

除整除取余应用

response.Write("13 除 5的结果="& 13 / 5 &"")response.Write("13 整除 5的结果="& 13 \ 5 &"")response.Write("13 除 5的取余结果="& 13 mod 5 &"")

职场

应用

休闲

整除

原创 2010-04-16 22:32:26 1213 阅读

instr应用

<%dim str,numstr="abc"num=123response.Write( isnumeric(str)&" " )response.Write( isnumeric(num)&" " )%>

职场

应用

休闲

instr

原创 2010-04-16 22:30:58 649 阅读

Isnumeric应用

<%dim str,numstr="abc"num=123response.Write( isnumeric(str)&" " )response.Write( isnumeric(num)&" " )%> 返回值为Ture or False，判断输入数据是否是数字

职场

应用

休闲

Isnumeric

原创 2010-04-16 22:30:10 688 阅读

Len函数应用

<%dim strstr="abcdefg"response.Write("变量str的长度是："& len(str) &"")response.Write("中华人民共和国的长度是："& len("中华人民共和国") &"")response.Write("sdfsdfdsfdsfsdfds是："&len("sdf

函数

职场

应用

休闲

Len

原创 2010-04-16 22:27:55 427 阅读

Select应用

<%'Select Case语句'语法：'Select Case 条件(变量/表达式)'Case 结果1'执行代码'……'Case 结果2'执行代码'……'Case Else'执行代码'……'End Select dim weekweek=weekday(date()) select case week case 1 &nbs

职场

应用

休闲

Select

原创 2010-04-16 22:26:38 484 阅读

Sub子过程具体应用

<%dim username,pwd,age,sex,email username=request.Form("username")pwd=request.Form("pwd")age=request.Form("age")sex=request.Form("sex")email=request.Form("email") '自定义一个判断数据是否为空的子程序'子程序名称kong'参数v

职场

应用

休闲

Sub

原创 2010-04-16 22:25:28 475 阅读

For循环

一：<%'For语句'语法：'For 初始变量 to 变量终止值 [step步长]'执行代码'……'Next'说明：默认步长值为1 for i=1 to 5 'response.Write("第一次循环 ") response.Write("第"&i&"次循环 ") 'response.Write(i)nex

职场

For

休闲

原创 2010-04-16 22:23:13 263 阅读

Split分割字符串

<%str="北京*上海*天津*重庆*长白山"citys_array=split(str,"*") response.write(ubound(citys_array)) %> 在下拉列表中调用 <select name="citys" id="citys"> <

职场

休闲

字符

Split

原创 2010-04-16 22:20:51 897 阅读

array数组应用

<%'1、数组：就是一组变量'数组的写法:变量名(下标)'下标是一个数值,用来说明自己是数组中的第几个元素。'数组的声明：dim 数组名(数组的长度/可不写)'例如：'dim str(3)'str(0)="I"'str(1)="LOVE"'str(2)="YOU"'str(3)="！"'response.write(str(0)&str(1)&str(2)&str(3

职场

array

应用

休闲

原创 2010-04-16 22:17:50 459 阅读

Function函数应用

'Function函数的语法：'Function 函数名（参数1，参数2，…） ' 语句……'End Function '调用函数'变量= 函数名（参数1，参数2，…）'函数可以向变量一样引用和参与运算 '自定义一个，用于计算两个数字相加之和的函数'函数名称：he'在函数中，预先设置，两个参数，用于表示，将来要进行计算的两个具体的数字'x与y，代表将来的数字

函数

职场

应用

休闲

Function

原创 2010-04-16 22:15:29 604 阅读

Sub子程序

1、Sub子程序的语法：'Sub 子程序名（参数1，参数2，…） '语句……'End Sub '自定义一个，用于计算两个数字相加之和的子程序'子程序名称：he'在子程序中，预先设置，两个参数，用于表示，将来要进行计算的两个具体的数字'x与y，代表将来的数字1与数字2'在定义子程序时，书写的参数，我们称为----形

职场

休闲

子程序

Sub

原创 2010-04-16 22:14:23 562 阅读

Redirect应用

response.Redirect("http://www.baidu.com")****引号中写要跳转的页面路径

职场

应用

休闲

Redirect

原创 2010-04-16 22:11:58 401 阅读

循环语句Do while

Do While 语句'语法：'Do while 条件'执行代码'……'Loop'说明：'必须在循环体内附加一个可以有效退出循环体的条件否则'将出现死循环 eg： i=1 '循环的开始，初始化变量i，赋值为1do while i<=5 '循环的终止条件，变量i只有小于等于5时，才，执行循环中的操作 response.Write(i&" ")

职场

休闲

语句

原创 2010-04-16 22:10:08 5722 阅读

获取用户选择商品信息

<%dim shangpin,sum,oneshangpin=request.Form("shangpin")sum=request.form("shangpin").count '获取表单元素值的总个数one=request.form("shangpin")(1)'获取第一个选择的元素值response.write("你共买了"&sum&"件商品 ")re

用户

休闲

选择

获取

商品

原创 2010-04-16 22:07:56 476 阅读

Post与Get传值读取方法

在ASP中有两种传值方法：Post和Get 用Post传值时，获取时用变量名称=request.Form("传值名称") 用Get传值时：获取时用：变量名称=request.QueryString("传值名称")，Get传值时以？在地址栏中传递。

职场

Post

Get

休闲

传值

原创 2010-04-16 22:06:02 1113 阅读 1点赞

cookies应用

<%'(1)、创建Cookies'Response.Cookies("变量名称") = 变量值 response.Cookies("name")="flash" '(2)、设置Cookies的生命周期'Response.Cookies("变量名称").Expires = RelativeDate response.cookies("name").expires=date()+1resp

职场

应用

cookies

休闲

原创 2010-04-16 22:01:48 281 阅读

MapPath对象应用

<%dim x,yx="db_bbs.mdb"y=server.MapPath("db_bbs.mdb") response.Write("转换之前路径：----> "&x&"")……在获取数据库信息时，不能使用物理路径！response.Write("转换之后路径：----> "&y) %>

职场

应用

对象

休闲

MapPath

原创 2010-04-16 21:59:52 297 阅读

读取数据库信息

<%set conn=server.CreateObject("ADODB.Connection")conn.open "Provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("db_user.mdb") sql="select * from tb_user" 'Set Recordset对象实例名称=Conn

职场

数据库

休闲

原创 2010-04-16 21:56:39 529 阅读

ASP连接Access2007数据库

连接Access2007数据库字符串： "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=test.accdb" 注意和以前的access ADO连接字符串相比有三个明显不同的地方：1:Provider部分由Microsoft.Jet.OLEDB变成了Microsoft.ACE.OLEDB 2:驱动版本号由4

ASP

职场

数据库

休闲

原创 2010-04-16 21:54:01 729 阅读

ASP连接Access数据库

<%'第一步：创建一个ADO中用于链接与打开数据库Connection对象的实例'1、创建Connection对象实例'语法：'Set Connection对象实例名称=Server.CreateObject("ADODB.Connection") Set conn=server.CreateObject("ADODB.Connection") '第二步：使用conn对象实例的open方

asp

职场

access

休闲

原创 2010-04-16 17:50:36 458 阅读

官方博客	全部文章	热门标签	班级博客
了解我们	网站地图	意见反馈

鸿蒙开发者社区	51CTO学堂
51CTO	软考资讯

51CTO博客

放飞梦想