ASP实现最简单的加密

2013 年 8 月 13 日3600

  我在中国素材网的论坛看到网友问怎么简单加密,具体实现可以这样写:

  用ASP,Perl忘完了。

  先写一个登陆表单。假设reg.asp

  HTML

  head

  meta http-equiv=Content-Type content=text/html; charset=gb2312

  title西路登陆页面/title

  /head

  body

  FORM action=pass.asp method=post

  table cellpadding=2 cellspacing=0 border=0

  tr

  tdfont face=arial,helvetica size=2bUsername/b/font/td

  tdinput type=text name=username size=20/td

  /tr

  tr

  tdfont face=arial,helvetica size=2bPassword/b/font/td

  tdinput type=password name=password size=20/td

  /tr

  tr

  td colspan=2input type=submit value=Log In/td

  /tr

  /table

  /FORM

  pa href=1.asp进入/a/p

  pspan lang=en-usa href=signout.asploginout/a/span/p

  /body

  /html

  再来一个登陆验证 pass.asp

  %

  Option Explicit

  Dim username, password

  username = Request.FORM(username)

  password = Request.FORM(password)

  'Change the username and password values below change the login

  if (username = admin) and (password = admin) then

  Response.Cookies(loginadmin) = True

  Response.Redirect(登陆成功.asp)

  end if

  Response.Redirect(login.asp)

  %

  成功则进入登陆成功.asp页面

  失败则返回login.asp

  以下注销页面: loginout.asp

  %

  Response.Cookies(loginadmin) =

  Response.Redirect(login.asp)

  %

  你也可以用数据库存储,当然是多用户时候了。简单的话这样就行了。

0 0