⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 saveproductadd.asp

📁 人民医院眼科全站
💻 ASP
字号:
<!-- #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
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -