好得很程序员自学网

<tfoot draggable='sEl'></tfoot>

XDownPage2.10使用简单例子（sqlserver)

asp分页基础类XDownPage2.0只支持oracle，而 2.10已经能够支持sqlserver了。本例将演示XDownPage2.10对于sqlserver数据库的分页方法。 1 , 分页程序代码 请详见另一篇文章 ：http://blog.csdn.net/precipitant/archive/2006/11/15/1386541.aspx 2, conn.asp

asp分页基础类XDownPage2.0只支持oracle，而 2.10已经能够支持sqlserver了。本例将演示XDownPage2.10对于sqlserver数据库的分页方法。

1 , 分页程序代码

请详见另一篇文章 ：http://blog.csdn.net/precipitant/archive/2006/11/15/1386541.aspx

2 , conn.asp（数据库连接相关的程序）

'https://HdhCmsTest ==================================================https://HdhCmsTest
'https://HdhCmsTest 数据库访问https://HdhCmsTest
'https://HdhCmsTest ==================================================https://HdhCmsTest
https://HdhCmsTest
https://HdhCmsTest 'https://HdhCmsTest 建立数据库连接https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest dimhttps://HdhCmsTest conn https://HdhCmsTest 'https://HdhCmsTest 数据库连接对象https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest sethttps://HdhCmsTest connhttps://HdhCmsTest =https://HdhCmsTest server.createobject(https://HdhCmsTest "https://HdhCmsTest ADODB.CONNECTIONhttps://HdhCmsTest "https://HdhCmsTest )
https://HdhCmsTest subhttps://HdhCmsTest openConn
connstrhttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest Provider=sqloledb;Data Source=127.0.0.1;Initial Catalog=it;User Id=it_manage;Password=it_manage;https://HdhCmsTest "https://HdhCmsTest
conn.open connstr
https://HdhCmsTest end subhttps://HdhCmsTest
https://HdhCmsTest 'https://HdhCmsTest 清除数据库连接https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest subhttps://HdhCmsTest CloseConn
conn.Close()
https://HdhCmsTest sethttps://HdhCmsTest connhttps://HdhCmsTest =https://HdhCmsTest nothinghttps://HdhCmsTest
https://HdhCmsTest end subhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest 关闭打开的记录集https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest subhttps://HdhCmsTest CloseRS(byref recordset)
recordset.close()
https://HdhCmsTest sethttps://HdhCmsTest recordsethttps://HdhCmsTest =https://HdhCmsTest nothinghttps://HdhCmsTest
https://HdhCmsTest end subhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest 获得当前虚拟目录的名字https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest functionhttps://HdhCmsTest getRoot()
urlhttps://HdhCmsTest =https://HdhCmsTest Request.ServerVariables(https://HdhCmsTest "https://HdhCmsTest URLhttps://HdhCmsTest "https://HdhCmsTest )
urlhttps://HdhCmsTest =https://HdhCmsTest righthttps://HdhCmsTest (url,https://HdhCmsTest lenhttps://HdhCmsTest (url)https://HdhCmsTest -https://HdhCmsTest 1https://HdhCmsTest )
getRoothttps://HdhCmsTest =https://HdhCmsTest https://HdhCmsTest midhttps://HdhCmsTest (url,https://HdhCmsTest 1https://HdhCmsTest ,https://HdhCmsTest instrhttps://HdhCmsTest (url,https://HdhCmsTest "https://HdhCmsTest /https://HdhCmsTest "https://HdhCmsTest )https://HdhCmsTest -https://HdhCmsTest 1https://HdhCmsTest )
https://HdhCmsTest end functionhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest ---------------- 数据库排序 start ---------------------------https://HdhCmsTest
https://HdhCmsTest sImageDir https://HdhCmsTest =https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest /https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest getRoot() https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest /images/https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest 图片路径https://HdhCmsTest
https://HdhCmsTest upOrderFlag https://HdhCmsTest =https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest sImageDir https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest sort_asc.gif'>https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest 升序排列显示图标https://HdhCmsTest
https://HdhCmsTest downOrderFlag https://HdhCmsTest =https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest sImageDir https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest sort_desc.gif'>https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest 降序排列显示图标https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest 获得当前连接的排序方向https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest functionhttps://HdhCmsTest getOrderDir(fn,ofn,oDir)
https://HdhCmsTest dimhttps://HdhCmsTest tDir
tDirhttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest deschttps://HdhCmsTest "https://HdhCmsTest
https://HdhCmsTest ifhttps://HdhCmsTest (https://HdhCmsTest lcasehttps://HdhCmsTest (fn)https://HdhCmsTest =https://HdhCmsTest lcasehttps://HdhCmsTest (ofn)) https://HdhCmsTest thenhttps://HdhCmsTest
https://HdhCmsTest ifhttps://HdhCmsTest (https://HdhCmsTest lcasehttps://HdhCmsTest (oDir)https://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest aschttps://HdhCmsTest "https://HdhCmsTest ) https://HdhCmsTest thenhttps://HdhCmsTest
tDirhttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest deschttps://HdhCmsTest "https://HdhCmsTest
https://HdhCmsTest elsehttps://HdhCmsTest
tDirhttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest aschttps://HdhCmsTest "https://HdhCmsTest
https://HdhCmsTest endhttps://HdhCmsTest https://HdhCmsTest ifhttps://HdhCmsTest
https://HdhCmsTest endhttps://HdhCmsTest https://HdhCmsTest ifhttps://HdhCmsTest
getOrderDirhttps://HdhCmsTest =https://HdhCmsTest tDir
https://HdhCmsTest end functionhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest 书写排序指示图标https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest functionhttps://HdhCmsTest writeOrderDir(fn,ofn,oDir)
https://HdhCmsTest dimhttps://HdhCmsTest tDir
https://HdhCmsTest ifhttps://HdhCmsTest (https://HdhCmsTest lcasehttps://HdhCmsTest (fn)https://HdhCmsTest =https://HdhCmsTest lcasehttps://HdhCmsTest (ofn)) https://HdhCmsTest thenhttps://HdhCmsTest
https://HdhCmsTest ifhttps://HdhCmsTest (https://HdhCmsTest lcasehttps://HdhCmsTest (oDir)https://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest aschttps://HdhCmsTest "https://HdhCmsTest ) https://HdhCmsTest thenhttps://HdhCmsTest
tDirhttps://HdhCmsTest =https://HdhCmsTest UpOrderFlag
https://HdhCmsTest elsehttps://HdhCmsTest
tDirhttps://HdhCmsTest =https://HdhCmsTest downOrderFlag
https://HdhCmsTest endhttps://HdhCmsTest https://HdhCmsTest ifhttps://HdhCmsTest
https://HdhCmsTest endhttps://HdhCmsTest https://HdhCmsTest ifhttps://HdhCmsTest
writeOrderDirhttps://HdhCmsTest =https://HdhCmsTest tDir
https://HdhCmsTest end functionhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest 添加排序列头https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest subhttps://HdhCmsTest WriteOrderHeader(pHeaderTitle,pOrderField,tOrderField,tOrderDir)
Response.Write https://HdhCmsTest "https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest pOrderField https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest ','https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest getOrderDir(pOrderField,tOrderField,tOrderDir) https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest ')"" class='noticetitle' style='width:90%;cursor:default'>https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest pHeaderTitle https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest &https://HdhCmsTest writeOrderDir(pOrderField,tOrderField,tOrderDir) https://HdhCmsTest &https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest https://HdhCmsTest https://HdhCmsTest "https://HdhCmsTest
https://HdhCmsTest end subhttps://HdhCmsTest

