per_resume.asp

直接附加数据库！ 修改 Include/ Class_Main.asp 为自己信息 后台admin admin 绍兴人才网程序

<!--#include file="../Include/Class_Conn.asp" -->
<% 
Dim SQL,Rs
Dim ResumeMode,FileName

Param_Str = Split(Request.QueryString,".")
Str = Split(Param_Str(0),"-")

Dim Param
'//获取参数
Param       = Replace_Text(Str(1))
'//查询会员的模板标记
SQL = "Select ResumeMode From [pH_Person_Info] Where Perid='"&Param&"'"
Set Rs = Conn.Execute(SQL)
If Rs.Eof Then
  Response.write "没有找到该个人用户！"
  Response.End()
End if
ResumeMode = Rs(0)
Rs.Close
'//查询模板文件
SQL = "Select FileName From [pH_Resume_Mode] Where Ncid="&Cstr(ResumeMode)
Set Rs = Conn.Execute(SQL)
If Not Rs.Eof Then
 FileName = Rs(0)
 Response.redirect "Resume/"&FileName&"?Param-"&Param&".html"
Else
 Response.redirect "Resume/Resume_1.asp?Param-"&Param&".html"
End if
Rs.Close
'//关闭数据库连接
CloseDB
 %>