分享
 
 
 

手机主题让我日进斗金 分享建站无缝代码

王朝网站推广·作者佚名  2011-12-04
窄屏简体版  字體: |||超大  

前天开始做了个手机主题的网站,观察了dede,风讯,动易,新云等CMS系统,其实也不用说那么多,本人最喜欢用的也就两个:风讯和dede。Dede功能这里就不用多说了,相信是人都知道其强大!可是后来还是选择的风讯。

首先分析一下需求吧,手机主题站当然就涉及到手机品牌和手机型号这两个大类,手机品牌就做成栏目分类就ok了,这个无论那个CMS都能做到。手机型号本来想做成手机品牌下面的二级栏目,但是后来发现出问题了。因为一个手机主题可以属于多个品牌手机的多个机型,但是在CMS系统里面,一般一篇文章只能属于一个栏目,最多就是两个栏目,dede有副栏目,但是远远不够。想一下主题A同时属于诺基亚手机,三星手机,索爱手机甚至更多……那该怎么办?直接用现有的CMS是绝对不能做出一个好站来的。

只有去修改CMS,做二次开发,才能做出比较好的主题站来。在下不太懂php,而且dede太强大,修改起来飞车麻烦!!!所以就选择了风讯,对风讯做二次开发。

我仔细观察了一下风讯的栏目和专题结构,虽然可以把手机品牌做成分类栏目,再把手机机型做成专题,这样发布一个主题文章就可以从属于多个专题,但是无法从属于多个手机品牌,因为每个主题文章只能从属一个栏目。我又想到了另外一个办法,那就是在同一个主题从属于多个栏目的时候,在其他栏目新建标题文章,然后指向第一个主题文章地址,这样虽然比较麻烦,但只有这样才能关联起来。请看关系图:

主题文章A ——》栏目A (诺基亚)——》专题机型1,专题机型2,专题机型3

标题主题文章B(地址指向:主题文章A)——》栏目B(三星)——》专题机型1,专题机型2,专题机型3。

注:——》表示从属于改分类下的文章。

可是问题又出现了,在发布文章的时候,选择专题,系统调出的是整站的所有专题。我们要的效果应该是:我为诺基亚栏目添加内容,调出的是诺基亚的手机机型专题列表,而不是所有机型列表。但是风讯的专题原本是跟栏目无关联的,从这里开始就需要修改风讯系统了,接下来看看我是怎么修改的吧!

第一步:添加数据库字段,Foosun_Data目录下面有个FS400.mdb,打开找到FS_NS_Special表,这个表格是存储风讯专题数据的,添加一个字段:ClassID。

<tr>

<td class="hback"><div align="right">所属分类:</div></td>

<td class="hback">

<select name="newsCat" id="newsCat">

<option value="0" selected>请选择分类</option>

<%

Set obj_Class_Rs = server.CreateObject(G_FS_RS)

obj_Class_Rs.open "select ID,ClassName from FS_NS_NewsClass where ReycleTF=0",Conn,1,3

While not obj_Class_Rs.eof

%>

<option value="<%=obj_Class_Rs("ID")%>" <% If Class_ID = obj_Class_Rs("ID") Then Response.Write "selected" %>><%=obj_Class_Rs("ClassName")%></option>

<%

obj_Class_Rs.MoveNext

Wend

obj_Class_Rs.close

set obj_Class_Rs = nothing

%>

</select>

</td>

</tr>

第三步:找到Special_Save.asp文件

在第22行尾部增加一个属性Class_ID。第35行下面增加代码,以获取提交classid

Class_ID = NoSqlHack(request.Form("newsCat"))

最后到第116行添加代码

obj_Save_Rs("ClassID") = Class_ID

将分类id添加到数据库记录。这样专题就可以和栏目关联起来了。但是这样还不够,还没达到要求,我们是要方便添加文章,可以减少工作量。还需要修改那些呢?呵呵,当然是添加文章的asp文件了。

第四步:在同样的目录下,找到News_add.asp文件。

在第10行的dim处尾巴加上,ClassID,新增一个变量。

第28行的查询语句

GetClassAdPicInfoSql="Select IsAdPic,AdPicWH,……

修改为GetClassAdPicInfoSql="Select ID,IsAdPic,AdPicWH,……,添加对ID的查询。

然后在第30行If Not GetClassAdPicInfoRs.Eof Then下面添加一行代码:

ClassID=GetClassAdPicInfoRs("ID"),将classid数据取出来。

找到第179行

将onClick="SelectSpecial();"修改为onClick="SelectSpecial(<%=ClassID%>);"

这个是为了将id传送到专题列表窗口,用于过滤掉非该栏目下的其他专题信息。鼠标转到该文件的680行,找到function SelectSpecial()函数,将这个函数改为:

function SelectSpecial(class_id),增加了class_id参数传递进来。

函数里有个语句

ReturnValue = OpenWindow('lib/SelectspecialFrame.asp,400,300,window);

修改为:

ReturnValue = OpenWindow('lib/SelectspecialFrame.asp?classID='+class_id,400,300,window);

到这里基本上快完成了,虽然代码很枯燥,但是多少还得学习一点,对于做个站来说是相当重要的!

第五步:在Admin/News/lib目录下找到SelectspecialFrame.asp这个文件。

在该文件顶部插入以下代码:

<%

Dim str_ClassID

str_ClassID = Request("classID")

%>

然后在第15行

<iframe id="LableList" src="SelectSpecial.asp"……></iframe>

改为

<iframe id="LableList" src="SelectSpecial.asp?classid=<%=str_ClassID%>"…></iframe>

将参数传送。

第六步:找到Admin/News/lib目录下的SelectSpecial.asp。

在第8行dim定义变量后面添加,classID变量。在第10行添加代码:

classID = Request("classid")

找到33行附近的查询语句

TypeSql = "Select SpecialCName,SpecialEName from FS_NS_Special where isLock=0

在后面添加查询条件,语句变为:

TypeSql = "Select SpecialCName,SpecialEName from FS_NS_Special where isLock=0 and classID="& classID

大功告成!这样进入到诺基亚手机栏目下添加文章,掉出来的就是诺基亚下面的所有机型,过滤掉了其他品牌的机型了,很爽吧!这样就轻松的把风讯的分类栏目和专题无缝连接起来了。

文章摘自:http://www.shouji263.com

本代码仅供学习参考之用,如有需要可联系我要源代码。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有