ASP通用分页类_Web开发_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

ASP通用分页类

作者：闵涛文章来源：闵涛的学习笔记点击数：2346 更新时间：2009/4/23 10:27:43

ASP通用分页类

一、类的属性、方法
　　这是一个ASP通用分页类。你可以用它方便的给记录集分页，当然在网上有许多的分页类和分页函数。本分页主要有Conn、SQL、URL、FieldList、PageSize、Template、Init、Show、Close等属性和方法。
　　1.Conn属性　　　：用来获取一个已创建的Connection对象。
　　2.SQL属性　　　　　：根据传入的SQL语句，自动创建RecordSet对象
　　3.PageSize属性　　：设置第页的记录条数
　　4.FieldList属性　　　：如果需要显示库中的数据，一定要设置此属性。它是用来获取需要显示的正确的字段名。
　　5.URL属性　　　　：设置分页条中链接的文件地址。
　　6.Template属性　　：设置分页文件的模版。
　　7.Init过程　　　　：分页类初始化数据。
　　8.Show过程　　：显示数据。
　　9.Close过程　　　：分页类结束

全部代码由此下载

二、简化类的源代码及调用代码（不含数据显示功能）

pages.asp
<%Option Explicit Dim strStartTime,intUseTime strStartTime = timer() %>  <% Dim clsPage,strShowTemp '分页显示的位置：SW_intPageInAll,SW_intPageInTop,SW_intPageInBottom Set clsPage = New SWPage clsPage.Conn = "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.Mappath("../DB/datatest.mdb") clsPage.SQL = "SELECT * FROM datatest" clsPage.PageSize = 10 clsPage.URL = "pages.asp" clsPage.Init() clsPage.Pages() '.............................. '............................ ' 此处加入数据显示代码 '.............................. '.............................. clsPage.Pages() clsPage.Close Set clsPage = Nothing intUseTime = FormatNumber((timer()-strStartTime)*1000,3) Response.Write("<br><br><center>共用时 <font color=""#FF0000"">" & intUseTime & "</font> 毫秒</center>") %>
[Ctrl+A 全部选择然后拷贝]

