<!--#include file="conn.asp"-->
<!--#include file="check.asp"-->
<!--#include file="../admin/Resume.asp"-->
<!--#include file="../inc/setup.asp"-->
<!--#include file="../inc/sql.asp"-->
<%
	end if
	action=Trim(Request.QueryString("action"))
	if action="edit" then
		Resume_type=Trim(Request.Form("Resume_type"))
		if Resume_type="" then
			response.write"<SCRIPT language=JavaScript>alert('请选择您喜欢的简历风格');"
			response.write"this.location.href='Resume.asp';</script>"
		else
			Set rs = Server.CreateObject("ADODB.Recordset")
			sql="select * from person where uname='"&Request.Cookies("admin_person_name")&"'"
			rs.open sql,conn,2,3
			rs("Resume_type")=Resume_type
			rs.update
			rs.close
			response.write"<SCRIPT language=JavaScript>alert('简历风格设置成功，现在为您返回');"
			response.write"this.location.href='Resume.asp';</script>"
			rs.close
			set rs=nothing
		end if
	end if
	
	
	Set rs = Server.CreateObject("ADODB.Recordset")
	sql="select * from person where uname='"&Request.Cookies("admin_person_name")&"'"
	rs.open sql,conn,1,1
	if rs.eof then
		response.write"<SCRIPT language=JavaScript>alert('非法操作');"
		response.write"this.location.href='login.asp';</script>"
	else
		Resume_type=rs("Resume_type")
	end if
	rs.close
	set rs=nothing
%>
<HTML>
<HEAD>
<TITLE><%=homename%>-个人会员</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2800.1492" name=GENERATOR>
<LINK href="../company/images/css.css" type=text/css rel=stylesheet>
</HEAD>
<BODY>
<TABLE width=768 border=0 align="center" cellPadding=10 cellSpacing=0 borderColor=#111111 style="BORDER-COLLAPSE: collapse">
  <TBODY>
  <form name="userinfo" action="?action=edit" method="post">
    <TR>
      <TD width="96%" valign="top">
        <TABLE cellSpacing=1 cellPadding=0 width=95% bgColor=0EBDF6 border=0>
          <TBODY>
            <TR>
              <TD bgColor=#ffffff>
			  <TABLE height=24 cellSpacing=0 cellPadding=0 width=700 align=center border=0>
                <TBODY>
                  <TR>
                    <TD height=35><FONT face=Verdana color=#ff6600><STRONG>&nbsp;&nbsp;选择您的简历模版 </STRONG></FONT></FONT></TD>
                  </TR>
                  <TR>
                    <TD bgColor=0EBDF6 height=26><P style="MARGIN-TOP: 3px; MARGIN-LEFT: 10px"><font color="#ffffff" face="Verdana"><STRONG><B>简历模版设置</B> </STRONG></font></P>
                    </TD>
                  </TR>
                  <TR>
                    <TD bgColor=#e2e2e2 height=3></TD>
                  </TR>
                </TBODY>
              </TABLE>
                    <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 height=197 cellSpacing=3 cellPadding=7 width=700 align=center border=0>
                      <TBODY>
                        <TR>
                          <TD height=191 align="center" valign="top" bgColor=#F9F9F9>
<table align="center" width="99%" border="0" cellspacing="0" cellpadding="0">
              <tr>

<%
	Dim fso,objfolder,strpath
	set fso=server.createobject("Scripting.FileSystemObject")
	
	fpath="/Resume/"
	set objfolder=fso.getfolder(server.mappath(fpath))
	
	intI=0
	intII=3
	
	for each objsubfolder in objfolder.subfolders
	
	ttype=""
	
	if int(objsubfolder.name)=int(Resume_type) then
	
		ttype="checked"

	end if
	
		intI=intI+1
		
		Response.Write("<td height='100' width='33%' align='center'><a href='../Resume/"&objsubfolder.name&"/Resume.html' target='_blank'><img src='../Resume/"&objsubfolder.name&"/small.gif' border='0'></a><br><img src='../Resume/"&objsubfolder.name&"/title.gif' border='0'><br><input name='Resume_type' type='radio' value='"&objsubfolder.name&"' "&ttype&"></td>")
		objfolder.movenext
		If intI=intII Then
			intI=0
			Response.Write("</tr><tr>")
		End If
	next
	If intI<>intII Then
		For i=intI To intII-1
			Response.Write("<td></td>")
		Next
	End If
	set objfolder=nothing
%>
 </tr>
            </table>
						 <INPUT style="FONT-SIZE: 12px; FONT-FAMILY: 宋体; HEIGHT: 27px" type=submit value=" 提   交 " name=Submit>
        &nbsp;
        <INPUT style="FONT-SIZE: 12px; FONT-FAMILY: 宋体; HEIGHT: 27px" type=reset value=" 取    消 " name=Reset></TD>
                        </TR>
                      </TBODY>
                  </TABLE>
              </TD>
            </TR>
          </TBODY>
        </TABLE>
      </TD>
    </TR>
  </form>
  </TBODY>
</TABLE>
<%
	rs.close
	set rs=nothing
%>
</BODY>
</html>