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

📄 addsave.asp

📁 社区天地图文系统(核心:尘缘雅境图文系统) 版本: 1.0 本系统是ASP+ACCESS环境下开发成功
💻 ASP
字号:
<!--#include file="cf_conn.asp"-->


<%
dim xuehao,name,duantel,shengid,xingbie,riqi,xueyuan,banji,dizhi,youbian,jiatel
file=request.form("file")
xuehao=trim(request("xuehao"))
name=trim(request("name"))
duantel=trim(request("duantel"))
shengid=trim(request("shengid"))
xingbie=trim(request("xingbie"))
riqi=trim(request("riqi"))
xueyuan=trim(request("xueyuan"))
banji=trim(request("banji"))
dizhi=trim(request("dizhi"))
youbian=trim(request("youbian"))
jiatel=now()
%>
<%if duantel="" then%>
 <script>alert('必须输入主题!')
 history.go(-1)</script>
<%
   response.end
end if%>
<%if shengid="" then%>
 <script>alert('必须输入详细内容!')
 history.go(-1)</script>
<%
   response.end
end if%>
<%if xingbie="" then%>
 <script>alert('必须输入联系地址!')
 history.go(-1)</script>
<%
   response.end
end if%>
<%if riqi="" then%>
 <script>alert('必须输入联系人!')
 history.go(-1)</script>
<%
   response.end
end if%>
<%if dizhi="" then%>
 <script>alert('必须输入联系电话!')
 history.go(-1)</script>
<%
   response.end
end if%>
<%if youbian="" then%>
 <script>alert('必须输入验证码!')
 history.go(-1)</script>
 
<%
   response.end
end if%>
<%if xueyuan="" then 
xueyuan="..."
  
end if%>
<%if banji="" then 
banji="..."

end if%>


<%
set rs=server.createobject("adodb.recordset")
sql="select * from c2s "
rs.open sql,conn,1,3

%>
<%
	rs.addnew
	rs("c2sgui")=file
	rs("c2slei")=xuehao
	rs("c2sqi")=name
	rs("c2szhu")=duantel
	rs("c2snei")=shengid
	rs("c2sdi")=xingbie
	rs("c2sname")=riqi
	rs("C2Sbian")=xueyuan
	rs("c2smail")=banji
	rs("c2stel")=dizhi
	rs("c2sma")=youbian
	rs("c2stime")=jiatel
rs.update
	rs.close
	set rs=nothing
	  response.write "<script language='javascript'>window.confirm('信息发布成功')</script>"


%><body onload=javascript:window.close()></body> 

⌨️ 快捷键说明

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