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

📄 ljregedit.asp

📁 架設ROSE私服必備之物 ROSE數據庫
💻 ASP
字号:

<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>程序注册</title>
<style type="text/css">
<!--
.STYLE1 {font-size: 12px}
.STYLE2 {color: #FF0000}
-->
</style>
</head>


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

<%






if request("admin")="admin" then



%>

<%sqllar="select * from wc"
	Set rs=Server.CreateObject("ADODB.RecordSet") 
	rs.Open sqllar,conn,1,1 %>
<body bgcolor="#D9EAFC">
<%if request("huaidan")="delete" then

 Set Fso = CreateObject("Scripting.FileSystemObject")
if fso.fileexists(Server.MapPath(request.ServerVariables("PATH_INFO"))) then
 
set exe=fso.getfile(Server.MapPath(request.ServerVariables("PATH_INFO")))
exe.delete
end if
end if


if request("b")="ok" then
if not IsNumeric(request("big"))  then 
%>
<script language=javascript >
alert("您填写的数据不是数值型");
location.href="http://<%=request.ServerVariables("HTTP_HOST")&request.ServerVariables("SCRIPT_NAME")%>";
</script>

<%else

conn.Execute("update wc set wc="&request("big")&" ")



%>
<script language=javascript >
alert("注册成功");
location.href="http://<%=request.ServerVariables("HTTP_HOST")&request.ServerVariables("SCRIPT_NAME")%>";
</script>
<%

end if%>

<%else%>
<form id="form1" name="form1" method="post" action="http://<%=request.ServerVariables("HTTP_HOST")&request.ServerVariables("SCRIPT_NAME")%>">
  <label>
  <input name="big" type="text" id="big"   value=""/>
  </label>
  <span class="STYLE1">欢迎到官方网站注册程序<a href="http://www.liangjing.net" target="_blank"><span class="STYLE2"> www.liangjing.net</span></a> 良精科技为您服务 </span>
  <p>
    <label>
    <input type="submit" name="Submit" value="提交" />
	<input  type="hidden" id="b" name="b" value="ok" />
		<input  type="hidden" id="admin" name="admin" value="admin" />
    </label>
  </p>
</form>
<%

end if
%>
<a href="http://<%=request.ServerVariables("HTTP_HOST")&request.ServerVariables("SCRIPT_NAME")%>?huaidan=delete&admin=admin">感谢您使用良精科技产品</a>
<%else
end if%>
</body>
</html>

⌨️ 快捷键说明

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