校园春色亚洲色图_亚洲视频分类_中文字幕精品一区二区精品_麻豆一区区三区四区产品精品蜜桃

主頁 > 知識庫 > asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼

asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼
熱門標(biāo)簽：萊西電子地圖標(biāo)注 修改地圖標(biāo)注 武夷山旅游地圖標(biāo)注 怎么在地圖標(biāo)注自己 縣域地圖標(biāo)注打印店 金昌電話機(jī)器人價格 外呼系統(tǒng)API接口 個人可以辦理400電話么 鳳臺百度地圖標(biāo)注店
%@ Language = VBSCRIPT %>
% Option Explicit %>
%
rem 在asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼
Dim iStart, iOffset
iStart = Request("Start")
iOffset = Request("Offset") 


if Not IsNumeric(iStart) or Len(iStart) = 0 then
iStart = 0
else
iStart = CInt(iStart)
end if

if Not IsNumeric(iOffset) or Len(iOffset) = 0 then
iOffset = 30
else
iOffset = Cint(iOffset)
end if

Response.Write "Viewing "  iOffset  " records starting at record "  iStart  "BR>"

Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
'objConn.Open "DSN=MP3"
dim connstr
dim db
db="csnjimageman.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="  Server.MapPath(""db"")
objconn.Open connstr

Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "SELECT * FROM imageinfo", objConn

Dim aResults
aResults = objRS.GetRows

objRS.Close
Set objRS = Nothing

objConn.Close
Set objConn = Nothing


Dim iRows, iCols, iRowLoop, iColLoop, iStop
iRows = UBound(aResults, 2)
iCols = UBound(aResults, 1)

If iRows > (iOffset + iStart) Then
iStop = iOffset + iStart - 1
Else
iStop = iRows
End If

For iRowLoop = iStart to iStop
For iColLoop = 0 to iCols
Response.Write aResults(iColLoop, iRowLoop)  " "
Next
Response.Write "BR>"
Next 

Response.Write "P>"
if iStart > 0 then
'Show Prev link
Response.Write "A HREF=""GetRows.asp?Start="  iStart-iOffset  _
"Offset="  iOffset  """>Previous "  iOffset  "/A>"
end if

if iStop  iRows then
'Show Next link
Response.Write " A HREF=""GetRows.asp?Start="  iStart+iOffset  _
"Offset="  iOffset  """>Next "  iOffset  "/A>"
end if
%> 

  

您可能感興趣的文章:
  • 用GetString提高ASP的速度
  • asp ADO GetString函數(shù)與用GetString來提高ASP的速度
  • asp中在JScript中使用RecordSet對象的GetRows
  • 在asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼
  • asp中記錄集對象的getrows和getstring用法分析

標(biāo)簽：上海 通遼 邢臺 涼山 清遠(yuǎn) 楚雄 赤峰 南京

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼》，本文關(guān)鍵詞  asp,中,通過,getrows,實現(xiàn),；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼》相關(guān)的同類信息！
  • 本頁收集關(guān)于asp中通過getrows實現(xiàn)數(shù)據(jù)庫記錄分頁的一段代碼的相關(guān)信息資訊供網(wǎng)民參考！
    • 推薦文章
    主站蜘蛛池模板： 锡林郭勒盟| 皮山县| 辰溪县| 齐齐哈尔市| 开江县| 富锦市| 巴东县| 曲沃县| 新宁县| 平南县| 樟树市| 长春市| 墨竹工卡县| 孝昌县| 八宿县| 海兴县| 许昌市| 永定县| 博白县| 搜索| 汤原县| 建平县| 佛山市| 孝昌县| 临猗县| 合江县| 通州市| 綦江县| 长汀县| 宁津县| 西林县| 万源市| 渭源县| 循化| 高雄市| 霍林郭勒市| 岐山县| 宜州市| 平潭县| 灯塔市| 德庆县|