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

📄 insertchange.asp

📁 应用程序利用ASP做的一个可以实现登陆
💻 ASP
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../getlevel.asp"-->
<html>
<body bgcolor="#567D30">
<%
   pernum=request.form("pernum")
   nownum=request.form("nownum")
   charger=request.form("charger")
   inclassrate=request.form("inclassrate")
   workthing=request.form("workthing")
   maintaintime=request.form("maintaintime")
   problem=request.form("problem")
   checker=request.form("checkor")
   memo=request.form("memo")

 %>
 
  <%
ttime=cstr(cint(year(date()))*10000+cint(month(date()))*100+cint(day(date())))
 
 '判断是否已经存在该设备的信息
    sql="select * from h_changeseason where level1='"&level1&"' and level2='"&level2&"' and level3='"&level3&"' and level4='"&level4&"' and ttime='"&ttime&"'"
	'response.Write(sql)
	'response.End()
    set rs=conn.Execute(sql)
    if not rs.bof or not rs.eof then

     response.write "<script language='javascript'>" 
	 response.write "alert('记录已经录入!');" 
	 response.write "history.go(-1);"
	 response.write "</script>"
     response.end
	 
	 
    'rs.close
	set rs=nothing
    else
%>
 
 <%
  
   rs="'"&pernum&_
     "','"&nownum&_
     "','"&charger&_ 	 
	 "','"&inclassrate&_ 
	 "','"&workthing&_
	 "','"&maintaintime&_
	 "','"&problem&_ 
	 "','"&checker&_ 
	 "','"&memo&_ 
	 "','"&ttime&_ 
	 "','"&level1&_ 
	 "','"&level2&_ 
	 "','"&level3&_ 
	 "','"&level4&_	   
	 "'"

	 
	sql="insert into h_changeseason(pernum,nownum,charger,inclassrate,workthing,maintaintime,problem,checker,memo,ttime,level1,level2,level3,level4)values("&rs&")"
	 
    ' response.Write(sql)
	   ' response.End()
	        conn.execute(sql)
        response.write "<script language='javascript'>" 
	    response.write "alert('录入成功!');" 
	    response.write "history.go(-1);"
	    response.write "</script>"
        response.end
%>  
<%
   
    conn.close
    end if
%> 
</body>	

</html>

⌨️ 快捷键说明

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