<!--#include file="inc/conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/safe.asp"-->
<!--#include file="inc/const.asp"-->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>红嫂视屏交友网</title>
<meta name="keywords" content="情感,在线,新新,照片,动感影片,诗歌,爱情,纯洁,心连心">
<meta name="description" content="红嫂视屏交友情缘 情感在线">
<link href="style.css" rel="stylesheet" type="text/css">
<link href="css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-image: url();
}
.STYLE81 {color: #CC0099;
	font-size: 12px;
}
-->
</style>
</head>
<body>
<%
if MemberClass="VIP会员" then
  response.Write "<script language='javascript'>alert('您已经是VIP会员，无须申请升级！');window.location='myhome.asp'</script>"
  response.end
end if



dim logins,lastlogintime,artnum,lycount,photo,renqi
set rs=server.CreateObject("adodb.recordset")
sql="select logins,lastlogin,aq,artnum,photo,renqi,endtime,grade,innum,outnum from user_info where userid="& UserId &""
rs.open sql,conn,1,3
if not rs.bof then
  logins=rs("logins")
  lastlogintime=rs("lastlogin")
  artnum=rs("artnum")
  photo=rs("photo")
  renqi=rs("renqi")
  innum=rs("innum")
  outnum=rs("outnum")
  aqb=rs("aq")
  if isnull(rs("endtime")) or rs("endtime")<now() then
    rs("grade")=1
	rs.update
	Response.Cookies(Forum_sdjy)("userclass")="注册会员"
	memberclass=checkStr(request.cookies(Forum_sdjy)("Userclass"))
  end if
end if
rs.close
set rs=nothing
set rs=server.CreateObject("adodb.recordset") '新留言数
sql1="select count(*) from sd_ly where userid="& UserId &" and isread=0"
rs.open sql1,conn,1
lycount=rs(0)
rs.close
set rs=nothing






%>
<table width="1002" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><!--#include file="top.asp"--></td>
  </tr>
</table>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td width="219" height="168" align="center" valign="top"><div align="left"><!--#include file="help_lf.asp"-->
        </div></td>
    <td width="731" align="center" valign="top"><div align="left"></div>
        <table width="730" border="0" align="left" cellpadding="0" cellspacing="0" style="border-left:#9DCCF6 1px solid;border-right:#9DCCF6 1px solid;border-bottom:#9DCCF6 1px solid;border-top:#9DCCF6 1px solid  ">
          <tr>
            <td height="28" colspan="3" background="images/lg_1.gif">&nbsp;&nbsp;<strong>会员升级申请</strong></td>
          </tr>
          <tr>
            <td width="32" height="484">&nbsp;</td>
            <td width="659" valign="top"><br>
              <br>
              <table width="657" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td align="center"><table width="100%" border="0" align="left" cellpadding="0" cellspacing="0">
                    <tr>
                      <td align="center"><table width="639" border="0" align="left" cellpadding="0" cellspacing="1" class="STYLE4">
                          <tbody>
                            <tr>
                              <td valign="top" width="314"><TABLE class=STYLE4 border=0 cellPadding=2 cellSpacing=1 width="99%">
                                  <FORM action="saveupdate.asp" method=post name=inputform onsubmit=return(checkform())>
                                    <TBODY>
                                      <TR bgcolor="#EDF8FE">
                                        <TD width="29%" height="26">用 户 名： </TD>
                                        <TD width="68%" bgcolor="#EDF8FE"><input name=user_name type=text class="st" maxlength=20 style="width:90px;height:19px;" value="<%=Membername%>"></TD>
                                      </TR>
                                      <TR bgcolor="#EDF8FE">
                                        <TD width="29%" height="26">类　　型： </TD>
                                        <TD width="68%"><SELECT name=vipclass size=1 class="st" style="width:90px;">
                                                                                     <option value="3">VIP会员</option>
                                          </SELECT>                                        </TD>
                                      </TR>
                                      <TR bgcolor="#EDF8FE">
                                        <TD height="26">期　　限：</TD>
                                        <TD bgcolor="#EDF8FE"><select name="sdate" id="sdate" onChange="check_change(this)" style="width:90px;">                                             <option value="">请选择</option>
                                           <%set vipjg=conn.execute("select * from vipjg")
										   do while not vipjg.eof%>
										   
										    <option value="<%=vipjg("jg")%>"><%=vipjg("sj")%></option>
											<%vipjg.movenext
											loop%>
											
                                          </select>                                        </TD>
                                      </TR>
                                      <tr height=50>
                                        <td height="30" bgcolor="#EDF8FE"><div align="center">
                                          <input id=submit value="申请升级" type=submit name=submit class="put1">
                                        </div></td>
                                        <TD bgcolor="#EDF8FE">你的AQ币：<%=aqb%>元&nbsp;需AQ币：<label id="xy"></label>元&nbsp;</TD>
                                      </tr>
									  
									   <tr>
			     <td colspan="2" height="30" bgcolor="#EDF8FE"><div align="center"><label id="pay"  style="display:none;"><a href=pay.asp><font color=red>余额不足，请在线支付</font></a></label></div></td>
								      </tr>
 </tbody>
                                  </form>
                              </table>
                               
                                  <script language = "JavaScript">      
function check_change(src)
{
var iCount = "45";
	var iSelect = parseInt(src.value);
	var iAllCount = parseInt(iCount) * parseInt(iSelect);

xy.innerText = iSelect

if (xy.innerText><%=aqb%>){

pay.style.display='block';

} else
{
pay.style.display='none';

}

}
			
	function checkSubmit(form)
{
	var bSubmit = confirm('你所需服务费用：'+xy.innerText+'元\n\n提交后，款项会从您的预付款中扣除，是否提交？');
	if(!bSubmit)
	{
		return false;
	}else{
		form.submits.disabled = true;
		form.submits.value= "正在提交续费...";
		return true;
	}
}
                                </script>		  
                                  
                                  
                             </td>
                              <td width="322" valign="top" class="STYLE88" style="line-height:150%"><strong>VIP会员的功能：</strong><BR>
                                 <%set fw=conn.execute("select mc from fuwu")
								i=0
								 do while not fw.eof 
								 i=i+1%> <%=i%>、<font color="red"><%=fw("mc")%></font><br><%fw.movenext
								 loop%></td>
                            </tr>
                            <tr>
                              <td height="20" colspan="2" valign="top">&nbsp;</td>
                            </tr>
                            <tr>
                              <td height="1" colspan="2" background="images/hline.gif"></td>
                            </tr>
                            <!--sql防注入-->
                            <tr>
                              <td height="83" colspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="STYLE4">
                                  <tr>
                                    <td height="28"><font color="#60A7E5">所需费用</font></td>
                                  </tr>
                                  <tr>
                                    <td height="36"><BR>
                                      100元/月&nbsp;&nbsp;&nbsp;&nbsp;180元/2月&nbsp;&nbsp;&nbsp;&nbsp;240元/3月&nbsp;&nbsp;&nbsp;&nbsp;400元/半年&nbsp;&nbsp;&nbsp;&nbsp;680元/年</td>
                                  </tr>
                              </table></td>
                            </tr>
                          </tbody>
                      </table></td>
                    </tr>
           
                </table></td>
              </tr>

            </table>           
            </td>
            <td width="37">&nbsp;</td>
          </tr>
      </table></td>
  </tr>
</table>
<table width="1002" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><!--#include file="root.asp"--></td>
  </tr>
</table>
</body>
</html>
