ÔÚASPÖÐÇáËÉÊµÏÖ¼ÇÂ¼¼¯·ÖÒ³ÏÔÊ¾

ÎÄÕÂÀà±ð£ºasp | ·¢±íÈÕÆÚ:2008-10-5 20:47:33

¡¡¡¡´ó¼Ò¶¼ÖªµÀÔÚDreamwerverÖÐ¿ÉÒÔºÜ·½±ãµØÊµÏÖ¼ÇÂ¼¼¯µÄ·ÖÒ³ÏÔÊ¾£¬µ«ÊÇÉú³ÉµÄ´úÂëµÄÈ·ºÜÅÓ´ó£¬Ó°ÏìÁËÍøÒ³µÄÏÔÊ¾ËÙ¶È£¬¿´ÆðÀ´ÌõÀíÒ²²»ÊÇºÜÇåÎú£¬ÄÇÃ´£¬¿É²»¿ÉÒÔÓÃ¼òµ¥µÄ·½Ê½ÊµÏÖÍ¬ÑùµÄ¹¦ÄÜÄØ£¿µ±È»¿ÉÒÔ£¬±ÊÕßÍ¨¹ýÒÔÏÂÒ»Ð©¼òµ¥µÄ´úÂë¾ÍÊµÏÖÁË¼ÇÂ¼¼¯µÄ·ÖÒ³ÏÔÊ¾£¬ÏÖÔÚÄÃ³öÀ´´ó¼ÒÒ»Æð·ÖÏí¡£

¡¡¡¡Ö÷Òª´úÂëÈçÏÂ:

