<%@ Language=VBScript%>
<%
Response.Buffer=false
Response.Expires=0
%>
<!-- #include file="./dsnroot.asp" -->
<!-- #include file="./links.asp" -->
<%
set cn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
set rs1=Server.CreateObject("ADODB.Recordset")
cn.Open mycnstr
id=Request.QueryString ("id")
menu="0000100"
flag=Request.QueryString ("flag")
if flag="" then
	flag=0
else
	flag=cint(flag)
end if	
if flag=9 then
	iurl="./user/login.asp"
	iheight="250"
	ptitletxt="会员登录"
elseif flag=1 then
	iurl="user/reg_contract.asp"	
	iheight="450"
	ptitletxt="注册会员"
elseif flag=2 then
	iurl="checkwarn.asp"	
	iheight="350"
	ptitletxt="请您登录"
elseif flag=3 then
	iurl="./user/user_center.asp"	
	iheight="300"
	ptitletxt="会员中心"
elseif flag=4 then
	iurl="./user/reg_edituser.asp?editflag=1"	
	iheight="450"
	ptitletxt="我的资料"	
elseif flag=5 then
	iurl="./user/edit_pass.asp"	
	iheight="250"
	ptitletxt="修改密码"
elseif flag=7 then
	iurl="./user/user_pass.asp"	
	iheight="250"
	ptitletxt="找回密码"		
end if
if flag=0 then
	if session("username")="" then 
			iurl="./user/login.asp"
			iheight="250"
			ptitletxt="会员登录"		
		else
			iurl="./user/user_center.asp"	
			iheight="300"
			ptitletxt="会员中心"
	end if
end if
pflag=9
xx=1
%>
<!-- #include file="./func.inc" -->
<!-- #include file="./begin.asp" -->
      <table width="778" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="170" bgcolor="#079C07" valign="top" align="center"> 
			<!-- #include file="./bbs_left.asp" -->
          </td>
          <td bgcolor="#FFFFEC" valign="top" align="center"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td align="right" height="70">&nbsp;</td>
              </tr>
            </table>
            <table width="95%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="20" height="36"><img src="images/company/title_sign.gif" width="14" height="18"></td>
                <td class="font2"><font color="#996600"><b><%=ptitletxt%></b></font></td>
                <td align="right" valign="bottom">
					<%if session("username")<>"" then%>
					  <%if session("userflag")<>1 then%>
							<a href="forum_center.asp?flag=4" class="a02">[修改资料]</a>&nbsp;
					  <%end if%>		
					<a href="forum_center.asp?flag=5" class="a02">[修改密码]</a>&nbsp;
					<a href="#" onclick="logout()" class="a02">[安全退出]</a>&nbsp;
					<%end if%>
                </td>
              </tr>
            </table>
            <table width="95%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td background="images/company/point_line.gif" height="1"></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
              </tr>
            </table>  
            <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#ffffec">
              <tr> 
                <td class="font2"><iframe src="<%=iurl%>" name=main width="98%" height=<%=iheight%> scrolling=no frameborder=0></iframe></td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td width="170" bgcolor="#079C07" valign="top" align="center">&nbsp;</td>
          <td bgcolor="#FFFFEC" valign="top" align="center">
            <table width="95%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td colspan="2">&nbsp;</td>
              </tr>
              <tr> 
                <td height="1" colspan="2" background="images/company/point_line.gif"></td>
              </tr>
              <tr> 
                <td height="36" align="right"><img src="images/company/icon_top.gif" width="14" height="14"></td>
                <td height="36" width="30" align="center"><a href="#" class="a02">向上</a></td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
<!-- #include file="./end.asp" -->
