adminxgok.asp

一个完整的flash 教程 很不错 适合初学者~

<!--#include file="yz.asp"-->
<%
name=trim(Request.form("name"))
psw=trim(Request.form("psw"))
if InStr(name,"=")<>0 or InStr(name,"`")<>0 or InStr(name,"'")<>0 or InStr(name," ")<>0 or InStr(name,"　")<>0 or InStr(name,"'")<>0 or InStr(name,chr(34))<>0 or InStr(name,"\")<>0 or InStr(name,",")<>0 or InStr(name,"<")<>0 or InStr(name,">")<>0 or InStr(name,"or")<>0 or InStr(name,"and")<>0 then 
Response.write "用户名含有非法字符！请重新输入"
Response.end 
end if
if InStr(psw,"=")<>0 or InStr(psw,"`")<>0 or InStr(psw,"'")<>0 or InStr(psw," ")<>0 or InStr(psw,"　")<>0 or InStr(psw,"'")<>0 or InStr(psw,chr(34))<>0 or InStr(psw,"\")<>0 or InStr(psw,",")<>0 or InStr(psw,"<")<>0 or InStr(psw,">")<>0 or InStr(psw,"or")<>0 or InStr(psw,"and")<>0 then 
Response.write "密码含有非法字符！请重新输入"
Response.end 
end if
if name="" or psw="" then
Response.write "请填写完整用户名和密码"
Response.end 
end if
%>
<!--#include file="data.asp"-->
<%
conn.execute("update admin set admin='"&name&"',password='"&psw&"'")
conn.close
set conn=nothing
Response.write "修改成功"
Response.end 
%>