£¼%
¡¡If rs1.recordcount£¾0 Then ' ¼ÇÂ¼¼¯²»Îª¿ÕÔò´¦Àí¼ÇÂ¼
¡¡¡¡rs1.pagesize = 10 ' ÉèÖÃÃ¿Ò³ÏÔÊ¾µÄ¼ÇÂ¼Êý
¡¡¡¡num=rs1.recordcount ' ¼ÇÂ¼×ÜÊý
¡¡¡¡pagenum=rs1.pagecount ' Ò³×ÜÊý
¡¡¡¡page=request("page") ' »ñÈ¡Ò³ÂëµÄÔÊ¼ÐÅÏ¢
¡¡¡¡' ´¦ÀíÒ³ÂëÔÊ¼ÐÅÏ¢µÄ¿ªÊ¼£¡
¡¡¡¡If page £¼£¾ "" then
¡¡¡¡¡¡page = cint(page)
¡¡¡¡if err.number £¼£¾ 0 then
¡¡¡¡¡¡err.clear
¡¡¡¡¡¡page = 1
¡¡¡¡end if
¡¡¡¡if page £¼ 1 then
¡¡¡¡¡¡page = 1
¡¡¡¡end if
¡¡else
¡¡¡¡page = 1
¡¡End if
¡¡if page*rs1.pagesize £¾ num and not((page-1)*rs1.pagesize £¼ num)then
¡¡¡¡page=1
¡¡end if
¡¡' ´¦ÀíÒ³ÂëÔÊ¼ÐÅÏ¢µÄ½áÊø£¡ÉèÖÃµ±Ç°Ò³Âë
¡¡rs1.absolutepage = page
%£¾
£¼!--ÅÐ¶Ïµ±Ç°Ò³ÊÇ·ñÊÇ×îºóÒ»Ò³£¬²¢¸ù¾ÝÅÐ¶ÏÉèÖÃ¼ÇÂ¼µÄÖØ¸´ÏÔÊ¾--£¾
£¼% if page£¼£¾pagenum then
¡¡¡¡¡¡lablenum=rs1.pagesize
¡¡¡¡else
¡¡¡¡¡¡lablenum=num-(page-1)*rs1.pagesize
¡¡¡¡end if
¡¡¡¡for i=1 to lablenum
%£¾
£¼tr bgcolor="#FFFFFF"£¾
¡¡£¼td height="25"£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("id").Value)%£¾£¼/div£¾£¼/td£¾
¡¡£¼td£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("Ãû³Æ").Value)%£¾£¼/div£¾£¼/td£¾
¡¡£¼td£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("µØÖ·").Value)%£¾£¼/div£¾£¼/td£¾
¡¡£¼td£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("Àà±ð").Value)%£¾£¼/div£¾£¼/td£¾
¡¡£¼td£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("×îºóÐÞ¸Ä").Value)%£¾£¼/div£¾£¼/td£¾
¡¡£¼td£¾£¼div align="center"£¾£¼%=(rs1.Fields.Item("ÐÞ¸ÄÈË").Value)%£¾£¼/div£¾£¼/td£¾
£¼/tr£¾
£¼%
¡¡rs1.movenext
next
%£¾
£¼!--µ±Ç°Ò³µÄ¼ÇÂ¼ÏÔÊ¾½áÊø£¬ÒÔÏÂ´úÂëÎª¼ÇÂ¼¼¯·ÖÒ³Á´½Ó´úÂë--£¾
£¼table width="70%" border="0" align="center" cellpadding="0" cellspacing="0"£¾
¡¡£¼tr£¾
¡¡¡¡£¼td height="35"£¾
¡¡¡¡¡¡£¼div align="right"£¾
¡¡¡¡¡¡¡¡£¼font color="#333333"£¾
¡¡¡¡¡¡¡¡¡¡¹²ÓÐ £¼%=num%£¾ ¸öÁ´½Ó |
¡¡¡¡¡¡¡¡¡¡£¼a href=linkadmin.asp?page=1£¾Ê×Ò³£¼/a£¾ |
¡¡¡¡¡¡¡¡¡¡£¼%if page£¾1 then%£¾£¼a href=linkadmin.asp?page=£¼%=page-1%£¾£¾£¼%end if%£¾ÉÏÒ»Ò³£¼/a£¾ |
¡¡¡¡¡¡¡¡¡¡£¼%if page£¼pagenum then%£¾£¼a href=linkadmin.asp?page=£¼%=page+1%£¾£¾£¼%end if%£¾ÏÂÒ»Ò³£¼/a£¾ |
¡¡¡¡¡¡¡¡¡¡£¼a href=linkadmin.asp?page=£¼%=pagenum%£¾£¾Î²Ò³£¼/a£¾ |
¡¡¡¡¡¡¡¡¡¡¡¡Ò³´Î:£¼%=page%£¾/£¼%=pagenum%£¾Ò³ |
¡¡¡¡¡¡¡¡¡¡¡¡¹²£¼%=pagenum%£¾Ò³
¡¡¡¡¡¡¡¡£¼/font£¾
¡¡¡¡¡¡£¼/div£¾
¡¡¡¡£¼/td£¾
¡¡£¼/tr£¾
£¼/table£¾
£¼!--¼ÇÂ¼¼¯·ÖÒ³Á´½Ó´úÂë½áÊø£¬¼ÇÂ¼¼¯Îª¿ÕÊ±Ö´ÐÐÒÔÏÂ´úÂë--£¾
£¼%else%£¾
£¼tr bgcolor="#FFFFFF"£¾
£¼td height="25" colspan="6"£¾£¼div align="center"£¾£¼% response.Write("Ã»ÓÐ½á¹û¿ÉÏÔÊ¾£¡") %£¾
£¼/div£¾£¼/td£¾
£¼/tr£¾
£¼%
end if
rs1.Close()
Set rs1 = Nothing
%£¾

Windows²Ù×÷[ÎÄ]	Word½Ì³Ì [ÎÄ]	Excel½Ì³Ì [ÎÄ]	PowerPoint [ÎÄ]	Dreamweaver [ÎÄ]	Fireworks [ÎÄ]
Flash½Ì³Ì [ÎÄ]	PhotoShop [ÎÄ]	CorelDraw [ÎÄ]	CÓïÑÔ½Ì³Ì [ÎÄ]	Html½Ì³Ì [ÎÄ]	Div+Css²¼¾Ö [ÎÄ]
Javascript [ÎÄ]	ACCESSÊý¾Ý¿â [ÎÄ]	ASP½Ì³Ì [ÎÄ]	SQLServer [ÎÄ]	ASP.NET½Ì³Ì [ÎÄ]	FlashAS [ÎÄ]

Word½Ì³ÌÍø	Excel½Ì³ÌÍø	Dreamweaver ½Ì³ÌÍø	Fireworks½Ì³ÌÍø	PPT½Ì³ÌÍø	FLASH½Ì³ÌÍø	PS½Ì³ÌÍø
HTML½Ì³ÌÍø	DIV CSS½Ì³ÌÍø	FLASH AS½Ì³ÌÍø	ACCESS½Ì³ÌÍø	SQL SERVER½Ì³ÌÍø	CÓïÑÔ½Ì³ÌÍø	JAVASCRIPT½Ì³ÌÍø
ASP½Ì³ÌÍø	ASP.NET½Ì³ÌÍø	CorelDraw½Ì³ÌÍø