动易程序修改技巧.docx

上传人:b****8 文档编号:27720789 上传时间:2023-07-04 格式:DOCX 页数:15 大小:39.32KB
下载 相关 举报
动易程序修改技巧.docx_第1页
第1页 / 共15页
动易程序修改技巧.docx_第2页
第2页 / 共15页
动易程序修改技巧.docx_第3页
第3页 / 共15页
动易程序修改技巧.docx_第4页
第4页 / 共15页
动易程序修改技巧.docx_第5页
第5页 / 共15页
点击查看更多>>
下载资源
资源描述

动易程序修改技巧.docx

《动易程序修改技巧.docx》由会员分享,可在线阅读,更多相关《动易程序修改技巧.docx(15页珍藏版)》请在冰豆网上搜索。

动易程序修改技巧.docx

动易程序修改技巧

动易程序修改技巧

大家在运用动易的后台的时候常常会觉得有些地方不近人意,很多地方不能按照自己想要的方式显示出来,我在网上找了些小技巧,做了些修改,和大家一起分享下。

1、直接显示指定频道首页【修改项目】:

首页跳转

【适用版本】:

2005、2006

【修改内容】:

修改网站根目录下的首页文件Index.asp,在最底部添加下面这一行代码即

可:

<%response.redirect"Article/index.html"%>其中频道名称及首页名称可根据自己需要进行调整,如Photo/index.shtml

【效果截图】:

【注意事项】:

2、简繁转换

【修改项目】:

程序调用

【适用版本】:

2005、2006

【修改内容】:

在模板相应位置插入以下代码即可实现页面的简繁转换。

href=""name=StranLink>繁體中文

//你的网站

域名/Js/gb_big5.js">

【效果截图】:

【注意事项】:

3、关闭鼠标滚动放大缩小【修改项目】:

鼠标滚动放大缩小特效

【适用版本】:

2005、2006

【修改内容】:

将模板中无级缩放函数:

//无级缩放图片大小functionbbimg(o)

{

varzoom=parseInt(o.style.zoom,10)||100;

zoom+=event.wheelDelta/12;

if(zoom>0)o.style.zoom=zoom+'%';

returnfalse;

}

修改为:

//无级缩放图片大小

functionbbimg(o)

{

returntrue;

}

ps:

试过删除这段代码的同学肯定发现保存后它又回来了,现在有办法解决了。

【效果截图】:

【注意事项】:

4、邮件验证后返回首页

【修改项目】:

页面跳转

【适用版本】:

2006

【修改内容】:

网友注册,邮件验证,网友点邮件链接跳到激活注册页面,但此时如果您点

击窗口的“返回上一页”,就跳到刚才的邮箱邮件页面。

能否改一下,让网友点“返回上一页”,

直接就跳到您网站首页呢?

打开reg/,找到

