webmod.asp

全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 系统概述： 软件名称：全球商务网站系统 当前版本：V1.0 最新版本：V1.1 运行环境：WINNT+（IIS）

<!--#include file="../head.asp"--> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script Language="JavaScript"> 
function info(mylink)
{
window.open(mylink,'','top=50,left=120,width=555,height=500,scrollbars=yes')
}
function FormCheck() 
{ 
var check=true;
for(var i=0;i<document.Form1.url.length;i++){
if (document.Form1.url[i].checked) {
check=false;
break;
} 
}
if (check){
alert("请选择网站模版样式！");
document.Form1.url[1].focus();
return false;
}
document.Form1.submit()
} 
</script> 
<%
sql="select * from mod"
set rs=server.createobject("adodb.recordset") 
rs.open sql,conn,1,1 
 

msg_per_page=9 '定义每页显示记录条数
rs.pagesize=msg_per_page '定义分页记录集每页显示记录数

if not (rs.eof and rs.bof) then
	totalrec=RS.RecordCount'总记录条数
	if rs.recordcount mod msg_per_page=0 then'计算总页数,recordcount:数据的总记录数
		n=rs.recordcount\msg_per_page'n:总页数
	else
		n=rs.recordcount\msg_per_page+1                        
	end if                                                                
	currentpage=request("page")'currentpage:当前页
	If currentpage <> "" then
		currentpage =  cint(currentpage)
		if currentpage < 1 then  
			currentpage = 1
		end if  
		if err.number <> 0 then '错误处理
			err.clear
			currentpage=1
		end if
	else
		currentpage=1
	End if                                                                
	if currentpage*msg_per_page > totalrec and not((currentpage-1)*msg_per_page < totalrec)then 
		currentPage=1
	end if
	rs.absolutepage=currentpage'absolutepage：设置指针指向某页开头
	rowcount=rs.pagesize'pagesize：设置每一页的数据记录数
end if
%> 
<TABLE cellSpacing=0 cellPadding=0 width=778 border=0> 
  <TBODY> 
    <TR> 
      <TD vAlign=top align=middle width=150>
	  <SCRIPT LANGUAGE='JavaScript' SRC='../images/left.js' TYPE='text/javascript'></script> 
        <TABLE cellSpacing=0 cellPadding=0 width=150 border=0> 
          <TBODY> 
            <TR> 
              <TD vAlign=top align=middle width=150 
          background=../images/leftmanu_bg.gif> <TABLE cellSpacing=0 cellPadding=0 width=150 border=0> 
                  <TBODY> 
                    <TR> 
                      <TD width=150 
                  background=../images/leftmanu_topbg.gif><IMG height=30 
                  src="../images/leftmanu_top.gif" 
              width=150></TD> 
                    </TR> 
                  </TBODY> 
                </TABLE> 
                <TABLE cellSpacing=0 cellPadding=0 width=150 border=0> 
                  <TBODY> 
                    <TR> 
                      <TD class=leftmenu1 
                onclick="location.href='../index.asp'"><IMG 
                  height=18 src="../images/leftmanu_home.gif" width=16 
                  align=absMiddle> 商务助手首页</TD> 
                    </TR> 
                    <TR> 
                      <TD class=leftmenu1 
                onclick=javascript:menu_display(table1,img1);><IMG id=img1 
                  height=16 src="../images/fold_1.gif" width=16 
                  align=absMiddle> 发布商业信息</TD> 
                    </TR> 
                  <TBODY id=table1 style="DISPLAY: none"> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../tradeinfo/add_info.asp">发布供求信息</A> </TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../tradeinfo/edit.asp">管理供求信息</A> </TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../productshow/add_product.asp">发布产品信息</A> </TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 

                  class=linkstyle2 

                  href="../productshow/edit.asp">管理产品信息</A></TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../modify/modify_mine.asp">展会信息管理</A> </TD> 
                    </TR> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../corporation/company_edit.asp">公司介绍</A></TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../bizre/index.asp">商贸通档案</A></TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                  </TBODY> 
                  <TBODY> 
                    <TR> 
                      <TD class=leftmenu1 onclick=menu_display(table2,img2)><IMG 
                  id=img2 height=16 src="../images/fold_1.gif" width=16 
                  align=absMiddle> 查看商业往来</TD> 
                    </TR> 
                  <TBODY id=table2 style="DISPLAY: none"> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../getprice/receivemessagelist.asp">我收到的留言</A> </TD> 
                    </TR> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../getprice/sendmessagelist.asp">我发出的留言</A> </TD> 
                    </TR> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../getprice/sendnewmessage.asp">发新留言</A> </TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../myemail/index.asp">我订阅的信息</A></TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../myfriend/index.asp">我的商业伙伴</A> </TD> 
                    </TR> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../trust/index.asp">会员评价</A> </TD> 
                    </TR> 
                  </TBODY> 
                  <TR> 
                    <TD class=leftmenu1 onclick=menu_display(table3,img3)><IMG 
                  id=img3 height=16 src="../images/fold_2.gif" width=14 
                  align=absMiddle> 我的会员资料</TD> 
                  </TR> 
                  <TBODY id=table3> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A 
                  class=linkstyle2 
                  href="../modify/modify_info.asp">修改注册信息</A> </TD> 
                    </TR> 
                    <!-- 正常情况下  --> 
                    <TR> 
                      <TD class=leftmenu2><IMG src="../images/plus.gif"> <A