modify.asp

来自「一个简历管理系统」· ASP 代码 · 共 37 行

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Option Explicit%>
<%
'程序名称：萍萍多用户简历系统
'程序版本：v1.0
'开发环境：SQL Server 2005 + IIS6.0（SQL Server 2000也能用）
'程序设计：秋忆工作室
'作者网站：http://www.skymean.com
'联系邮箱：[e-mail]
%>
<!--#include file="inc/conn.asp" -->
<!--#include file="inc/Cls_system.asp" -->
<!--#include file="inc/Cls_page.asp" -->
<!--#include file="inc/Cls_modify.asp" -->
<!--#include file="inc/incupload.asp" -->
<%
Dim action,M
action = LCase(Trim(Request.QueryString("action")))
Set M = New Modify

Select Case action
	Case "save"
		M.modify_save()
	Case "uploadphoto"
		M.uploadPhoto()
	Case "release"
		M.Release()
	Case Else
		rp.Head("添加简历")
		M.Head()
		M.ShowAll()
		rp.Foot()
End Select

Set M = Nothing
CloseAllObj()
%>