inc_clsPages.asp
<%'Option Explicit '/************************************************ '* * '* Name : An common process database class * '* Author : cjj * '* Version : V3.0 * '* Time : 2004-01-12 * '* Comefrom: http://www.blueidea.com/ * '* HomePage: None (Maybe Soon) * '* Notice : You can use and modify it freely, * '* BUT PLEASE HOLD THIS ITEM. * '* If you modify it that i hope you * '* can send a mail for me. * '* * '************************************************/ '#########声明变量######### '显示的页数的数字个数 Const SW_intShowPages = 10 'SWData Class Private SW_blnIsHaveRS,SW_strFields,SW_blnInConn,SW_intShowPagePos,SW_strShowWidth '#########初始化变量########## SW_blnIsHaveRS = false '设置记录集获取标志为Fasle，就是无记录集状态 SW_strShowWidth = "90%" '默认的显示宽度为90% SW_strFields = "" SW_blnInConn = true '由内部创建Connection,如果设为False则由外部创建 '***************************************** ' 类型：类 ' 目的：给记录集分页 '***************************************** Class SWPage '声明类私有变量 Private SW_objRS,SW_objConn Private SW_strSQL,SW_strURL,SW_strError,SW_strFormAction,SW_strHeadJS,SW_strFootJS,SW_strKeyFiled Private SW_strTleBGColor,SW_strTleFTColor,SW_strTleWidth Private SW_intPageSize,SW_intTleBDType,SW_intShowPageType,SW_intShowType Private SW_lngTotalPage,SW_lngTotalRecord,SW_lngPageNo Private SW_aryFldName,SW_aryFldNote,SW_aryFldWidth,SW_aryFldAlign,SW_aryFldLink Private SW_blnInit,SW_blnOpenRS,SW_blnConn,SW_blnPageSize,SW_blnFieldList,SW_blnGetURL,SW_blnShowType,SW_blnShowPageType,SW_blnTemplate Public Property Let Conn(a_strConn) Set SW_objConn = CreateObject("Adodb.Connection") On Error Resume Next SW_objConn.Open a_strConn On Error Goto 0 End Property Public Property Let SQL(a_strSQL) SW_strSQL = a_strSQL '创建RecordSet对象 Set SW_objRS = CreateObject("adodb.RecordSet") On Error Resume Next SW_objRS.Open SW_strSQL,SW_objConn,1,1 on error goto 0 End Property Public Property Let PageSize(a_intPageSize) SW_intPageSize = CLng(a_intPageSize) End Property Public Property Let URL(a_strURL) SW_strURL = a_strURL End Property Sub Init() Dim intPostion,strError,i,objRSTemp,lngTotalRecord If SW_objRS.Eof And SW_objRS.Bof Then strError = strError & "<br>库中无任何记录" End If '计算总计录数 Set objRSTemp = SW_objConn.Execute("SELECT * FROM SW_RecCount") SW_lngTotalRecord = CLng(objRSTemp("SW_RecCount").Value) '计算总页数 If SW_lngTotalRecord Mod SW_intPageSize = 0 Then SW_lngTotalPage = CLng(SW_lngTotalRecord \ SW_intPageSize * -1)*-1 Else SW_lngTotalPage = CLng(SW_lngTotalRecord \ SW_intPageSize * -1)*-1 + 1 End If '获取页数 SW_lngPageNo = Trim(Request.QueryString("pageno")) If SW_lngPageNo = "" Then SW_lngPageNo = Trim(Request.Form("PageNo")) If SW_lngPageNo = "" Then SW_lngPageNo = 1 '如果没有选择第几页，则默认显示第一页 If SW_lngPageNo <> "" And IsNumeric(SW_lngPageNo) Then SW_lngPageNo = CLng(SW_lngPageNo) If (SW_lngPageNo > SW_lngTotalPage AND SW_lngTotalPage<>0) Then SW_lngPageNo = SW_lngTotalPage SW_objRS.PageSize = SW_intPageSize SW_objRS.AbsolutePage = SW_lngPageNo intPostion = InstrRev(SW_strURL,"?") SW_strFormAction = SW_strURL If intPostion > 0 Then SW_strURL = SW_strURL & "&PageNo=" Else SW_strURL = SW_strURL & "?PageNo=" End If End Sub '***************************************** ' 类型：过程 ' 目的：显示分页信息 ' 输入：无 ' 返回：无 '***************************************** Public Sub Pages() Dim strPages,k,intTemp,intTemp1 If SW_lngTotalPage = 1 Then Exit Sub Response.Write("<table align=""center"" class=""css_ShowPage"" width=""" & SW_strShowWidth & """>" & vbcrlf) Response.Write(" <tr>" & vbcrlf) Response.Write(" <td>" & vbcrlf) Response.Write(" <table width=""100%"">" & vbcrlf) Response.Write(" <tr>" & vbcrlf & " <td align=""center"" valign=""middle"" class="".test1"">" & vbcrlf) If SW_lngTotalPage >= 1 Then If SW_lngPageNo <= 1 Then Response.Write ("首页前页 <a href=""" & SW_strURL & SW_lngPageNo+1 & """>后页</a> <a href=""" & SW_strURL & SW_lngTotalPage & """>末页</a>" & vbcrlf) Else If SW_lngPageNo >= SW_lngTotalPage Then Response.Write ("<a href=""" & SW_strURL & "1"">首页</a> <a href=""" & SW_strURL & SW_lngPageNo -1 & """>前页</a> " & "后页末页" & vbcrlf) Else Response.Write ("<a href=""" & SW_strURL & "1"">首页</a> <a href=""" & SW_strURL & SW_lngPageNo -1 & """>前页</a> " & "<a href=""" & SW_strURL & SW_lngPageNo+1 & """>后页</a> <a href=""" & SW_strURL & SW_lngTotalPage & """>末页</a>" & vbcrlf) End If End If Response.Write ("　页次：<b>" & SW_lngPageNo & "</b>/" & SW_lngTotalPage & "页共<b>" & SW_lngTotalRecord & "</b>条记录　<b>" & SW_intPageSize & "</b>条/页</td>" & vbcrlf) Response.Write(" <form name=""gopage"" action=""" & SW_strFormAction & """ method=""post"">" & vbcrlf) Response.Write(" <td> 第") Response.Write(" <input type=""text"" name=""pageno"" size=""3"" maxlength=4 title=""请输入页号,然后回车"">页 " & vbcrlf) Response.Write("<input type=""submit"" value=""GO""></td></form></tr>" & vbcrlf) End If Response.Write(" </table>" & vbcrlf) Response.Write(" </td>" & vbcrlf) Response.Write(" </tr>" & vbcrlf) Response.Write("</table>" & vbcrlf) End Sub Sub Close() Set SW_objRS = Nothing Set SW_objConn = Nothing End Sub End Class %>
[Ctrl+A 全部选择然后拷贝]

