WindsPhoto首页调用相册缩略图

Web

一 142010

狼的旋律的[loc=http://www.wilf.cn/post/WindsPhoto.html]WindsPhoto[/loc]相册插件一直没有提供首页缩略图列表调用的方式，因为自己比较懒也一直没去修改，今天遇上朋友问，顺手解决这个问题。

安装插件的问题请到作者主页去问，我这里只解决标题的问题。

插件后台安装好之后，找到插件目录下的admin_html.asp，Ctrl+F 搜索函数GetHTMLSort()，把整个函数替换成下面这段。

[code=asp]
Function GetHTMLSort()
Dim rssort, rssortcount, sqlsort1, sqlsort2, countsort
Set rssort = Server.CreateObject("ADODB.RecordSet")
sqlsort1= "select top 6 * from zhuanti where pass='' order by ordered,id asc"
rssort.Open sqlsort1, wConn, 1, 1
Do While Not rssort.EOF
sqlsort2 = "select top 1 * from desktop where zhuanti="&rssort("id")&"and hot=true"
Set rssortcount = Server.CreateObject("ADODB.RecordSet")
rssortcount.Open sqlsort2, wConn, 3, 3
GetHTMLSort = GetHTMLSort&"

"&Chr(13)&Chr(10)
rssortcount.Close
Set rssortcount = Nothing
rssort.movenext
Loop
rssort.Close
Set rssort = Nothing
End Function
[/code]

还是因为比较懒，所以连里面的变量名都没改改就直接拉过来用了…调用代码和原插件调用代码一致，修改后到该插件管理页面点下生成静态首页/缓存文件↓即可。静态页面需要文件重建才能显示出来。

预览效果如图：

不同的主题可能还需要适当的定义下css，上面的函数中我设置主页显示6个相册，然后每个相册只显示封面，每个图片限制宽度80，代码结构和zblog系统生成的include代码一致。

10 Responses to “WindsPhoto首页调用相册缩略图”

教学时光 says:

2010 年 1 月 14 日 at 13:48

勤快的鸟儿有虫吃，呵呵
草根网评 says:

2010 年 1 月 14 日 at 15:40

这函数比较好懂。[GRAVATAR=http://www.birdol.com]acb31bc1883ad280a90d8044f61b3009[/GRAVATAR]

nobird 于 2010-1-14 16:18:00 回复

脚本语言最大优点好像也就是比较容易看懂了…呵呵
腾飞 says:

2010 年 1 月 15 日 at 14:11

这个插件还没有用过@
haphic says:

2010 年 1 月 16 日 at 00:57

所以说开源的东东嘛, 搞垄断是不行滴. 不过话说回来, 有些东东想自用也是难免滴.

鸟儿这个回复评论的记住功能还有个 BUG, 我也是四五天前才发现修正过. 就是提交评论函数中的保存评论者信息和提取评论者信息的顺序问题, 正确顺序应该是先保存后提取. 倘若先提取后保存的话, 一旦保存的值是错误的, 除了清空 Cookies 的办法外, 是无法再更正了.[GRAVATAR=http://www.birdol.com]acb31bc1883ad280a90d8044f61b3009[/GRAVATAR]

nobird 于 2010-1-16 10:36:16 回复

貌似我的没错?　我看你的现在的顺序　和我的是一样的
跑酷 says:

2010 年 4 月 29 日 at 21:56

楼主不错阿！！！
知道的中文网 says:

2010 年 5 月 9 日 at 13:58

学习了……不错
kaka says:

2010 年 8 月 17 日 at 23:19

请问这个怎么改？img title=’查看该相册’
调用相册名称~
什么丰胸产品好 says:

2010 年 10 月 30 日 at 10:43

很不错，收藏了
上海塑料袋印刷 says:

2010 年 11 月 30 日 at 14:37

试试喽，以前也没用过
最有效的减肥药排行榜 says:

2010 年 12 月 9 日 at 22:12

没用过哦，，，最有效的减肥药排行榜 http://www.jf550.com