1.Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
2.如何删除SESSION中的验证码
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
ä½ çæ·»å æ¹æ³ææ¼æ´ç~`ç¨è¿ä¸ª:
set conn=server.createobject("adodb.connection")
DBpath = server.mappath("mdb\example.mdb")
conn.open "driver={ microsoft access driver (*.mdb)};dbq="& DBpath
name=request.form("name")
tel=request.form("tel")
message=request.form("message")
Set Rs = Server.CreateObject("ADODB.RecordSet")
SQL = "Select * From [Guestbook]"
Rs.Open SQL,Conn,1,3
Rs("Name") = Name
Rs("Tel") = Tel
Rs("Message") = Message
Rs.Update
response.write "è®°å½æ·»å æå!"
如何删除SESSION中的验证码
为了让自己和大家登陆的时候方便一点,可以考虑删除登陆验证码!
(一)删除用户登陆验证码,只需要用户名和密码就可以登陆!普兰店排课管理系统源码
1.打开 common/checkUser.asp 去掉以下这两段:
程序代码 第行
IF validate="" Then
ReInfo(0)="错误信息"
ReInfo(1)="<b>请输入登录验证码</b><br/><a href=""javascript:history.go(-1);"">请返回重新输入</a>"
ReInfo(2)="WarningIcon"
login=ReInfo
logout(false)
exit function
end if
程序代码 第行(前面修改后)
IF cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) then
ReInfo(0)="错误信息"
ReInfo(1)="<b>验证码有误,请返回重新输入</b><br/><a href=""javascript:history.go(-1);"">请返回重新输入</a>"
ReInfo(2)="ErrorIcon"
login=ReInfo
logout(false)
exit function
end if
2.打开 login.asp。简易ps源码去掉程序代码 第行:
< label>验证码:<input name="validate" type="text" size="4" class="userpass" maxlength="4"/> <%=getcode()%></label><br/>
[[[[经过本人验证,完全可行,只是注意最后一步,不要错删“< label>用户名”哦,我第一次改的时候就删除错了,登陆时候验证码还在,用户名那匡没了!图片分源码所以要做好备份哈,更改哪个文件之前先把那个文件下载下来!]]]]
(二)去掉留言本的uc绝地源码验证码: (无此插件的朋友跳过!看清楚哦,是留言本,不是火 源码下载回复评论的时候!)
打开 Plugins/GuestBook/bookaction.asp 去掉
程序代码 程序代码
IF cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) then
showmsg "留言发表错误信息","<b>验证码有误,请返回重新输入</b><br/><a href="/"LoadMod.asp?plugins=GuestBookForPJBlog"">请返回重新输入</a>", "ErrorIcon","plugins"
exit function
end if
打开 Plugins/GuestBook/guestbook.asp 去掉 无此插件的朋友可以跳过
程序代码 程序代码
<tr><td align="right" width=""><strong>验证码:</strong></td><td align="left" style="padding:3px;"><input name="validate" type="text" size="4" class="userpass" maxlength="4"/> <%=getcode()%></td></tr>
(三)其它地方的验证码也可去掉:
打开 blogcomm.asp 去掉
程序代码 第行
IF (memName=empty or blog_validate=true) and cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) then
ReInfo(0)="评论发表错误信息"
ReInfo(1)="<b>验证码有误,请返回重新输入</b><br/><a href=""javascript:history.go(-1);"">请返回重新输入</a>"
ReInfo(2)="ErrorIcon"
postcomm=ReInfo
exit function
end if
(四)去除评论的验证码?(这个我没试验过,我是转别人的,但是看代码是去除评论的!有空我要试验一下)
3.打开 register.asp 去掉
下面这段程序代码我的源码里没有,也就不用删除了
IF (memName=empty or blog_validate=true) and cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) then
ReInfo(0)="评论发表错误信息"
ReInfo(1)="<b>验证码有误,请返回重新输入</b><br/><a href=""javascript:history.go(-1);"">请返回重新输入</a>"
ReInfo(2)="ErrorIcon"
postcomm=ReInfo
exit function
end if
程序代码
<tr><td align="right" width=""><strong>验证码:</strong></td><td align="left" style="padding:3px;"><input name="validate" type="text" size="4" class="userpass" maxlength="4"/> <%=getcode()%> <font color="#FF"> *</font> 请输入验证码</td></tr>
程序代码
IF cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) then
ReInfo(0)="错误信息"
ReInfo(1)="<b>验证码有误,请返回重新输入</b><br/><a href=""javascript:history.go(-1);"">单击返回</a>"
ReInfo(2)="ErrorIcon"
register=ReInfo
exit function
end if
(五)这个注册码是干吗的?(也没试验过,也没看明白!)
4.打开 class/cls_article.asp 去掉
程序代码
<%if memName=empty or blog_validate=true then%><tr><td align="right" width=""><strong>验证码:</strong></td><td align="left" style="padding:3px;"><input name="validate" type="text" size="4" class="userpass" maxlength="4"/> <%=getcode()%></td></tr><%end if%>
打开 common/function.asp 去掉
程序代码
'