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

📄 add-end.asp

📁 西亚电子购物系统
💻 ASP
字号:
<!--#include file="../manage/check-3.asp"-->
<!--#include file="../conn/conn.asp" -->
<%
dim stock
dim code
dim proname
dim proprice
dim disprice
dim info
dim smallpic
dim bigpic
dim company
dim companyurl
dim clid
dim claid
dim hide
if request("companyurl")="http://" then
   companyurl=""
else
companyurl=request("companyurl")
end if
if request("hide")="" then
   hide="false"
else
hide=request("hide")
end if
stock=request("stock")
code=request("code")
proname=request("proname")
info=request("info")
proprice=request("proprice")
disprice=request("disprice")
smallpic=request("smallpic")
bigpic=request("bigpic")
company=request("company")
clid=request("clid")
claid=request("claid")
If request("disprice")="" then
	disprice=request("proprice")
end if
If request("smallpic")="" then
	smallpic="images/nopic.gif"
end if

set rs=server.createobject("adodb.recordset")
sql="select * from sia_product where (proid is null)" 

rs.open sql,conn,1,3
rs.addnew

rs("stock")=stock
rs("code")=code
rs("proname")=proname
rs("proprice")=proprice
rs("disprice")=disprice
rs("info")=info
rs("smallpic")=smallpic
rs("bigpic")=bigpic
rs("company")=company
rs("companyurl")=companyurl
rs("clid")=clid
rs("claid")=claid
rs("hide")=hide
rs.update
rs.close
Response.Write "<script>alert(""添加成功"");location.href=""add.asp"";</script>"
%>

⌨️ 快捷键说明

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