这里是venshopbut = 1时候的加密方法

host=lcase(request.servervariables("HTTP_HOST")){if instr(host,"sport58")<=0 and instr(host,"192.168")<=0 and instr(host,"venshop")<=0 and host<>"localhost" and host<>"127.0.0.1" then{response.redirect "http://www.venshop.com/"{response.end{end if{Fy_Url=Request.ServerVariables("QUERY_STRING"){Fy_a=split(Fy_Url,"&"){redim Fy_Cs(ubound(Fy_a)){On Error Resume Next{for Fy_x=0 to ubound(Fy_a){Fy_Cs(Fy_x) = left(Fy_a(Fy_x),instr(Fy_a(Fy_x),"=")-1){Next{For Fy_x=0 to ubound(Fy_Cs){If Fy_Cs(Fy_x)<>"" Then{If Instr(LCase(Request(Fy_Cs(Fy_x))),"'")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"and")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"select")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"update")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"chr")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"delete%20from")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),";")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"insert")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"mid")<>0 Or Instr(LCase(Request(Fy_Cs(Fy_x))),"master.")<>0 Then{response.Write "<script language='javascript'>alert('Error!!');history.go(-1);</script>"{Response.End{End If{End If{Next{Function DelStr(Str){If IsNull(Str) Or IsEmpty(Str) Then{Str= ""{End If{DelStr=Replace(Str,";",""){DelStr=Replace(DelStr,"'",""){DelStr=Replace(DelStr,"&",""){DelStr=Replace(DelStr," ",""){DelStr=Replace(DelStr,">",""){DelStr=Replace(DelStr,"%20",""){DelStr=Replace(DelStr,"-",""){DelStr=Replace(DelStr,"=",""){DelStr=Replace(DelStr,"<",""){DelStr=Replace(DelStr,">",""){DelStr=Replace(DelStr,"%",""){End Function{Function chklogin(user_name){set rs=server.createobject("adodb.recordset"){sql="select * from venshop_user where username='"&user_name&"'"{rs.open sql,conn,1,1{if rs.eof then{Response.Cookies("venshop")("user_name")=""{Response.Cookies("venshop")("user_pass")=""{Response.Cookies("venshop")("user_class")=""{response.redirect "login.asp"{response.end{else{user_pass=rs("userpass"){end if{rs.close{set rs=nothing{if trim(Request.Cookies("venshop")("user_pass"))<>trim(user_pass) then{Response.Cookies("venshop")("user_name")=""{Response.Cookies("venshop")("user_pass")=""{Response.Cookies("venshop")("user_class")=""{response.redirect "login.asp"{response.end{end if{End Function{Function Showflash(img,wt,hg,oname){response.write "<object classid=""clsid:D27CDB6E-AE6D-11CF-96B8-444553540000"" name="&oname&" codebase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0"" border=""0"" width="&wt&" height="&hg&">"{response.write "<param name=""movie"" value="&img&">"{response.write "<param name=""quality"" value=""High"">"{response.write "<embed src="&img&" pluginspage=""http://www.macromedia.com/go/getflashplayer"" type=""application/x-shockwave-flash"" name="&oname&" quality=""High"" width="&wt&" height="&hg&"></object>"{End Function{Function FormatNum(Num){FormatNum=FormatNumber(Num,2,-1){End Function