그닉의 사생활..?

list.asp

<!--엑셀파일다운로드-->
 <form name="excel_form" action="excel.asp" method="post">
 <INPUT TYPE="hidden" name="sql" value="<%=sql%>">
  <%
  ' Writes a link to the newly created excel in the browser
  response.write "<a href='#' onclick='javascript:document.excel_form.submit();'><font color=red>특정 이력 사항</font></a> 엑셀 리스트 | 작성된 시간:  " & now() & "<br>"
  %>
 </form>
 </tr>
 <!--//엑셀파일다운로드-->

excel.asp

<!--#Include virtual=/include/DBconn.asp-->
<%
 Response.Buffer = TRUE
 Response.ContentType = "application/vnd.ms-excel"
 Response.CacheControl="public"
 Response.AddHeader "Content-Disposition", "attachment;filename=특정이력사항.xls"

 ''''''''''''''''''''' 리스트 가져오기''''''''''''''''''''''''''''''''''''''''''

sql=request("sql")
'response.write sql
'response.end
 'set result = dbConn.execute(sql)
 set Result = server.createobject("adodb.recordset")
 Result.open sql, DB, 1
 no=Result.RecordCount
 
 response.write "<font size=10>"& Result("buse_name") &"-"& Result("jiwon_type") &"</font>"

 if not result.eof then
  response.write "<table border=0 cellspacing=1 cellpadding=15 width=98% height=55 bgcolor='#454545'>" 
  response.write "<tr>"
  response.write "<td bgcolor='F3F3F3'>No.</td>"
  response.write "<td bgcolor='F3F3F3'>이름</td>"
  response.write "<td bgcolor='F3F3F3'>생년월일</td>"
  response.write "<td bgcolor='F3F3F3'>최종졸업학교</td>"
  response.write "<td bgcolor='F3F3F3'>전공</td>"
  response.write "<td bgcolor='F3F3F3'>졸업년도</td>"
  response.write "<td bgcolor='F3F3F3'>서류전형</td>"
  response.write "<td bgcolor='F3F3F3'>인적성검사</td>"
  response.write "<td bgcolor='F3F3F3'>1차면접</td>"
  response.write "<td bgcolor='F3F3F3'>2차면접</td>"
  response.write "<td bgcolor='F3F3F3'>3차면접</td>"
  response.write "<td bgcolor='F3F3F3'>경력</td>"
  response.write "</tr>"
  for i=1 to result.recordcount
   
   '서류 합격 여부
   If result("pass")<>"" Then
    pass=result("pass")
    If pass="ok" Then
    pass_result="합격"
    ElseIf pass="no" Then
    pass_result="불합격"
    End If
   End If
   
   '최종학교명
   If result("s_name1") <>"" Then
    school_name= result("s_name1")
    school_major=result("s_major1")
    gra_year=Left(result("s_year_E1") ,4)
   ElseIf result("s_name2") <>"" Then 
    school_name= result("s_name2")
    school_major=result("s_major2")
    gra_year=Left(result("s_year_E2") ,4)
   ElseIf result("s_name3") <>"" Then 
    school_name= result("s_name3")
    school_major=result("s_major3")
    gra_year=Left(result("s_year_E3") ,4)
   End If

   '전형별 점수
   SQL="select * from result where mem_id=" & result("idx")
   Set rs=server.createobject("ADODB.RECORDSET")
   rs.open sql,db,1,1
   If Not rs.eof then
    If rs("t_point")<>"" then
    t_point=rs("t_point")
    Else
    t_point="미응시"
    End If
    If rs("f_point")<>"" then
    f_point=rs("f_point")
    Else
    f_point="미응시"
    End if
    If rs("s_point")<>"" then
    s_point=rs("s_point")
    Else
    s_point="미응시"
    End if
    If rs("th_point")<>"" then
    th_point=rs("th_point")
    Else
    th_point="미응시"
    End if
   End If
   
   '경력사항
   If result("com_name1")<>"" Then
   company=result("com_name1")
   com_S1=result("com_S1")
   com_E1=result("com_E1")
   work=company & "("&com_S1&"~"&com_E1&")"
   End If
   If result("com_name2")<>"" Then
   company2=result("com_name2")
   com_S2=result("com_S2")
   com_E2=result("com_E2")
   work=work & "," & company2 & "("&com_S2&"~"&com_E2&")"
   End If
   If result("com_name3")<>"" Then
   company3=result("com_name3")
   com_S3=result("com_S3")
   com_E3=result("com_E3")
   work=work & "," & company3 & "("&com_S3&"~"&com_E3&")"
   End If
   If result("com_name4")<>"" Then
   company3=result("com_name4")
   com_S4=result("com_S4")
   com_E4=result("com_E4")
   work=work & "," & company4 & "("&com_S4&"~"&com_E4&")"
   End If
   response.write "<tr>"
   response.write  "<td bgcolor='FFFFFF'>" & i & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & result("u_name_H") & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & left(left(result("juminno"),6),2) &" 년 "& Right(left(result("juminno"),4),2) &" 월</td>"
   response.write  "<td bgcolor='FFFFFF'>" & school_name & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & school_major & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & gra_year & " 년</td>"
   response.write  "<td bgcolor='FFFFFF'>" & pass_result & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & t_point & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & f_point & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & s_point & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & th_point & "</td>"
   response.write  "<td bgcolor='FFFFFF'>" & work & "</td>"
   result.movenext
   response.write "</tr>"
  next
  response.write "</table>"
 end if
%>