新云匿名用户发表软件修改方法
-
新建PUB目录。复制USER文件夹下的config.asp softpost.asp check.asp三个文件到PUB目录里。
然后打开softpost.asp 去掉<!--#include file="head.inc"-->和<!--#include file="foot.inc"-->两个标记
然后去掉如下代码
If CInt(GroupSetting(11)) = 0 Then
ErrMsg = ErrMsg + "<li>对不起！您没有发布软件的权限，如需要该权限请联系管理员。</li>"
Founderr = True
End If
If CInt(Newasp.PostGrade) > CInt(Newasp.membergrade) Then
ErrMsg = ErrMsg & "<li>对不起！您没有发布软件的权限，如需要该权限请联系管理员。</li>"
FoundErr = True
End If
保存，关闭。
然后打开check.asp 去掉如下代码
第一段代码：
If Trim(MemberName) = "" Or memberid = 0 Then
Response.Redirect ("./login.asp")
End If
MemberName = Left(MemberName,45)
If Trim(Request.Cookies(Newasp.Cookies_Name)) = "" Then
Response.Redirect ("./login.asp")
End If
第二段代码：
If rsmember.BOF And rsmember.EOF Then
Response.Cookies(Newasp.Cookies_Name) = ""
Set rsmember = Nothing
Response.Redirect "login.asp"
Response.End
Else
If rsmember("UserLock") > 0 Then
Response.Cookies(Newasp.Cookies_Name) = ""
Set rsmember = Nothing
ErrMsg = "<li>你的用户名已被锁定,你不能登陆！如要开通此帐号，请联系管理员。</li>"
Call Returnerr(ErrMsg)
Response.End
End If
保存退出。
然后用http://127.0.0.1/pub/softpost.asp?ChannelID=2即可访问CHANNEL频道ID为2的页面了。发布软件时不需要权限。
