📄 weixsave.asp

📁 一套asp办公小软件

💻 ASP

字号:

<!--#include file="Global.asp" -->

<%if session("name")<>"" then 
  if request("title")="" then
     response.write("请输入房号！")%>
<input type=button value="返回录入" onclick="history.back()" id=button2 name=button2>
     
<%     response.end
  end if
 
     Dim rs
     Set rs = Server.CreateObject("ADODB.Recordset")
     rs.open "weixb",conn,2,2

    rs.addnew       
    rs("房号")=request("title")
    rs("姓名")=request("title0")
    if isdate(request("title1"))=TRue then
       rs("报修时间")=request("title1")
    end if
    rs("报修内容")=request("title2")
    rs("维修人员")=request("title3") 
    
    if isdate(request("title4"))=TRue then
       rs("完成时间")=request("title4")
    end if
    rs("接待人")=request("title5")
   
    rs("备注")=request("title7")
    rs.update
    rs.close
    set rs=nothing
 %>
   <body topmargin="10" leftmargin="60">
 
    <P>维修信息提交成功</p>
  <p><a href="admin_index.asp">返回</a></p>
    
</body>
<%else%>
<body topmargin="10" leftmargin="60">
 
    <P>您没有登陆或登陆长时间内没有操作，账号已过期</p>
    


  <p><a href="admin_login.asp">请重新登陆</a></p>

<%end if%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -