?? saveproductadd.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 + -