https://HdhCmsTest 'https://HdhCmsTest ---------------- 数据库排序 end ---------------------------https://HdhCmsTest
https://HdhCmsTest
https://HdhCmsTest

3 , main.asp（主程序）

#include file="inc/conn.asp"https://HdhCmsTest -->https://HdhCmsTest
https://HdhCmsTest #include file="inc/pagination.asp"https://HdhCmsTest -->https://HdhCmsTest
https://HdhCmsTest ...https://HdhCmsTest
https://HdhCmsTest 'https://HdhCmsTest 故障类别管理https://HdhCmsTest
'https://HdhCmsTest writer:northsnowhttps://HdhCmsTest
'https://HdhCmsTest create date :051211https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest %>https://HdhCmsTest
https://HdhCmsTest script https://HdhCmsTest languagehttps://HdhCmsTest ="javascript"https://HdhCmsTest >https://HdhCmsTest ...https://HdhCmsTest
https://HdhCmsTest //https://HdhCmsTest 执行查询前将查询条件写到隐藏表单https://HdhCmsTest
https://HdhCmsTest functionhttps://HdhCmsTest query()
https://HdhCmsTest ...https://HdhCmsTest {
https://HdhCmsTest varhttps://HdhCmsTest oFormHiddenhttps://HdhCmsTest =https://HdhCmsTest document.frmHidden;
https://HdhCmsTest ifhttps://HdhCmsTest (https://HdhCmsTest !https://HdhCmsTest oFormHidden) https://HdhCmsTest returnhttps://HdhCmsTest https://HdhCmsTest falsehttps://HdhCmsTest ;
oFormHidden.currentpage.valuehttps://HdhCmsTest =https://HdhCmsTest ""https://HdhCmsTest ;
oFormHidden.flag.valuehttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest queryhttps://HdhCmsTest "https://HdhCmsTest ;
oFormHidden.err_type_name.valuehttps://HdhCmsTest =https://HdhCmsTest frmList.err_type_name.value;
oFormHidden.err_type_code.valuehttps://HdhCmsTest =https://HdhCmsTest frmList.err_type_code.value;
oFormHidden.submit();
}https://HdhCmsTest https://HdhCmsTest

https://HdhCmsTest //https://HdhCmsTest 重置查询条件https://HdhCmsTest
https://HdhCmsTest functionhttps://HdhCmsTest myreset()
https://HdhCmsTest ...https://HdhCmsTest {
frmList.err_type_name.valuehttps://HdhCmsTest =https://HdhCmsTest ""https://HdhCmsTest ;
frmList.err_type_code.valuehttps://HdhCmsTest =https://HdhCmsTest ""https://HdhCmsTest ;
}https://HdhCmsTest https://HdhCmsTest


https://HdhCmsTest //https://HdhCmsTest 执行动态排序https://HdhCmsTest
https://HdhCmsTest functionhttps://HdhCmsTest gotoOrder(uOrderField,uOrderDir)
https://HdhCmsTest ...https://HdhCmsTest {
frmHidden.currentpage.valuehttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest 1https://HdhCmsTest "https://HdhCmsTest ;
frmHidden.flag.valuehttps://HdhCmsTest =https://HdhCmsTest "https://HdhCmsTest queryhttps://HdhCmsTest "https://HdhCmsTest ;
frmHidden.orderField.valuehttps://HdhCmsTest =https://HdhCmsTest uOrderField;
frmHidden.orderDir.valuehttps://HdhCmsTest =https://HdhCmsTest uOrderDir;
frmHidden.submit();
}https://HdhCmsTest https://HdhCmsTest


