`
huiqinbo
  • 浏览: 334109 次
  • 性别: Icon_minigender_1
  • 来自: 北京
社区版块
存档分类
最新评论

asp验证码技术

 
阅读更多

留言标题:老师我加上了这段代码这个网站还是在不停的植入

留言人姓名:caizi
联系方式:444084929@qq.com 留言时间:2011-11-30 1:48:19
留言内容:
老师我留言本的地址为 :http://yezhong.net/lyp/lyp.asp  刚才我看下这个网站又开始了植入广告,我想了一下,老师可以教我一下“求实小屋”留言本的验证码技术能教我一下吗?

答复:

回复人姓名:求实 回复时间:2011-11-30 12:49:33
回复内容:

一,

在根目录里新建  conn.asp 删除所有代码,将下面代码粘贴到代码里

<%

set conn=server.createobject("adodb.connection")

conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../数据库文件夹名/数据库名")

%>

二,在lyp文件夹里建  qtjzx.asp页面

1,原来lyb.asp的改法
在服务器行为里删除插入记录,
在姓名下一行左列输入验证码   右列  代码里粘贴
<input name='validatecode' type='text' size='5'  class="bj">
&nbsp;<img src='../imgchk/validatecode.asp' align='absmiddle' border='0'>
选中 form   在动作里输入 qtjzx.asp

2,qtjzx.asp 做法

打开qtjzx.asp  删除所有代码,将下面代码粘贴到代码里
<%
If Trim(Request.Form("validatecode"))=Empty Or Trim(Session("cnbruce.com_ValidateCode"))<>Trim(Request.Form("validatecode")) Then
response.write"<script>alert('对不起,请输入正确的验证码!');history.back();</Script>"
response.end()
end if
%>
<!--#include file="../conn.asp" -->
<%
set rs=server.CreateObject("adodb.recordset")
 sql="select * from lyb"
 rs.open sql,conn,1,1
 %>
<%
dim db,conn,myconn
name=request.form("name")
bt=request.form("bt")
pic=request.form("pic")
email=request.form("email")
content=request.form("content")
exec="insert into lyb(name,bt,pic,email,content)values('"+name+"','"+bt+"','"+pic+"','"+email+"','"+content+"')"
conn.execute exec
conn.close
set conn=nothing
 response.write("<script>alert('添加成功!');location.href='lyp.asp'</script>")
response.end()  '结束运行
%>

三。点开下载地址 解压后,把文件夹放在跟文件夹里

http://qs.zgwldx.com/imgchk.rar

 

 提问:

留言标题:老师留言本还得请教 留言人姓名:caizi
联系方式:444084929@qq.com 留言时间:2011-12-7 2:16:16
留言内容:
老 师晚上好,今晚我又看下自己修改的代码,没看出哪里有问题,老师我把我把留言本的相关代码放到我一个zip文件夹里面,请您找时间帮我查看下,哪里是我写 的不对好吗。对了老师空间和域名是我买的,支持验证码。    留言本下载地址为:http://www.yezhong.net/teachehelpme.zip

 

答复:

回复人姓名:求实 回复时间:2011-12-8 21:49:38
回复内容:

你的lyb.asp  form 表单语句有错误 

即  <form action="qtjzx.asp" name="form1">  应改为

<form action="qtjzx.asp" name="form1" method="post" >

  qtjzx.asp  里这段代码

<%
dim db,conn,myconn
name=request.form("name")
bt=request.form("bt")
email=request.form("email")
content=request.form("content")
exec="insert into lyb(name,bt,pic,email,content)values('"+name+"','"+bt+"','"+email+"','"+content+"')"
conn.execute exec
conn.close
set conn=nothing
 response.write("<script>alert('添加成功!');location.href='http://www.yezhong.net/lyp/lyp.asp'</script>")
response.end()  '结束运行
%>

多了个 pic ,

分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics