jj_add_save.asp

来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 69 行

<!--#include file="../../inc/conn2.asp"-->
<%
'┌─  风云ASP在线  ────────────────────────┐
'│                                                                 │
'│  作者：赵振波.	http://www.fyasp.com	    				    │
'│                                                                 │
'│   Q Q：176189168  										   	    │
'│                                                                 │
'│ Email：[e-mail]                                             │
'│                                                                 │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│                                                                 │
'│                                                                 │
'└───────────────────  http://www.fyasp.com ──┘
%>
<% 
     if instr(session("manager"),"manager")=0 then
     response.redirect "manage.asp"
     response.end
end if
%>
<%
OpenDataConn
Dim Jj_mc,Jj_Type,Jj_xh,Jj_GG,Jj_cd,Jj_money,pic,Jj_content,Jj_company
Dim Jj_Tel,Jj_add,Jj_Fax,Jj_email,Jj_post,Jj_com
Jj_mc = Trim(Request("Jj_mc"))
Jj_Type = Trim(Request("Jj_Type"))
Jj_xh = Trim(Request("Jj_xh"))
Jj_GG = Trim(Request("Jj_GG"))
Jj_cd = Trim(Request("Jj_cd"))
Jj_money = Trim(Request("Jj_money"))
pic = Trim(Request("pic"))
Jj_content = Trim(Request("Jj_content"))
Jj_company = Trim(Request("Jj_company"))
Jj_Tel = Trim(Request("Jj_Tel"))
Jj_add = Trim(Request("Jj_add"))
Jj_Fax = Trim(Request("Jj_Fax"))
Jj_email = Trim(Request("Jj_email"))
Jj_post = Trim(Request("Jj_post"))
Jj_com = Trim(Request("Jj_com"))
If Jj_mc = "" Then
Response.write"<script>alert('对不起！家具名称不能为空！');history.go(-1)</script>"
Response.end
End if
If Jj_content = "" Then
Response.write"<script>alert('对不起！详细参数不能为空！');history.go(-1)</script>"
Response.end
End if
If pic = "" Then
Response.write"<script>alert('对不起！请上传产品图片！');history.go(-1)</script>"
Response.end
End if
If Jj_company = "" Then
Response.write"<script>alert('对不起！公司名称不能为空！');history.go(-1)</script>"
Response.end
End if
If Jj_Tel = "" Then
Response.write"<script>alert('对不起！联系电话不能为空！');history.go(-1)</script>"
Response.end
End if
Sql = "Insert Into Jj(Jj_mc,Jj_Type,Jj_xh,Jj_GG,Jj_cd,Jj_money,pic,Jj_content,"
Sql = Sql&"Jj_company,Jj_Tel,Jj_add,Jj_Fax,Jj_email,Jj_post,Jj_com)Values"
Sql = Sql&"('"&Jj_mc&"','"&Jj_Type&"','"&Jj_xh&"','"&Jj_GG&"','"&Jj_cd&"','"&Jj_money&"',"
Sql = Sql&"'"&pic&"','"&Jj_content&"','"&Jj_company&"','"&Jj_Tel&"','"&Jj_add&"',"
Sql = Sql&"'"&Jj_Fax&"','"&Jj_email&"','"&Jj_post&"','"&Jj_com&"')"
Conn.Execute(Sql)
Response.write"<script>alert('家具添加成功！');location.href='Jj_Del.asp'</script>"
Response.end
%>