三、复杂类的源代码及调用代码（含数据显示功能）

pages.asp
<%Option Explicit Dim strStartTime,intUseTime,clsPage,strShowTemp strStartTime = timer() %>  <% '分页显示的位置：SW_intPageInAll,SW_intPageInTop,SW_intPageInBottom '页数的显示模式：SW_intShowChinese,SW_intShowEnglish,SW_intShowCharacter,SW_intShowImage '页面显示模板设置　<文件头> + <页数设置：分页显示模式,页数显示的位置> + <数据显示> + <页数显示> + <文件尾>如果某项不需要，只要设置成<>就行了，不过<文件头>和<文件尾是必须的> '设置分页文件头,可以直接跟HTML代码({code=<html>....</html>}) strShowTemp = "[file=head.js] + " '设置分页条显示信息 strShowTemp = strShowTemp & "[page=" & SW_intPageInAll & "," & SW_intShowCharacter & "] + " '########设置数据模版信息 strShowTemp = strShowTemp & "[data=" '设置显示的宽度 strShowTemp = strShowTemp & "90%|" '数据显示方式，竖排、横排 strShowTemp = strShowTemp & SW_intVerticalView & "|" '需要显示的字段的相应的中文说明</p><p align='center'><b><font color='red'>[1]</font> <a href='ShowArticle.asp?ArticleID=14246&Page=2'>[2]</a> <a href='ShowArticle.asp?ArticleID=14246&Page=3'>[3]</a> <a href='ShowArticle.asp?ArticleID=14246&Page=4'>[4]</a> <a href='ShowArticle.asp?ArticleID=14246&Page=5'>[5]</a> <a href='ShowArticle.asp?ArticleID=14246&Page=2'>下一页</a></b></p><br>[<a class="" href="/Article/ShowClass.asp?ClassID=114">Web开发</a>]<a class='LinkArticleCorrelative' href='/Article/ShowArticle.asp?ArticleID=14266' title='文章标题：创建一个ASP通用分页类作者：武汉SEO闵涛更新时间：2009/4/23 10:27:55' target="_self">创建一个ASP通用分页类</a> <script type="text/javascript"> /*728*90，创建于2010-9-16*/ var cpro_id = 'u203664';</script> <script type="text/javascript" src="http://cpro.baidu.com/cpro/ui/c.js"></script> <script language=javascript> document.body.oncopy=function(){ event.returnValue=false; var t=document.selection.createRange().text; var s=" 来源:[学习笔记★闵涛★计算机学习电脑编程软硬件技巧-Web开发] "+location.href; window.clipboardData.setData('Text', t+'\r\n'+s); } </script><center></center></td></tr> <tr><td height="10"></td></tr> <tr><td align='right' class="Article_tdbgall">教程录入：mintao 责任编辑：mintao </td></tr> <tr><td height="1" background="/Skin/sealove/line01.gif"></td></tr> <tr><td height="6"></td></tr> <tr><td><li>上一篇教程： <a class='LinkPrevArticle' href='/Article/ShowArticle.asp?ArticleID=14245' title='文章标题：用ASP编写计数器的方法作者：武汉SEO闵涛更新时间：2009/4/23 10:27:43'>用ASP编写计数器的方法</a></li><br><li>下一篇教程： <a class='LinkNextArticle' href='/Article/ShowArticle.asp?ArticleID=14247' title='文章标题：内容管理系统的设计和选型作者：武汉SEO闵涛更新时间：2009/4/23 10:27:43'>内容管理系统的设计和选型</a></li></td></tr> <tr><td height="6"></td></tr> <tr><td height="1" bgcolor="#CCCCCC"></td></tr> <tr><td height="22" bgcolor="#F2F2F2" align="right">【字体：<a href="javascript:fontZoomA();" class="top_UserLogin">小</a> <a href="javascript:fontZoomB();" class="top_UserLogin">大</a>】【<a href="/Article/Comment.asp?ArticleID=14246" target="_blank">发表评论</a>】【<a href="/User/User_Favorite.asp?Action=Add&ChannelID=1&InfoID=14246" target="_blank">加入收藏</a>】【<a href="/Article/SendMail.asp?ArticleID=14246" target="_blank">告诉好友</a>】【<a href="/Article/Print.asp?ArticleID=14246" target="_blank">打印此文</a>】【<a href="javascript:window.close();">关闭窗口</a>】 </td></tr> <tr><td height="1" bgcolor="#CCCCCC"></td></tr> </table> <table width="100%" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td height="25">　<img src="/Images/TEAM.gif" align="absmiddle"> 注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] </td></tr> <tr><td height="25">　<img src="/Images/TEAM.gif" align="absmiddle">　<b>网友评论：</b>（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）</td></tr> <tr><td class="main_tdbg_760"> <script language='javascript' src='/Article/Comment.asp?Action=JS&CommentNum=10&ArticleID=14246'></script> </td></tr> </table><br> </td> </tr> </table> </td> <td width="5"></td> <td width="1" bgcolor="#EEEEEE"></td> <td width="5"></td> <td width="170" valign="top"> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="33" height="28"><img src="/Skin/sealove/Column01_L.gif"></td> <td background="/Skin/sealove/Column01_BG.gif" style="color:#FFFFFF"><b>同类栏目</b></td> <td width="10"><img src="/Skin/sealove/Column01_R.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="1" bgcolor="#AAAAAA"></td> <td valign="top"> <table width="96%" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td height="70" valign="top">· <a class='childclass' href='/Article/ShowClass.asp?ClassID=114' target="_self">Web开发</a> · <a class='childclass' href='/Article/ShowClass.asp?ClassID=115' target="_self">网页制作</a><br>· <a class='childclass' href='/Article/ShowClass.asp?ClassID=27' target="_self">平面设计</a> · <a class='childclass' href='/Article/ShowClass.asp?ClassID=28' target="_self">网站运营</a><br>· <a class='childclass' href='/Article/ShowClass.asp?ClassID=29' target="_self">网站推广</a> · <a class='childclass' href='/Article/ShowClass.asp?ClassID=30' target="_self">搜索优化</a><br>· <a class='childclass' href='/Article/ShowClass.asp?ClassID=116' target="_self">建站心得</a> · <a class='childclass' href='/Article/ShowClass.asp?ClassID=117' target="_self">站长故事</a><br>· <a class='childclass' href='/Article/ShowClass.asp?ClassID=66' target="_self">互联动态</a></td></tr> </table> </td> <td width="1" bgcolor="#AAAAAA"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="6" height="23"><img src="/Skin/sealove/Column01_Lb.gif"></td> <td background="/Skin/sealove/Column01_BGb.gif" align="right"><img src="/Skin/sealove/More01.gif" border="0" alt="更多内容"></td> <td width="6"><img src="/Skin/sealove/Column01_Rb.gif"></td> </tr> <tr><td colspan="3" height="8"><img src="/Skin/sealove/space.gif"></td></tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="14" height="28"><img src="/Skin/sealove/Column02_L.gif"></td> <td background="/Skin/sealove/Column02_BG.gif" style="color:#0099BB"><b>热门推荐</b></td> <td width="45" background="/Skin/sealove/Column02_BG.gif" align="right"><a href="/Article/ShowElite.asp"><img src="/Skin/sealove/More01.gif" border="0" alt="更多内容"></a></td> <td width="10"><img src="/Skin/sealove/Column02_R.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="7" background="/Skin/sealove/Column02_Lc.gif"></td> <td valign="top"> <table width="96%" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td height="80" valign="top"><li>没有教程</li></td></tr> </table> </td> <td width="7" background="/Skin/sealove/Column02_Rc.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="8" height="7"><img src="/Skin/sealove/Column02_Lb.gif"></td> <td background="/Skin/sealove/Column02_BGb.gif"><img src="/Skin/sealove/space.gif"></td> <td width="8"><img src="/Skin/sealove/Column02_Rb.gif"></td> </tr> <tr><td colspan="3" height="8"><img src="/Skin/sealove/space.gif"></td></tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="33" height="28"><img src="/Skin/sealove/Column01_L.gif"></td> <td background="/Skin/sealove/Column01_BG.gif" style="color:#FFFFFF"><b>赞助链接</b></td> <td width="10"><img src="/Skin/sealove/Column01_R.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="1" bgcolor="#AAAAAA"></td> <td valign="top"> <table width="98%" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td height="600" valign="top"> <script type="text/javascript"> /*160*600，创建于2010-9-16*/ var cpro_id = 'u203713';</script> <script type="text/javascript" src="http://cpro.baidu.com/cpro/ui/c.js"></script> </td></tr> </table> </td> <td width="1" bgcolor="#AAAAAA"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="6" height="23"><img src="/Skin/sealove/Column01_Lb.gif"></td> <td background="/Skin/sealove/Column01_BGb.gif" align="right"><img src="/Skin/sealove/More01.gif" border="0" alt="更多内容"></td> <td width="6"><img src="/Skin/sealove/Column01_Rb.gif"></td> </tr> <tr><td colspan="3" height="8"><img src="/Skin/sealove/space.gif"></td></tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="14" height="28"><img src="/Skin/sealove/Column02_L.gif"></td> <td background="/Skin/sealove/Column02_BG.gif" style="color:#0099BB"><b><a href="http://www.mintao.net/blog/" target="_blank">闵涛</a>博文</b></td> <td width="45" background="/Skin/sealove/Column02_BG.gif" align="right"><a href="/blog/"><img src="/Skin/sealove/More01.gif" border="0" alt="更多关于武汉SEO的内容"></a></td> <td width="10"><img src="/Skin/sealove/Column02_R.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="7" background="/Skin/sealove/Column02_Lc.gif"></td> <td valign="top"> <table width="96%" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td height="80" valign="top"><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"/> <title>500 - 内部服务器错误。</title> <style type="text/css">  </style> </head> <body> <div id="header"><h1>服务器错误</h1></div> <div id="content"> <div class="content-container"><fieldset> <h2>500 - 内部服务器错误。</h2> <h3>您查找的资源存在问题，因而无法显示。</h3> </fieldset></div> </div> </body> </html> </td></tr> </table> </td> <td width="7" background="/Skin/sealove/Column02_Rc.gif"></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr><td width="8" height="7"><img src="/Skin/sealove/Column02_Lb.gif"></td> <td background="/Skin/sealove/Column02_BGb.gif"><img src="/Skin/sealove/space.gif"></td> <td width="8"><img src="/Skin/sealove/Column02_Rb.gif"></td> </tr> <tr><td colspan="3" height="8"><img src="/Skin/sealove/space.gif"></td></tr> </table> </td> <td width="5"></td> <td width="8" background="/Skin/sealove/Main_Right.gif"></td> </tr> </table> <table cellSpacing=0 cellPadding=0 width=1000 align=center bgColor=#ffffff border=0> <tr> <td width=8 background=/Skin/sealove/Main_Left.gif></td> <td vAlign=top> <table cellSpacing=0 cellPadding=0 width="100%" border=0> <tr> <td bgColor=#faac24 height=1></td> </tr> <tr> <td height=1></td> </tr> <tr> <td bgColor=#faac24 height=9></td> </tr> <tr> <td height=1></td> </tr> <tr> <td bgColor=#faac24 height=1></td> </tr> </table> <table cellSpacing=0 cellPadding=0 width="90%" align=center border=0> <tr> <td style="COLOR: #000000" align=middle height=25>| <A class=Bottom onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.mintao.net/');" href="#">设为首页</A> |<A class=Bottom href="javascript:window.external.addFavorite('http://www.mintao.net/','学习笔记★闵涛★计算机学习电脑编程软硬件技巧');">加入收藏</A> | <A class=Bottom href="mailto:admin@mintao.net">联系站长</A> | <A class=Bottom href="/FriendSite/Index.asp" target=_blank>友情链接</A> | <A class=Bottom href="/Copyright.asp" target=_blank>版权申明</A> | <A class=Bottom href="/html/friends.html" target=_blank>广告服务</A> </td> </tr> <tr> <td background=/Skin/sealove/line01.gif height=1></td> </tr> </table> <table cellSpacing=0 cellPadding=0 width="100%" border=0> <tr> <td align=middle width=210><A href="http://www.mintao.net/" target=_blank><IMG alt=MinTao学以致用网 src="/Skin/sealove/PElogo_sealove.gif" border=0></A></td> <td><table border=0 width=100% cellspacing=0 cellpadding=0> <tr> <td colspan=2> <p align=center><span style='font-size: 9pt'>Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（<A href='http://www.mintao.net/'>学习笔记</A>） Inc All Rights Reserved. <br> <A href='http://www.mintao.net/'>闵涛</A> <a target="blank" href="http://wpa.qq.com/msgrd?V=1&Uin=543098146&Site=敏韬网&Menu=yes" rel="nofollow"><img border="0" SRC=http://wpa.qq.com/pa?p=1:543098146:10 alt='投放广告、内容合作请Q我!'></a> E_mail:admin@mintao.net(欢迎提供学习资源)</span></p> <div style="width:300px;margin:0 auto; padding:1px 0;"> <a target="_blank" href="http://www.beian.gov.cn/portal/registerSystemInfo?recordcode=42011102001154" style="display:inline-block;text-decoration:none;height:20px;line-height:20px;"><img src="http://www.mintao.net/images/beian_ico.png" style="float:left;"/><p style="float:left;height:20px;line-height:20px;margin: 0px 0px 0px 5px; color:#939393;">鄂公网安备 42011102001154号</p></a> </div> <p align=center><span style='font-size: 9pt'> 站长：<A href='http://www.mintao.net/'>MinTao</A> <align=center><span style='font-size: 9pt;color:#7f270f'>ICP备案号：<a target="_blank" href="https://beian.miit.gov.cn">鄂ICP备11006601号-18</a> <script src='http://s79.cnzz.com/stat.php?id=495319&web_id=495319&show=pic' language='JavaScript' charset='gb2312'></script> <script type="text/javascript"> var _bdhmProtocol = (("https:" == document.location.protocol) ? " https://" : " http://"); document.write(unescape("%3Cscript src='" + _bdhmProtocol + "hm.baidu.com/h.js%3F83055e3c4dcc2c9c0e7ad2643e08b99d' type='text/javascript'%3E%3C/script%3E")); </script> </span></p></td> </tr> <tr> <td align=center> 闵涛站盟:<A href='http://pub.mintao.net/' target='_blank'>医药大全</A>-<A href='http://www.iwuxue.com/' target='_blank'>武穴网</A>。<A href='http://www.mintao.net/sitemap_index.xml' target='_blank'>A</A>打造<A href='http://www.mintao.net/SiteMap/Soft1.htm' target='_blank'>B</A>、<A href='http://www.mintao.net/SiteMap/Article1.htm' target='_blank'>C</A>、<A href='http://www.mintao.net/SiteMap/Photo1.htm' target='_blank'>D</A>……</span></td> <td> </td> </tr> </table> <script language="JavaScript" src="http://www.mintao.net/js/qqkf.js"></script> </td> <td width=20></td> <td width=120 height=80><A href="http://xianning.cyberpolice.cn/" rel="nofollow" target=_blank><IMG alt=咸宁网络警察报警平台 src="http://www.mintao.net/images/xnwj.gif" width=120 border=0></A></td> </tr> </table> </td> <td width=8 background=/Skin/sealove/Main_Right.gif></td> </tr> </table> <script type="text/javascript"> /*blog.mintao.net250*200 创建于 2015-07-01*/ var cpro_id = "u2183153"; </script> <script src="http://cpro.baidustatic.com/cpro/ui/f.js" type="text/javascript"></script> <table width="1000" align="center" border="0" cellpadding="0" cellspacing="0"> <tr><td width="15"><img src="/Skin/sealove/Main_BottomLeft.gif"></td> <td height="11" background="/Skin/sealove/Main_BottomBG.gif"><img src="/Skin/sealove/space.gif"></td> <td width="15"><img src="/Skin/sealove/Main_BottomRight.gif"></td> </tr> <tr><td colspan="3" height="5"></td></tr> </table> </body> </html><NOSCRIPT><IFRAME src='*' Width='0' Height='0'></IFRAME></NOSCRIPT>