CallWriteSuccessMsg(”恭喜你正式成为本站的一员,请返回首页登录。

",ComeUrl)

将其更改为:

CallWriteSuccessMsg("恭喜你正式成为本站的一员,请返回首页登录。

享受更多权利!

","h

ttp:

//你的网址/")

【效果截图】:

注意事项】:

5、横向登录框对齐

【修改项目】:

登录框样式

【适用版本】:

2005、2006

【修改内容】:

发现2006版的会员登录默认是js调用,设置成横排后,个人认为有两个不足:

1、在火狐、Opera浏览器中显示异常;

2、首页一定要加代码,使打开速度变慢。

于是,将会员登录改回原2005版登录:

ShowType=2"frameBorder=0width=670scrolling=noheight=26>

发现排列得很不整齐,特别是验证码部分,经过反复尝试,修改成功,现将我修改的代码与有需要的朋友共享:

打开UserLogin.asp文件,以下代码:

Response.Write"

Response.Write"

"&vbCrLf

将上面的代码替换为:

Response.Write""&vbCrLf

Response.Write""&vbCrLf

Response.Write""&vbCrLf

Response.Write"用户名

50px;background-color:

#CCCCCC;height:

15px;'>"&vbCrLf

IfShowType=1Then

Response.Write""&vbCrLf

 

EndIf

Response.Write"

密码

me='UserPassword'type='password'id='Password'size='6'maxlength='20'style='width:

50px;background-color:

#CCCCCC;height:

15px;'>"&vbCrLf

IfShowType=1Then

Response.Write""&vbCrLf

Response.Write""&vbCrLf

EndIf

IfEnableCheckCodeOfLogin=TrueThen

Response.Write"验证码

40px;background-color:

#CCCCCC;height:

15px;'>"&vbCrLf

IfShowType=1Then

Response.Write""&vbCrLf

Response.Write""&vbCrLf

EndIf

EndIf

Response.Write""&vbCrLf

Response.Write"

#b2b2b2;border-left-color:

#b2b2b2;border-top-color:

#B2B2B2;border-right-color:

#B2B2B2;border-bottom-color:

#B2B2B2;vertical-align:

top;'>永久登录"&vbCrLf

Response.Write"

tyle='width:

57px;background-color:

#cccccc;height:

16px;'>"&vbCrLf

IfShowType=1Then

Response.Write"

"&vbCrLf

Else

Response.Write""&vbCrLf

Response.Write""&vbCrLf

EndIf

Response.Write"注册忘记密码"&vbCrLf

Response.Write""&vbCrLf

【效果截图】:

【注意事项】:

其实是限定每个项目的高度即可使之对齐了

6、语言包应用实例问答

问:

我想将”您所在的位置”这一提示改为”导航”如,何操作?

答:

修改Gb2312.xml中

即可。

问:

导航中的>>符号如何修改为其他?

答:

修改您需要的符号即可,如果想使用图片请更改为

[CDATA[]]>。

问:

如何修改频道与栏目列表中的分割符号“|?

答:

频道的分割符号为

[CDATA[|]]>栏目的分割符号为|

问:

如何修改浏览权限不够时,系统的错误提示?

答:

找到语言包如下内容

[CDATA[

  • 对不起,您没有浏览此栏目内容的权限!

  • ]]>直接修改为您需要的语句即可。

    问:

    我想修改公告弹出窗口的模式,如何实现?

    答:

    找到语言包False为是否启用弹出检测,修改为True,则为每一小时弹出一次。

    语言包1中的数字为弹出间隔时间。

    语言包中间的语句即为弹出窗口的控制语句,你可以自行修改来达

    到个性化的目的。

    问:

    滚动公告的模式不是很适合我网站的风格,如何修改?

    答:

    找到语言包标签之间的内容为滚动公告的摸板,可自行修改。

    问:

    我的网站在内网,不想对友情连接进行点击统计了,如何修改。

    答:

    找到语言包True改为False

    问:

    我想将友情连接中的“点击申请”改为“申请连接”如何做到?

    答:

    找到语言包点击申请改为申请连接

    问:

    我需要更改作者的分类,具体如何去做?

    答:

    找到语言包

    大陆作者

    港台作者

    海外作者

    本站特约

    其他作者

    定义了5种不同的默认分类,您可以按照自己的实际需求更改它,来源、厂商、品牌的分类

    也可以自行修改。

    问:

    如何关闭用户注册时的EMAIL单一性检查?

    答:

    找到语言包True改为False

    lOnce>

    问:

    文章属性中的[组图]等如何修改?

    答:

    找到语言包

    [图文]

    [组图]

    [推荐]

    [注意]可视您的需求自行更改。

    问:

    文章列表中,栏目名称是用[与]包含的,我想改为“|,“请问如何操作

    答:

    找到语言包

    [CDATA[[{$Text}]]]>改为

    [CDATA[|{$Text}|]]>即可。

    问:

    需要修改文章内容页中的顶,热,荐这三个字的颜色,请问改哪里?

    答:

    找到语言包

    [CDATA[顶]]>

    [CDATA[热]]>

    [CDATA[荐]]>

    可直接修改color属性的颜色值,甚至可直接将文字修改为您需要的图片,以实现更加个性化的显示效果。

    问:

    最新文章显示页面中每页只能显示20条记录,如何改为40条?

    答:

    找到语言包20改为40推荐和热点页面也可找到相应的控制语句,进行修改。

    问:

    用户点数不足时的提示如何修改,现在的太生硬了。

    答:

    修改语言包中的内容即可。

    问:

    我想修改文章显示内容页中的发表评论那一栏,在哪里?

    答:

    修改语言包之间的内容,可随意增加你需要的新功能。

    问:

    图片显示页面中,总是带有两个滚动条,如何去掉?

    答:

    修改语言包]]>为

    ]]>即可。

    7、限制已注册用户重复注册

    【修改项目】:

    会员注册

    【适用版本】:

    2006

    【修改内容】:

    有些用户在已登录的情况下无意中会点击到注册页面,不管是有意还是无意的,重复注册对每个网站来说都不是什么好事(马甲太多了),所以转载了动易论坛里的一个小技巧,避免已注册的用户(在已登录的情况下)限制重复注册,从而避免了“马夫”的出

    打开Reg目录文件,在

    SubMain()

    IfEnableUserReg<>TrueThen

    FoundErr=True

    ErrMsg=ErrMsg&"

  • 对不起,本站暂停新用户注册服务!

  • "

    CallWriteErrMsg(ErrMsg,ComeUrl)

    ExitSub

    EndIf

    下加入以下代码

    IfCheckUserLogined=Truethen

    FoundErr=True

    ErrMsg=ErrMsg&"

  • 对不起,您已是本站注册用户,请勿重复注册!



    您的用户名是"&username&"
    <<返回首页用户中心>>

  • "

    CallWriteErrMsg(ErrMsg,ComeUrl)

    ExitSub

    EndIf

    保存,刷新即可。

    【效果截图】:

    【注意事项】:

    8、缩小站内调查的空白间距

    【修改项目】:

    调查模块

    【适用版本】:

    2005、2006

    【修改内容】:

    动易默认的调查板块在投票”下面会留有很多的空余地方,不管是设定了高

    度还是不设高度,都不能把这个多出来的空白减小,对于栏目板块之间十分紧凑的网站页面

    来说,多了这么一个空白,显得很碍眼,所以在这里把修改方法和大家一起分享,只需修改

    语言包(Language目录里的Gb2312.xml文件),找到v!

    [CDATA[vformname="VoteForm{$lid}"method="post"action="{$strlnstallDir}vote.asp"target="_blank"style=

    "margin-top:

    0;margin-bottom:

    0">加上红色的那部分代码就可以了。

    HopeSludge二严_-■-

    HopeStudio

    [s設累]限查看1

    【注意事项】:

    9、把待签文章”改为会员类型

    【修改项目】:

    会员登录

    【适用版本】:

    2005、2006

    【修改内容】:

    在系统根目录的Userlogin.asp里查找以下代码:

    Response.Write"待签文章:

    ”&vbCrLf

    IfTrim(Unsignedltems&"”)=""Then

    Response.Write"0篇"

    Else

    DimUnsignedltemNum,arrUserarrUser=Split(Unsignedltems,",")

    UnsignedltemNum=UBound(arrUser)+1

    Response.Write""&UnsignedltemNum&"

    II

    EndIf

    用Response.Write"会员类别:

    "&GroupName&""替换以上代

    码即可

    ps:

    同样的道理,要是想改其他的选项,可以采用一样的方法

    槪改后

    资金余银;经验积分;计费方式:

    可用点数■

    0元T分押点数

    0A

    無容T诘:

    m篇

    蒔闾短信:

    n条

    【效果截图】:

    上啊旳

    上午好’

    资金余靈;0元疑验羯分;T分计费方式:

    扣点数

    「町用点議:

    D点r

    会一亠珂;=酬总匸刖

    待ivsmMwiajft

    【注意事项】:

    10、如何将留言簿的查看模式由讨论区方式改为留言板方式?

    【修改项目】:

    留言板

    【适用版本】:

    2005、2006

    【修改内容】:

    打开GuestBook/index.asp文件,加上以下红色部分的代码即可:

    --#includefile="CommonCode.asp"-->

    <%

    dimShowGStyle

    ShowGStyle=Request.Cookies("ShowGStyle")

    IfShowGStyle=""orNotIsNumeric(ShowGStyle)Then

    Response.Cookies("ShowGStyle")=2

    EndIf

    CallPE_GuestBook.Showlndex

    SetPE_GuestBook=Nothing%>

    效果截图】:

    无【注意事项】:

    11、注册时的默认省市及城市

    【修改项目】:

    地址

    【适用版本】:

    2006

    【修改内容】:

    打开Region.asp文件,修改以下红色部分的代码即可:

    Country=ReplaceBadChar(Trim(Request("Country")))

    Province=ReplaceBadChar(Trim(Request("Province")))

    City=ReplaceBadChar(Trim(Request("City")))

    IfCountry=""ThenCountry="中华人民共和国"

    IfProvince=""ThenProvince="浙江省"

    IfCity=""ThenCity="台州市"

    'OnErrorResumeNext

    CallOpenConn

    【效果截图】:

    【注意事项】:

    市级城市必须是上面填的省里所包括城市,不然会出现错乱。

    12、把后台顶部没用的两个快捷图标发送邮件和帮助中心改成修改风格和修改模板

    方便修改风格和模板时的点击制作新模板里,边制作边调试,后台操作特别烦,特想此法来,减少操作,不知对大家有没

    有用!

    修改项目】:

    后台

    【适用版本】:

    2006

    【修改内容】:

    打开admin/文件,

    修改紫色和红色为你当前风格及模板的地址即可,

    Response.Write"

    ages/top_an_1.gifborder='0'x

    展开阅读全文
    相关资源
    猜你喜欢
    相关搜索

    当前位置:首页 > 总结汇报 > 学习总结

    copyright@ 2008-2022 冰豆网网站版权所有

    经营许可证编号:鄂ICP备2022015515号-1