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

📄 showto.asp

📁 中国电视购物网电子商务系统
💻 ASP
字号:
<%@ Language=VBScript %>
<!--#include file="../../include/memconn.asp"-->
<!--#include file="../../include/function.asp"-->
<%
action=Request.Form("action")
id=Request.Form("id")
'comp_name=Request.Form("comp_name")
'comp_model=Request.Form("comp_model")
'comp_type=Request.Form("comp_type")
'principal=Request.Form("principal")
'linkman=Request.Form("linkman")
'city=Request.Form("city")
'tel=Request.Form("tel")
'fax=Request.Form("fax")
comp_resume=htmlencode(Request.Form("comp_resume"))
comp_intro=htmlencode(Request.Form("comp_intro"))
linkus=htmlencode(Request.Form("linkus"))
yx_report=htmlencode(Request.Form("yx_report"))
mtfb=htmlencode(Request.Form("mtfb"))
if action="buy" then
sql="update mem_buy set comp_resume='"&comp_resume&"',comp_intro='"&comp_intro&"',linkus='"&linkus&"'"
sql=sql&",yx_report='"&yx_report&"',mtfb='"&mtfb&"' where mem_id="&id&"" 
else
sql="update mem_sell set comp_resume='"&comp_resume&"',comp_intro='"&comp_intro&"',linkus='"&linkus&"'"
sql=sql&" where mem_id="&id&""
end if
conn.execute(sql)
if conn.errors.count=0 then
call conn_end
%>
<SCRIPT LANGUAGE=javascript>
<!--
alert("提交成功。")
history.go(-1)
//-->
</SCRIPT>

<%

end if
%>

⌨️ 快捷键说明

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