cp_save.asp

来自「一个诚信信息港门户网 功能: 系统设置 企业会员 个人」· ASP 代码 · 共 91 行

<%
if session("useradmin")=""  then
Response.Write("<script>alert(""您没有登录，不能使用此功能，请返回首页登录或注册..."");location.href=""../index.asp"";</script>")
response.end
end if
dbdns="../"
%><!--#include file="../inc/conn.asp"--><%
Server.ScriptTimeout=999
%>
<!--#include file="UpLoadClass.asp"-->
<%
dim request2
dim cpname,sortid,cpjg,pic,jgdw,cpjl,cpbh,cpcd,cpgg,ypxxone_id,ypxxtwo_id,cpjm,cpsm,rs,sql

'建立上传对象
set request2=New UpLoadClass
request2.TotalSize= 2097152
	'单文件最大1M
	request2.MaxSize  =1048576
	'允许上传格式文件
	request2.FileType = "jpg/gif/bmp/png"
	'上传路径
	request2.SavePath= "../uploadpic/product/"
	request2.open
pic=request2.SavePath&request2.Form("pic")
pic=replace(pic,"../","")
cpname =request2.Form("cpname")
sortid =request2.Form("sortid")
cpjg =request2.Form("cpjg")
jgdw =request2.Form("jgdw")
cpjl =request2.Form("cpjl")
cpbh =request2.Form("cpbh")
if cpbh="" then cpbh=null
cpcd=request2.Form("cpcd")
if cpcd="" then cpcd=null
cpgg=request2.Form("cpgg")
if cpgg="" then cpgg=null
if request2.Form("ypxxtwo_id")="" then
ypxxone_id=request2.Form("aaa")
ypxxtwo_id=request2.Form("bbb")
else
ypxxone_id=request2.Form("ypxxone_id")
ypxxtwo_id=request2.Form("ypxxtwo_id")
end if
cpjm=request2.Form("cpjm")
cpsm=request2.Form("cpsm")
if cpsm="" then cpsm="暂无"
if InStr(pic,".jpg")<=0 and InStr(pic,".gif")<=0 and InStr(pic,".bmp")<=0 and InStr(pic,".png")<=0 then
pic=""
end if
'***************************判断上传
	if request2.Error=4 then
response.write"<SCRIPT language=JavaScript>alert('图片大小超过限制，上传失败！');"
response.write"javascript:history.go(-1) ;</SCRIPT>"
	end if
	if request2.Error=2 then
response.write"<SCRIPT language=JavaScript>alert('类型有误！');"
response.write"javascript:history.go(-1) ;</SCRIPT>"
end if
if request2.Error<>2 and request2.Error<>1 and request2.Error<>3 and request2.Error<>4 then
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp"
rs.open sql,conn,1,3
rs.addnew
rs("SMT_pic")=pic
rs("SMT_cpname")=cpname
rs("SMT_sortid")=sortid
rs("SMT_cpjg")=cpjg
rs("SMT_cpjgdw")=jgdw
rs("SMT_cpjl")=cpjl
rs("SMT_cpbh")=cpbh
rs("SMT_cpcd")=cpcd
rs("SMT_cpgg")=cpgg
rs("SMT_ypxxtwo_id")=ypxxtwo_id
rs("SMT_ypxxone_id")=ypxxone_id
rs("SMT_cpjm")=cpjm
rs("SMT_cpsm")=cpsm
rs("SMT_key1")=application("citycpkey")
rs("SMT_yp_id")=session("id")
rs.update
rs.close
set rs=nothing
conn.close
set conn = nothing
response.redirect"ok.asp?url=cp.asp"
set request2=nothing
else
response.write"<SCRIPT language=JavaScript>alert('发生错误，并未发布！');"
response.write"javascript:history.go(-1) ;</SCRIPT>"
end if
%>