数字分页2
(2)我一般用的分页代码如下: <% set rs=server.CreateObject("ADODB.recordset") sql ="select * from 表" rs.open sql,conn,1,1 page=cint(request("page")) n=rs.RecordCount rs.pagesize=12 m=cint(rs.pagecount) if page="" then page=1 elseif page<1 then page=1 end if if cint(request("page"))>m then page=m end if page=c...
数字分页1
数字分页效果 [<<][<][1] [2] [3] [4] [5] [6] [7] [8] [9] [10][>][>>]下拉页数菜单 [<<]作用为，翻到首页，[>>]作用为翻到最后页 [<]作用为向上翻10页,没有时没有连接；[>]作用为向下翻10页，没有时无连接。 最右边下拉菜单，则为所有页数，选择第几页就跳转到第几页。 200分求这段的详细代码包括注释，要包括我上面提到的各种功能，高手费心了！拜谢！！！
这是我的一个分页，你拿去自己看下 <% dim pagecount,rsrecordcount,pagecounts,s,ii,page_b,page_e,page_num,...
实现ASP文章内分页最精的源代码
<% if not dbrs.eof then dbrsword=dbrs(6). zzj=len(dbrsword) if zzj>2000 then response.write "接上一页<br>" pagecount=int(zzj/2000)+1 '取得此篇文章的总页数 if request("page")="" then '取得此篇文章的某一页 ...
什么是HEX数据2？
当一个扩展线性地址记录被读到后,扩展线性地址记录的数据区域将被保存 并应用到后面从Intel HEX文件中读出的记录,这个扩展线性记录一直有效, 直到读到下一个扩展线性记录. 绝对内存地址 = 数据记录中的地址 + 移位后的扩展线性地址 下面举例说明这个过程 从数据记录的地址域得到地址 2462 从扩展线性地址记录的地址域得到地址 FFFF 绝对内存地址 FFFF2462 扩展段地址记录 (HEX86) 扩展段地址记录也被称为 HEX86记录, 包含 4-19位的数据地址段, 这个扩展段地址记录总是有两字节数据,如下: :020000021200EA 02 是 记录中的数据字节数目 00...
什么是HEX数据1？
什么是Intel HEX格式? Intel HEX文件是记录文本行的ASCII文本文件,在Intel HEX文件中,每一行是一个HEX记录 由十六进制数组成的机器码或者数据常量,Intel HEX文件经常被用于将程序或数据传输 存储到ROM.EPROM,大多数编程器和模拟器使用Intel HEX文件. 记录格式 一个Intel HEX文件可以包含任意多的十六进制记录,每条记录有五个域,下面是一个记录的格式. :llaaaatt[dd...]cc 每一组字母是独立的一域,每一个字母是一个十六进制数字,每一域至少由两个十六进制数字组成,下面是字节的描述. :冒号 是每一条Intel HEX记...
AscW
AscW 是为使用 Unicode 字符的 32 位平台提供的。 它返回 Unicode （宽型）字符代码，因此可以避免从 ANSI 到 Unicode 的代码转换。
返回与字符串的第一个字母对应的 ANSI 字符代码。
include file 与include virtual的区别
include file 与include virtual的区别 1。#include file 包含文件的相对路径，#include virtual包含文件的虚拟路径。 2。在同一个虚拟目录内，<!--#include file="file.asp"-->和<!--#include virtual="file.asp"-->效果是相同的，但假设虚拟目录名为myweb,则<!--#include virtual="myweb/file.asp"-->也可以通过调试，但我们知道<!--#include file="myweb/file.asp"-->是绝对要报错的。 3。如果一个站点下有2...
LBound和UBond上下界函数
VB的LBound和UBond上下界函数的详细格式和功能,作用
返回一个 Long 型数据，其值为指定数组维可用的最小下标。
语法
LBound(arrayname[, dimension])
LBound 函数的语法包含下面部分：
部分 描述 arrayname 必需的。数组变量的名称，遵循标准的变量命名约定。 dimension 可选的；Variant (Long)。指定返回哪一维的下界。1 表示第一维，2 表示第二维，如此类推。如果省略 dimension，就认为是 1。
说明
LBound 函数与 UBound 函数一起使用，用来确定一个数组的大小。UB...
循环广告层
<>
var i=1;
var tmpobj = setInterval("addtime()",1000); //这里调整你的轮换时间
addtime()
{
if (i==1)
{
getElementById("indexsrh1").style.display='none';
getElementById("indexsrh2").style.display='block';
i=2;
}
else
{
getElementById("indexsrh2").style.display='none';
getElement...
[推荐]ASP初学者常用的代码5
''创建表单MyForm,方法为Get Response.Write("<form method=Get name=MyForm>") Response.Write("<p align=center><font size=2 color=#008000>") ''设置翻页超链接 if rs.PageCount=1 then Response.Write("[第一页] [上一页] [下一页] [最后一页] ") else if rs.AbsolutePage=1 then Response.Write("[第一页] [上一页] ") Response.Write("[<a href=jav...
[推荐]ASP初学者常用的代码4
29.分页代码: <%''本程序文件名为：Pages.asp%> <%''包含ADO常量表文件adovbs.inc，可从"\Program Files\Common Files\System\ADO"目录下拷贝%> <!--#Include File="adovbs.inc"--> <%''＊建立数据库连接，这里是Oracle8.05数据库 Set conn=Server.CreateObject("ADODB.Connection") conn.Open "Provider=msdaora.1;Data Source=YourSrcName;User ID=YourUserID;Pas...
[推荐]ASP初学者常用的代码3
24.点击返回上页代码: <form> <p><input TYPE="button" ="返回上一步" ="history.back(-1)"></p> </form> 24.点击刷新代码: <form> <p><input TYPE="button" ="刷新按钮一" ="ReloadButton()"></p> </form> < language="java"><!-- ReloadButton(){location.href="allbutton.htm";} // --></>
24.点击刷新代码2: <form> <p><input TYPE="button" ="...
[推荐]ASP初学者常用的代码2
18.使用FSO读取文件某一行的函数 FSOlinedit(filename,lineNum) if linenum < 1 then exit dim fso,f,temparray,tempcnt set fso = server.CreateObject("ing.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then ...
[推荐]ASP初学者常用的代码1
1.获得系统时间: <%=now()%> 2.取得来访用的IP: <%=request.serverVariables("remote_host")%> 3.获得系统,浏览器版本: <> write("版本："+navigator.appName+navigator.appVersion+" browser.") </> 4.去除IE混动条: <body scroll="no"> <body style="overflow-y:hidden"> 5.进入网站,跳出广告: < language="java"> <!-- <!-- 注意更改文件所在路径--> open(''http://ww...
让图片不间断连续向右滚动
div id="demo" style="overflow:hidden;width:670px;color:#ffffff;"> <table cellpadding="0" cellspacing="0" border="0"> <tr><td id="demo1" valign="top" align="center"> <table cellpadding="2" cellspacing="0" border="0"> <tr align="center"> <td><img src="http://www.371.cn/logo.gif" width="88"></td> <t...
轮换图片
2. 共享图层 共享图层就是使用“Layers”图层面板，将指定的背景图片设定为共享图层，如此即可在所有的帧中看到该背景。 我们有时可能会误认为每一帧都拥有一个图层，其实不论设定的帧有多少，这些帧都位于同一图层上，只是出现的时间不同罢了。 下面我们就利用此方法为刚才的动画添加一个背景： 首先，将画布的大小改为200x150（Pixels），然后开启“Layers”图层面板，单击“Layers”图层面板右上角如图按钮，选择“New Layer”，在弹出的“New Layer”对话框中，为新层起一个名字，例如：background，钩选“Share Across s”复选框，单击“ok”按钮...
轮换图片
其实动画的原理很简单，就是让图片有秩序地轮流显示。 软件下在地址：http://www3.skycn.com/soft/2521.html 利用Firework 制作动画总共有三种方法，由易到难分别为：合并已有图片生成动画，利用Tween Instances生成动画和手工绘制。 一、 合并已有图片生成动画 合并已有图片形成动画，顾名思义就是将一系列图片按顺序排列在不同的帧中从而生成动画，当然，首先我们必须有一串连续的图片，然后，在Fireworks中，选择菜单指令“File/Open Multiple”，这时将弹出“打开”对话框（如图1）， 进入所需图片所在的目录，然后按照动画中图片显示...
图片连续滚动的代码
<div id="demo" style="overflow:hidden;width:670px;color:#ffffff;"> <table cellpadding="0" cellspacing="0" border="0"> <tr><td id="demo1" valign="top" align="center"> <table cellpadding="2" cellspacing="0" border="0"> <tr align="center"> <td><img src="http://www.haao.cn/logo.gif" width="88"></td> ...
数据库的连接方法总结
各种数据库连接代码: MS Access数据库连接 用DSN连接并且没有用户名和密码： <% set conn = Server.CreateObject("ADODB.Connection") conn.open "YourDSNName" %> 用DSN连接并且有用户名和密码： <% set conn = Server.CreateObject("ADODB.Connection") conn.open "YourDSNName","username","password" %> 用实际的数据库绝对路径连接： <% Set conn = Server.CreateObject("AD...
ASP+FSO+框架实现ASP生成htm静态页并分页方法(2)
Dim checkfile'检查文本文件是否已经存在,是则删除checkfile=server.mappath("CityHtml\"&Filestart&".htm")'检查htm文件是否已经存在,是则删除if (fs.FileExists(checkfile)) then'检查htm文件是否已经存在,是则删除Dim df'定义文件对象*删除文件使用*Set df=fs.GetFile(checkfile)'定义要册除的文件df.delete'册除文件end if'判断结束Dim ts'定义写入文件对象set ts = fs.createtextfile(filez,t...
文章归档
最新评论
- vfdff：网页的呀