13518219792
%if session("admin")="" then
我们提供的服务有：成都网站建设、成都网站制作、微信公众号开发、网站优化、网站认证、新华ssl等。为1000多家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的新华网站制作公司
response.redirect"index.asp"
response.end
end if
%
在链接的那个页面前加代码如上，admin为登陆时的session值。在登陆框提交表单传送到如下样式的验证页面：
checkadmin.asp
!--#include file="conn.asp"--
!--#include file="md5.asp"--
%dim username,userpwd
username=trim(request.form("username"))
userpwd=trim(request.form("userpwd"))
userpwd1=md5(trim(request.form("userpwd")))
if username="" then
response.write"scriptalert(""用户名不能为空！"");location.href=""javascript:history.go(-1)"";/script"
end if
if username"" and instr(username,chr(39))0 or instr(username,chr(34))0 then
response.write"scriptalert(""用户名非法！"");location.href=""javascript:history.go(-1)"";/script"
response.end
end if
if userpwd="" or instr(userpwd,chr(39))0 then
response.write"scriptalert(""密码不能为空！"");location.href=""javascript:history.go(-1)"";/script"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select username,userid,userpwd,usertype from [user] where username='"username"' and userpwd='"userpwd1"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write"scriptalert(""用户名或者密码错误"");location.href=""javascript:history.go(-1)"";/script"
else
if session("admin")=rs("username")
response.redirect"admin_index.asp"
else
response.write"scriptalert(""非法登陆！"");location.href=""index.asp"";/script"
end if
end if
rs.close
conn.close
%
国外的一些免费服务器限制流量，国内免费的服务器额度又很低，毕竟免费的午餐不好吃。
如果你有技术，就去磐石云参加“你搞技术，我出资源”活动。
这是磐石云推出的扶持计划，通过视频/教程内容可置换服务器，最久可长达一年。
给的云服务器上海区的：
2HCPU4G内存5M带宽50G系统盘、4HCPU8G内存10M带宽50G系统盘。
如果你有更多需求，就凭技术去谈一谈。
置换规则:
技术牛人准备已制作好的视频教程内容/脚本，磐石云客服取得联系.
符合条件的教程类型：
1、开源软件使用视频教程
2、服务器软件搭建环境教程
3、一键脚本
4、集成镜像
5、游戏服务器搭建教程
可参考产品教程类型：
1、网盘类（seafile、ownCloud、Cloudreve、kiftd、nextcloud等）
2、建站类（建站软件使用、论坛、博客、电商等）
3、服务类（域名、SSL、备案等）
4、游戏类（无论版权的各种游戏服务端）
5、系统工具（多平台的系统工具使用，例如linux远程、ftp传输等）
资源须同时符合以下标准：
1、使用开源软件。
2、视频必须提供高清录屏素材（附带技术文档或说明文档）。
3、提供对应内容所使用到的代码、脚本。
搭建软件教程参考产品推荐：
1、Owncloud(网盘)
2、Monibuca流媒体服务器
3、OBS直播-推流服务器搭建使用
4、WordPress 博客软件
5、BIND（Berkeley Internet Name Domain Server）DNS服务器软件
6、MySQL数据
7、离线下载lxdl 离线下载文件到中转服务器，用户从中转服务器下载文件到本地
8、微商城小程序jpshop快速搭建属于自己的社区团购-微商城系统
9、邮件服务器Dovecot
10、音乐服务器Mopidy
11、go语言验证码服务器gocaptcha
推荐一款我正在使用的免费云服务器——阿贝云。
在阿贝云上可以申请免费的虚拟主机和免费的云服务器。具体步骤是：
1.打开阿贝云网站注册账号
2.实名认证（测试期间只要0.3元就可以）
3.开通免费云服务器
上一章节介绍了使用echo启动一个http服务器并提供一个简单的GET接口，这一章对请求与响应做一下详细的讲解。
了解请求与响应之前首先要知道ehco框架提供了一个Context接口，Context 表示当前 HTTP 请求的上下文，我们需要知道的是Context的实现结构体context，context中包含了请求(request)、响应(response)以及参数等结构体，context是一个内部结构体，但是对外提供了访问的方法，我们可以在开发中使用context提供的方法做很多事情，比如获取请求路径、客户端ip、请求参数等等。
request是包含了当前请求信息的结构体，我们从中可以获取到前后端约定好的参数来作出相应的业务逻辑，这下面开始模拟请求
首先模拟一个添加用户的POST请求，这里使用了c.bind()这个方法，这个方法起到的作用是把表单参数或者JSON参数绑定至对应的结构体(这里必须是指针类型)，字段需要一一对应，也就是说前端需要传递的表单或JSON参数名为name、age、gender才能绑定到结构体中。
接下来模拟一个GET请求用来获取用户信息
response是包含了返回信息的结构体，echo提供了多种类型的返回结果
上面编写了处理请求的handler，这里介绍一下如何把handler注册到路由中，这里对应的就是上面handler。
为了让自己和大家登陆的时候方便一点，可以考虑删除登陆验证码！
（一）删除用户登陆验证码，只需要用户名和密码就可以登陆！
1.打开 common/checkUser.asp 去掉以下这两段:
程序代码 第26行
IF validate="" Then
ReInfo(0)="错误信息"
ReInfo(1)="b请输入登录验证码/bbr/a href=""javascript:history.go(-1);""请返回重新输入/a"
ReInfo(2)="WarningIcon"
login=ReInfo
logout(false)
exit function
end if
程序代码 第35行（前面修改后）
IF cstr(lcase(Session("GetCode")))cstr(lcase(validate)) then
ReInfo(0)="错误信息"
ReInfo(1)="b验证码有误，请返回重新输入/bbr/a href=""javascript:history.go(-1);""请返回重新输入/a"
ReInfo(2)="ErrorIcon"
login=ReInfo
logout(false)
exit function
end if
2.打开 login.asp。去掉程序代码 第49行：
label验证码：input name="validate" type="text" size="4" class="userpass" maxlength="4"/ %=getcode()%/labelbr/
[[[[经过本人验证，完全可行，只是注意最后一步，不要错删“ label用户名”哦，我第一次改的时候就删除错了，登陆时候验证码还在，用户名那匡没了！所以要做好备份哈，更改哪个文件之前先把那个文件下载下来！]]]]
（二）去掉留言本的验证码： (无此插件的朋友跳过！看清楚哦，是留言本，不是回复评论的时候！）
打开 Plugins/GuestBook/bookaction.asp 去掉
程序代码 程序代码
IF cstr(lcase(Session("GetCode")))cstr(lcase(validate)) then
showmsg "留言发表错误信息","b验证码有误，请返回重新输入/bbr/a href=""LoadMod.asp?plugins=GuestBookForPJBlog""请返回重新输入/a", "ErrorIcon","plugins"
exit function
end if
打开 Plugins/GuestBook/guestbook.asp 去掉 无此插件的朋友可以跳过
程序代码 程序代码
trtd align="right" width="70"strong验证码:/strong/tdtd align="left" style="padding:3px;"input name="validate" type="text" size="4" class="userpass" maxlength="4"/ %=getcode()%/td/tr
（三）其它地方的验证码也可去掉：
打开 blogcomm.asp 去掉
程序代码 第95行
IF (memName=empty or blog_validate=true) and cstr(lcase(Session("GetCode")))cstr(lcase(validate)) then
ReInfo(0)="评论发表错误信息"
ReInfo(1)="b验证码有误，请返回重新输入/bbr/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验证码有误，请返回重新输入/bbr/a href=""javascript:history.go(-1);""请返回重新输入/a"
ReInfo(2)="ErrorIcon"
postcomm=ReInfo
exit function
end if
程序代码
trtd align="right" width="85"strong验证码:/strong/tdtd align="left" style="padding:3px;"input name="validate" type="text" size="4" class="userpass" maxlength="4"/ %=getcode()% font color="#FF0000" */font 请输入验证码/td/tr
程序代码
IF cstr(lcase(Session("GetCode")))cstr(lcase(validate)) then
ReInfo(0)="错误信息"
ReInfo(1)="b验证码有误，请返回重新输入/bbr/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%trtd align="right" width="70"strong验证码:/strong/tdtd align="left" style="padding:3px;"input name="validate" type="text" size="4" class="userpass" maxlength="4"/ %=getcode()%/td/tr%end if%
打开 common/function.asp 去掉
程序代码
'*************************************
'获得注册码
'*************************************
Function getcode()
getcode= "img src=""common/getcode.asp"" alt="""" style=""margin-right:40px;""/"
End Function
（六）去除申请链接处的验证码！
打开 /BlogLink.asp文件 去掉
程序代码
trtd align="right" width="70"strong验证码:/strong/tdtd align="left" style="padding:3px;"input name="link_validate" type="text" size="4" class="userpass" maxlength="4"/%=getcode()%/td/tr
（七）这个删除不知道是做什么用的！
最后删除 common/GetCode.asp
（八）不删除验证码，但可以修改它，下面是修改验证码的步骤！
PJBlog里的默认字母验证码有大小写限制,也就是有字母时,输入的一定要是大写的,如果输入了小写的,只能再来,而且验证码在这也显得麻烦,参照网上一些资料,修改了PJBlog的验证码.
在common/Getcode.asp文件是生成验证码的,我们只要在这稍微修改就可以
看到16,17,18行
Const cOdds = 4 ' 杂点出现的机率
Const cAmount = 36 ' 文字数量
Const cCode = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
网上比较多的修改法:
修改验证码，使它永远只出现四个“0”
===================================================
在个人Blog中使用验证码没什么意义，PJBlog后台又没有关闭验证码的选项，所以最好的办法就是让它只显示最简单的符号，本站把验证码全部改为4个“0”：
找到common\GetCode.asp，修改“Dim i, ii, iii”下面这段为：
Const cOdds = 0 ' 不出现杂点
Const cAmount = 1 ' 就取一个符号，默认是0
Const cCode = "0123456789" '这一行可以不用改的
使系统自动填写验证码(再复杂的验证码也不用手工输入了，呵呵(0927)
===================================================
在Blog根目录新建一个“*.asp”文件，在里面填写以下代码：
scriptif(parent.document.all.validate)parent.document.all.validate.value="%=Session("GetCode")%";/script
然后在footer.asp的最上面插入一句：
iframe frameborder="no" height=0 width=0 src="*.asp"/iframe
1、输入法的"前往"键或"GO"键默认触发了表单的submit事件。
2、只需要将此事件屏蔽。
3、表单通过ajax方式提交即可。