https://HdhCmsTest }https://HdhCmsTest https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest scripthttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest ...https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest on error resume next https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest 'https://HdhCmsTest 获取参数https://HdhCmsTest
https://HdhCmsTest https://HdhCmsTest dimhttps://HdhCmsTest err_type_name,err_type_code
https://HdhCmsTest dimhttps://HdhCmsTest currentpage,flag,pagesize,rsTotalCount,orderDir,orderField
currentpagehttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request.form(https://HdhCmsTest "https://HdhCmsTest currentpagehttps://HdhCmsTest "https://HdhCmsTest ))
div_phttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest div_phttps://HdhCmsTest "https://HdhCmsTest ))
flaghttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest flaghttps://HdhCmsTest "https://HdhCmsTest ))
pagesizehttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest pagesizehttps://HdhCmsTest "https://HdhCmsTest ))
rsTotalCounthttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest rsTotalCounthttps://HdhCmsTest "https://HdhCmsTest ))
orderDirhttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (Request(https://HdhCmsTest "https://HdhCmsTest orderdirhttps://HdhCmsTest "https://HdhCmsTest ))
orderFieldhttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (Request(https://HdhCmsTest "https://HdhCmsTest orderfieldhttps://HdhCmsTest "https://HdhCmsTest ))

err_type_codehttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest err_type_codehttps://HdhCmsTest "https://HdhCmsTest ))
err_type_namehttps://HdhCmsTest =https://HdhCmsTest trimhttps://HdhCmsTest (request(https://HdhCmsTest "https://HdhCmsTest err_type_namehttps://HdhCmsTest "https://HdhCmsTest ))
https://HdhCmsTest https://HdhCmsTest %>https://HdhCmsTest

https://HdhCmsTest https://HdhCmsTest span https://HdhCmsTest classhttps://HdhCmsTest ="titlestyle"https://HdhCmsTest >https://HdhCmsTest >>https://HdhCmsTest 故障类别管理https://HdhCmsTest spanhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest 下面是查询框https://HdhCmsTest -->https://HdhCmsTest
https://HdhCmsTest div https://HdhCmsTest alignhttps://HdhCmsTest =centerhttps://HdhCmsTest > span https://HdhCmsTest idhttps://HdhCmsTest ="qSpan"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest fieldset https://HdhCmsTest stylehttps://HdhCmsTest ="width:100%;padding:'2px 2px'"https://HdhCmsTest alignhttps://HdhCmsTest ="center"https://HdhCmsTest classhttps://HdhCmsTest ="border"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest legend https://HdhCmsTest classhttps://HdhCmsTest ="border"https://HdhCmsTest alignhttps://HdhCmsTest =right https://HdhCmsTest stylehttps://HdhCmsTest ="border:0px"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest a https://HdhCmsTest hrefhttps://HdhCmsTest ="#"https://HdhCmsTest onclickhttps://HdhCmsTest ="javascript:query()"https://HdhCmsTest tabindexhttps://HdhCmsTest ="1"https://HdhCmsTest >https://HdhCmsTest 查询https://HdhCmsTest ahttps://HdhCmsTest >https://HdhCmsTest |
https://HdhCmsTest a https://HdhCmsTest hrefhttps://HdhCmsTest ="#"https://HdhCmsTest onClickhttps://HdhCmsTest ="javascript:myreset()"https://HdhCmsTest https://HdhCmsTest >https://HdhCmsTest 重置https://HdhCmsTest ahttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest legendhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest table https://HdhCmsTest widthhttps://HdhCmsTest ="100%"https://HdhCmsTest alignhttps://HdhCmsTest ="center"https://HdhCmsTest IDhttps://HdhCmsTest ="Table1"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest tr https://HdhCmsTest > form https://HdhCmsTest namehttps://HdhCmsTest ="frmList"https://HdhCmsTest actionhttps://HdhCmsTest ="#"https://HdhCmsTest methodhttps://HdhCmsTest ="post"https://HdhCmsTest IDhttps://HdhCmsTest ="Form1"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest td https://HdhCmsTest valignhttps://HdhCmsTest ="middle"https://HdhCmsTest alignhttps://HdhCmsTest ="center"https://HdhCmsTest https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest table https://HdhCmsTest widthhttps://HdhCmsTest ="100%"https://HdhCmsTest borderhttps://HdhCmsTest ="0"https://HdhCmsTest cellspacinghttps://HdhCmsTest ="0"https://HdhCmsTest cellpaddinghttps://HdhCmsTest ="0"https://HdhCmsTest IDhttps://HdhCmsTest ="Table2"https://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest trhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest td https://HdhCmsTest alignhttps://HdhCmsTest ="center"https://HdhCmsTest widthhttps://HdhCmsTest ="50%"https://HdhCmsTest >https://HdhCmsTest 类别代码:
https://HdhCmsTest input https://HdhCmsTest namehttps://HdhCmsTest ="err_type_code"https://HdhCmsTest typehttps://HdhCmsTest ="text"https://HdhCmsTest classhttps://HdhCmsTest ="line"https://HdhCmsTest maxlengthhttps://HdhCmsTest ="4"https://HdhCmsTest valuehttps://HdhCmsTest =" "https://HdhCmsTest IDhttps://HdhCmsTest ="Text1"https://HdhCmsTest > tdhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest td https://HdhCmsTest alignhttps://HdhCmsTest ="center"https://HdhCmsTest widthhttps://HdhCmsTest ="50%"https://HdhCmsTest >https://HdhCmsTest 类别名称:
https://HdhCmsTest input https://HdhCmsTest namehttps://HdhCmsTest ="err_type_name"https://HdhCmsTest typehttps://HdhCmsTest ="text"https://HdhCmsTest classhttps://HdhCmsTest ="line"https://HdhCmsTest valuehttps://HdhCmsTest =" "https://HdhCmsTest sizehttps://HdhCmsTest ="22"https://HdhCmsTest IDhttps://HdhCmsTest ="Text2"https://HdhCmsTest > tdhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest trhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest tablehttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest tdhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest trhttps://HdhCmsTest > formhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest tablehttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest fieldsethttps://HdhCmsTest > spanhttps://HdhCmsTest >https://HdhCmsTest
https://HdhCmsTest tabl

查看更多关于XDownPage2.10使用简单例子（sqlserver)的详细内容...

声明：本文来自网络，不代表【好得很程序员自学网】立场，转载请注明出处：http://haodehen.cn/did97240
  阅读：55次

上一篇： oracle优化or替换为in、exists、unionall的几种写法，测试没

下一篇：SQLServer2008SP1安装报Restartcomputerfailed的解决办法

相关资讯