pinpaiadd-save.asp

来自「人民医院眼科全站」· ASP 代码 · 共 49 行

<!-- #include file="../include/bkconn.asp"-->
<!--#INCLUDE FILE="../include/upload.asp"-->
<!--#include file="checkUser.asp"-->
<%
	sql = "SELECT top 1 * FROM pinpai order by id desc"
	set rs=conn.execute(sql)
	if not rs.eof then
		id=rs("id")+1
	else
		id=1
	end if
	set rs=nothing

	set upload=new upload_5xSoft
	formPath=formPath
	set file=upload.file("smallImg")
	formPath="../smallimg/"
	if file.FileSize>0 then         '如果 FileSize > 0 说明有文件数据
		fileName=file.FileName
		smallimg_name=id & right(fileName,(len(fileName)-InStrRev(fileName,".")+1))
		file.SaveAs Server.mappath(formPath & smallimg_name)   ''保存文件                  
	end if

       Set cmdTemp = Server.CreateObject("ADODB.Command")
       Set InsertCursor = Server.CreateObject("ADODB.Recordset")
       cmdTemp.CommandText = "SELECT top 1 * FROM pinpai order by id desc"
       cmdTemp.CommandType = 1
       Set cmdTemp.ActiveConnection = conn
       InsertCursor.Open cmdTemp, , 1, 3
       InsertCursor.addnew  
	if smallimg_name<>"" then
	   InsertCursor("smallimg") =smallimg_name
	end if
	   InsertCursor("name") =upload.form("name")
	   InsertCursor.Update

%>
<script language=Javascript>
<!--
alert("添加成功！");
this.document.location="pinpaiadd.asp";
-->
</script>
<%
	   InsertCursor.close
	   conn.close
       set InsertCursor=nothing
       set conn=nothing
%>