findaccount.asp

来自「这是一个最常用的flash程序」· ASP 代码 · 共 25 行

ASP

25 行

<!--#include File="Conn.asp"-->
<!--#include File="CheckPost.asp"-->
<%
 Dim Username,Password
 UserName=Replace(Trim(request("UserName")),"'","")
 PassWord=Replace(Trim(Request("PassWord")),"'","")
 If UserName = "" or PassWord = "" Then Response.Redirect "Error.asp?id=001"
 Set Rs=Server.Createobject("Adodb.Recordset")
 Sql="Select * From Admin Where UserName='" & userName & "'and PassWord='" & password & "'"
 Rs.Open Sql,Conn,1,3
 If Not Rs.EOF Then
 Rs("Hits")=rs("Hits")+1
 Rs.Update
 Session("AdminName")=Rs("userName")
 Session("Adminpass")=Rs("password")
 Response.Redirect ("Manage.asp")
 Else
 Response.Redirect "Error.asp?id=004"
 End If
 Rs.Close
 Set Rs=Nothing
 Conn.Close
 Set Conn=Nothing
%><html>

findaccount.asp - 源码说明

本页面展示了「这是一个最常用的flash程序」中的 findaccount.asp 源码文件，采用 ASP 编程语言编写，共 25 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与flash相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?