浮梦呓语

多行分页

hylijianjun@163.com(孤鸿念天) — Thu,08 Jul 2010 17:13:35 +0800

<%
set conn = server.CreateObject("adodb.connection")
conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0; DATA SOURCE ="&dataurl
strQuery="select * from products where minclass='"&minclass&"' orDER BY ID DESC"
set rs=server.createobject("adodb.recordset")
rs.open strQuery,conn,1,1
rs.pagesize=12
pagenum=request("pagenum")
if pagenum="" or pagenum<=1 then
pagenum=1
else
pagenum=cint(pagenum)
end if
if pagenum>=rs.pagecount then
pagenum=rs.pagecount
else
pagenum=cint(pagenum)
end if
num=rs.recordcount
if rs.eof then
response.write("")
else
rs.absolutepage=pagenum
for i=1 to rs.pagesize/3 '第一层循环
%>

<%for m=1 to 3%>

<%
rs.movenext
if rs.eof then
exit for
end if
next%>

<%
if rs.eof then
exit for
end if
next
end if
%>

该类暂无产品！

');">" width="167" height="128" alt="<%=rs("proname")%>" border="0">

');"><%=rs("proname")%>

<%
response.write"共有 "&num&" 件产品  每页 "&rs.pagesize&" 件  当前第 "&pagenum&" 页  共 "&rs.pagecount&" 页  "
if pagenum<=1 then
response.write"首页  "
response.write"上一页  "
else
response.write"首页  "
response.write"上一页  "
end if
if pagenum>=rs.pagecount then
response.write"下一页  "
response.write"尾页"
else
response.write"下一页  "
response.write"尾页"
end if
set rs=nothing
%>

极限主题论坛注册邀请十三枚

hylijianjun@163.com(孤鸿念天) — Wed,16 Jun 2010 11:10:02 +0800

http://bbs.themex.net/
邀请注册十三枚，需要的联系我。

fblogs新闻系统V2.5升级日志

hylijianjun@163.com(孤鸿念天) — Mon,14 Jun 2010 12:42:42 +0800

      fblogsnews新闻系统是一个基于文章系统拓展开来的asp源码，加入了新闻评论、公告管理、友情链接管理、投票管理、新闻分类管理等功能，结构清晰，适合二次开发，没有做任何限制，拓展性较强。
      管理：/admin   用户密码都为admin
      留言建议：www.fblogs.cn，邮箱themex@qq.com

     2010.06.14升级日志

     1.后台重新编写了部分管理文件的代码；
     2.增加了文章、评论、公告的回收站功能，删除之后移除到回收站，可恢复和彻底删除；
     3.增加了首页flash轮播图片新闻功能；
     4.后台增加了管理编辑器上传文件的功能，方便查看和管理文件；
     5.改动了编辑器的文件夹位置，现在的文件上传保存路径为../upfiles“
     6.公告添加直接转向网址的功能
     7.文章管理功能的一些优化，和其他一些页面显示的优化……

     时间仓促，未能做功能上的大规模添加，本来打算做的管理员分级等功能也被搁浅了，原因无他，期末考试到了……最近暂时无法正常更新了，有需要添加哪些功能的或者有其他意见的，可以到我的博客网站留言，可能的话我会添加和采纳，谢谢！

ASP实例：去除js图片轮播显示最后一个空白

hylijianjun@163.com(孤鸿念天) — Fri,11 Jun 2010 01:30:23 +0800

<%
'省略连接数据库代码
    dim pics,mylinks,texts,texts2
      set rs=server.createobject("adodb.recordset")
      rs.source="select top 5 * from news where ispic=1 order by id desc"
      rs.Open rs.source,conn,1,1
      do while not rs.eof

                  pics=pics&"|"&rs("picfile")
                  mylinks=mylinks&"|news.asp?id="&rs("id")
                  texts=texts&"|"&rs("title")
                   texts2=texts&"|"&rs("title")
                  rs.movenext
loop
rs.close

picLen=Len(pics)
pics=right(pics,(picLen-1)) '作用是去除最后一个"|"

mylinksLen=Len(mylinks)
mylinks=right(mylinks,(mylinksLen-1))

textsLen=Len(texts)
texts=right(texts,(textsLen-1))

texts2Len=Len(texts2)
texts2=right(texts2,(texts2Len-1))
%>

var pics='<%=pics%>';
var mylinks='<%=mylinks%>';
var texts='<%=texts%>';
var texts2="<%=texts2%>";

Access数据库转移工具

hylijianjun@163.com(孤鸿念天) — Wed,26 May 2010 13:09:27 +0800

华军下载站下载地址：http://www.onlinedown.net/soft/48614.htm

引用内容

此软件仅用于在各种类型的access数据库之间迁移数据用。
是为了方便网站升级时数据库的迁移而写的。
可以一个表一个表的迁移，而且可以自行设定不同字段之间的对应关系，并可对字段设置默认值。

数据方向为从老数据库导入数据到新数据库。

1、首先点击“打开老数据库”按钮，来打开一个源数据库。
2、然后点击“打开新数据库”按钮，打开一个要导入数据的目标数据库。

现在，新老数据库内的表都已经列出在了最左边。点击某个表，可以在中间列表框内看到此表内的所有字段，并同时显示此表内的全部数据在最右边。

3、新老数据库都打开后可以看到“设置对应关系和迁移”按钮已经激活了。
    点击“设置对应关系和迁移”按钮，会显示一个新的页面。

   在这里也列出了老数据库和新数据库的表，具体迁移数据如下操作：
a、点击一个要导出数据的老数据库表
b、再点击一个要导入数据的新数据库表

   这时，可以看到“字段对应和过滤器”框内已经列出了选中表内的字段。
左边是老数据库字段，中间是新数据库字段。
如果数据库的字段名都是相同且对应的，那么直接点击“>>”标记的按钮，全部同名字段会被自动对应，并显示在最右边的列表框内。

如果字段不是一一同名对应的，那么首先鼠标点击选中一个老数据库内的字段，然后点击选中一个新数据库内的字段
最后点击“>”标记的按钮来对应此字段。

如果要给新数据库的字段指定默认值，那么先鼠标点击选中一个新数据库字段，并根据默认值不同，分别点击
“字符默认值”或者“数字默认值”按钮来输入默认值。

不需导入数据的字段，或者数据库原先设置有默认值的新数据库字段，可以不做任何新老对应处理。

当前表的全部字段处理妥当后，点击“迁移当前表数据”按钮来完成迁移动作。

注意：迁移完成后，可以在开始的页面上来回切换表来显示新的数据，因为开始页面的数据库表是不会自动刷新的。

有什么建议和意见，可以来邮件：ufo2003@126.com, fuchengrong@hotmail.com
傅铖荣 20060411

asp表单添加验证码

hylijianjun@163.com(孤鸿念天) — Fri,21 May 2010 22:33:12 +0800

加在提交验证文件中的判断语句:错误信息将以弹出窗口提示返回!

复制内容到剪贴板程序代码

<%
if request("verifycode")<>session("GetCode") then
Response.Write ""
Response.End
end if
%>

将以下代码表单

复制内容到剪贴板程序代码

验证码：

把以下代码复制保存为:GetCode.asp文件,并放在留言页面的目录里.

复制内容到剪贴板程序代码

<%
Option Explicit
Response.buffer=true
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Addheader    "cache-control","no-cache"
Response.AddHeader    "Pragma","no-cache"
Response.ContentType = "Image/BMP"

Call Com_CreatValidCode("GetCode")

Sub Com_CreatValidCode(pSN)

         Randomize

         Dim i, ii, iii

         Const cOdds = 3 ' 杂点出现的机率
         Const cAmount = 10 ' 文字数量
         Const cCode = "0123456789"

         ' 颜色的数据(字符，背景)
         Dim vColorData(1)
         vColorData(0) = ChrB(0) & ChrB(0) & ChrB(211)   ' 蓝0，绿0，红0（黑色）
         vColorData(1) = ChrB(255) & ChrB(255) & ChrB(255) ' 蓝250，绿236，红211（浅蓝色）

         ' 随机产生字符
         Dim vCode(4), vCodes
         For i = 0 To 3
           vCode(i) = Int(Rnd * cAmount)
           vCodes = vCodes & Mid(cCode, vCode(i) + 1, 1)
         Next
         Session(pSN) = vCodes   '记录入Session
         ' 字符的数据
         Dim vNumberData(9)
         vNumberData(0) = "1110000111110111101111011110111101001011110100101111010010111101001011110111101111011110111110000111"
         vNumberData(1) = "1111011111110001111111110111111111011111111101111111110111111111011111111101111111110111111100000111"
         vNumberData(2) = "1110000111110111101111011110111111111011111111011111111011111111011111111011111111011110111100000011"
         vNumberData(3) = "1110000111110111101111011110111111110111111100111111111101111111111011110111101111011110111110000111"
         vNumberData(4) = "1111101111111110111111110011111110101111110110111111011011111100000011111110111111111011111111000011"
         vNumberData(5) = "1100000011110111111111011111111101000111110011101111111110111111111011110111101111011110111110000111"
         vNumberData(6) = "1111000111111011101111011111111101111111110100011111001110111101111011110111101111011110111110000111"
         vNumberData(7) = "1100000011110111011111011101111111101111111110111111110111111111011111111101111111110111111111011111"
         vNumberData(8) = "1110000111110111101111011110111101111011111000011111101101111101111011110111101111011110111110000111"
         vNumberData(9) = "1110001111110111011111011110111101111011110111001111100010111111111011111111101111011101111110001111"
         ' 输出图像文件头
         Response.BinaryWrite ChrB(66) & ChrB(77) & ChrB(230) & ChrB(4) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) &_
           ChrB(0) & ChrB(0) & ChrB(54) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(40) & ChrB(0) &_
           ChrB(0) & ChrB(0) & ChrB(40) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(10) & ChrB(0) &_
           ChrB(0) & ChrB(0) & ChrB(1) & ChrB(0)

         ' 输出图像信息头
         Response.BinaryWrite ChrB(24) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(176) & ChrB(4) &_
           ChrB(0) & ChrB(0) & ChrB(18) & ChrB(11) & ChrB(0) & ChrB(0) & ChrB(18) & ChrB(11) &_
           ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) &_
           ChrB(0) & ChrB(0)

         For i = 9 To 0 Step -1   ' 历经所有行
                 For ii = 0 To 3   ' 历经所有字
                         For iii = 1 To 10 ' 历经所有像素
                                 ' 逐行、逐字、逐像素地输出图像数据
                                 If Rnd * 99 + 1 < cOdds Then ' 随机生成杂点
                                         If Mid(vNumberData(vCode(ii)), i * 10 + iii, 1) Then
                                                 Response.BinaryWrite vColorData(0)
                                         Else
                                                 Response.BinaryWrite vColorData(1)
                                         End If
                                 Else
                                         Response.BinaryWrite vColorData(Mid(vNumberData(vCode(ii)), i * 10 + iii, 1))
                                 End If
                         Next
                 Next
         Next
End Sub
%>

fblogs简单asp新闻系统 V1

hylijianjun@163.com(孤鸿念天) — Thu,20 May 2010 20:58:58 +0800

      上一版本为“简单ASP新闻文章系统”，改名为fblogs新闻系统。
      主要功能有：1.无限分类，支持设置分类是否主页显示，是否导航显示
                        2.可见的html编辑器，可以自由上传附件，并设置是否为图片新闻，自动读取图片地址
                        3.新闻页面自动分页
                        4.人性化的友情链接管理和文章管理
                        5.代码未做任何加密，可以自由修改，代码简单

      更新部分：修正了修改文章的编辑器BUG，重写了分类管理的源码，添加了图片新闻的功能并设置编辑器自动读取图片地址，增加了友情链接的功能
      预计下一版本添加简单留言本和投票的功能。您有什么好的想法，可以在此页面留言告知我。

      此版本为自由分享，但没有做美工和安全方面的完善，另外功能尚不够多。适合新人学习，也适合老鸟以此构架制作网站。

      此源码使用免费，如果您有需要，可以付费向我要求定制版本，提供网站制作。可以加QQ8223942或者邮件8223942#qq.com（#改为@）详谈，QQ和邮件恕不用作其他用途，如果您有疑问或者建议，请转移至网站留言本。

后台管理地址：/admin
用户名密码均为admin

下载地址：http://u.115.com/file/f083196327

asp读取数据的循环表格

hylijianjun@163.com(孤鸿念天) — Tue,04 May 2010 08:58:39 +0800

<%
dim rs,sqltext
set rs = Server.CreateObject("adodb.recordset")
sqltext="select * from [bigclass]"
rs.Open sqltext,conn,1,1
m=1
colzs=2 '一行显示2列
if rs.RecordCount mod colzs=0 then
rowzs=int(rs.RecordCount/colzs)
else
rowzs=int(rs.RecordCount/colzs)+1
end if
for j = 1 to rowzs%>

<%for i = 1 to colzs%>
<%if not rs.EOF then%>

<%
rs.MoveNext
m = m + 1
else
%>

<%end if%>
<%next%>

<%
next
rs.Close
set rs = nothing
%>

你要从数据库中读取并循环的代码。。。

简单实用ASP新闻文章系统

hylijianjun@163.com(孤鸿念天) — Fri,16 Apr 2010 01:09:04 +0800

修改自鱼的ASP简单实用新闻文章系统清爽版 http://www.infish.cn/article/50.htm
因为要参加某个比赛，所以选了这个简单的ASP系统。

鱼的原版介绍如下：

引用内容

做了一个简单的新闻系统
供ASP新手学习之用
基本功能都有管理员后台添加新闻，可自行设定类别，修改密码等...完全动态管理发布!
增加类别新闻分页浏览！
集成eweb编辑器
加强数据库安全性!
简洁，实用！
后台密码是：admin

我做了一些修改：

1.增加了新闻列表页面的分页功能
2.修复了一些BUG，如后台栏目名称后导致以前文章无法显示，无法修改文章栏目

如有使用上的问题，可以到鱼的网站www.infish.cn上问鱼

或者在本页面留言。

[转]关于爱情、关于伴侣、关于承诺、关于人生、关于友情、关于微笑、关于生活、关于幸福

hylijianjun@163.com(孤鸿念天) — Wed,07 Apr 2010 22:20:03 +0800

关于爱情：

不要认为后面还有更好的，因为现在拥有的就是最好的。
不要认为还年轻可以晚些结婚，爱情是不等年龄的。
不要因为距离太远而放弃，爱情可以和你一起坐火车的。
不要因为对方不富裕而放弃，只要不是无能的人，勤劳可以让你们富裕的。
不要因为父母反对而放弃，你会发现因为这个原因而反放弃的爱情，将是你一生的悔恨。
其实对于爱情，越单纯越幸福。一生只谈一次恋爱是最好的，经历的太多了，会麻木；分离多了，会习惯；换恋人多了，会比较；到最后，你不会再相信爱情；
你会自暴自弃；你会行尸走肉；你会与你不爱的人结婚，就这样过一辈子。

关于爱情：

也许爱情是一部忧伤的童话，惟其遥远与真实。
放弃一个爱你的人并不痛苦，放弃一个你爱的人那才痛苦。
若是有缘时间空间都不是距离，若是无缘总是相聚也无法合意；凡事不必太在意，更不需去强求，就让一切随缘。
逃避不一定躲得过；
面对不一定最难过；
孤独不一定不快乐；
得到不一定长久；
失去不一定不再拥有。
爱是一种享受，即使痛苦也会觉得幸福；
爱是一种体会，即使心碎也会觉得甜蜜；
爱是一种经历，即使破碎也会觉得美丽；
不要因为寂寞而错爱，
不要因为错爱而寂寞一生。

关于伴侣：

伴侣不是结婚时发誓非你不娶或非你不嫁的那个人，而是发现你身上有许多缺点仍然选择你的那个人；
伴侣不是生活中你爱吃黄瓜ta也爱吃黄瓜的那个人，而是你吃蛋清ta吃蛋黄的那个人；
伴侣不是天黑了和你一起手挽手走进饭店的那个人，而是守在门口巴望你回来共进晚餐的那个人；
伴侣不是和你大谈爱情，把“我爱你”挂在嘴边的那个人，而是和你平淡的唠叨柴米油盐、锅碗瓢盆的那个人。
在幸福的婚姻中，伴侣已不是一个具体的人，而是你和ta在几十年的岁月中沉淀下来的：一份默契、一份温情、一份平淡、一份理解、一份宽容。
爱ta就要让ra开心，这就是伴侣........

关于承诺：

在古希腊传说中，情侣都将戒指套在对方的中指上，因为他们相信那儿有一根血管直通心脏。所以戒指的意思就是用心承诺！
但是人世间有多少爱能生死白头，又有多少的情可以天长地久？
所以你选择共度一生得未必是你最爱的，你最爱的未必能和你共度一生。
多少的有情人走不进彼此的今生，只能苦苦的相约于来世；而多少的男男女女走过爱情走进婚姻却不会再珍惜彼此的付出。
所以记得珍惜你爱的人，把每一个平淡的今天当成是彼此相依的最后一刻，好好握紧爱人的手，即使ta容颜已老，即使ta满面沧桑，那也是你记忆中永恒的温馨。
别忘了守住对ta的承诺，别忘了牵住ta的手，一生一世一辈子.....

关于人生：

人生如梦，岁月无情。蓦然回首，才发现人活着是一种心情。
穷也好，富也好，得也好，失也好。一切都是过眼云烟。想想，不管昨天、今天、明天，能豁然开朗就是美好的一天。
不管亲情、友情、爱情，能永远珍惜就是好心情。
记得有一个经典短信这样写着：
曾经拥有的不要忘记；
已经得到的更加珍惜；
属于自己的不要放弃；
已经失去的留作回忆；
想要得到的一定要努力；
累了把心靠岸；
选择了就不要后悔；
苦了才懂得满足；
痛了才享受生活；
伤了才明白坚强；
总有起风的清晨；
总有绚烂的黄昏；
总有流星的夜晚。
人生就像一张有去无回的单程车票，没有彩排，每一场都是现场直播。
把握好每次演出便是对人生最好的珍惜。
把握现在，畅享人生！

关于友情：

有一天，友情和爱情碰见。
爱情问友情：世上有我了，为什么还要有你的存在？
友情笑着说：爱情会让人们流泪，而友情的存在就是帮人们擦干眼泪！
朋友就是：偶尔会为你担心、向你关心、替你懆心、想你欢心、逗你开心、请你放心。
朋友之间，懂得关怀才是难得.....
伤心时不妨和我说；
痛苦时别忘了跟我讲；
有病时别忘了通知我；
困难时记得要请教我；
失望时要想起还有我；开心时更不要忘记我。

朋友的定义，就在于此.....我们是朋友，这就够了.......

关于微笑：

被人误解的时候能微微的一笑，这是一种素养；
受委屈的时候能坦然的一笑，这是一种大度；
吃亏的时候能开心的一笑，这是一种豁达；
处窘境的时候能自嘲的一笑，这是一种智慧；
无奈的时候能达观的一笑，这是一种境界；
危难的时候能泰然一笑，这是一种大气；
被轻蔑的时候能平静的一笑，这是一种自信；
失恋的时候能轻轻的一笑，这是一种洒脱。
不管是有什么事情，为了什么原因.....我们每天都要开心一笑...........

关于生活：

日出东海落西山，愁也一天，喜也一天；
遇事不钻牛角尖，人也舒坦，心也舒坦；
每天领取谋生钱，多也喜欢，少也喜欢；
少荤多素日三餐，粗也香甜，细也香甜；
新旧衣服不挑捡，好也御寒，赖也御寒；
常与知己聊聊天，古也谈谈，今也谈谈；
全家老少互慰勉，贫也相安，富也相安。

关于幸福：
相传幸福是个美丽的玻璃球，跌碎散落在世间的每个角落。
有的人捡到多些，有的人捡到少些。却没有人能拥有全部。
爱你所爱选你所选，珍惜现在所拥有的一切。
人活着就是一种心情，把握今天，设置明天，储存永远。
只要用心感受，幸福就会永远存在。
人总是对自己拥有的东西不珍惜，直到不再拥有时才会加倍怀念，而在得知自己快失去自己所拥有的东西而又无能为力时，就寻死觅活地不肯放手，歇斯底里往往发生在这个时候，而对于生命的执著确实是到死才放手！

我们的纪念

hylijianjun@163.com(孤鸿念天) — Sun,21 Mar 2010 10:13:25 +0800

我突然发现我很久没有说些什么了。空间荒废了近两个月，而fblogs已经超过了两个月。

入手Nokia 6730c，感觉一直蛮好。

四级很完美的过了。

上午刚刚结束的计算机考试的上机部分，于是又是一个逗号，等待十月份的完结。

25号前还要把参赛的网站做好，貌似报名表里还有一两千字的东西要我去写。

小金说有同学要做网站还要找我帮忙什么的。

开学两周，彩虹桥也该规划着步入正轨了，找个时间还得安排值班表。

好的，我总是显得很忙，然后事实上却又一事无成。

老五报了驾校，报了人力资源管理师。我退却了。算了，等下半年再说吧。

打住吧。实际上我也没什么事情要说。只是写点什么证明自己还在。

某人改了签名，我们的纪念。都不需要解释的。

零下四度。

hylijianjun@163.com(孤鸿念天) — Sun,10 Jan 2010 21:31:54 +0800

下雨天。火车开动前两分钟冲上火车。

下午四点半到家。

结束了的期末考。管理定量分析，不出意外的会挂。

开空间前瞄了眼天气预报，明天零下四度，后天零下六度。

Q上多了些认识不认识的人。只是冷清，一如既往。

构思着什么时候再清理一次。

晚上某人的QQ头像闪了起来。

直接后果是现在我在想着我到底忘记了多少人的存在。

回家的公交上，发现对这个城市，有的也只是依稀的一些说不上深刻的印象而已。

解放路拓宽了。从外面看过去，盐中还是老样子。一中自从换乘了公交路线，很久没看到了，

我忽然有些怀念那一年，安静地呆着，趴着睡觉或者奋笔疾书的复读生活了。尽管当时是多么的痛恨和厌恶。

而事实上，我怀念的也仅仅只是某段时光或者某段时光里的某些片段而已。又或者说，是站在当下，去羡慕着那段时光里的自己。

[转]一转身可能就是一世

hylijianjun@163.com(孤鸿念天) — Sun,03 Jan 2010 22:42:14 +0800

　　一转身可能就是一世　　有些事一直没机会做，等有机会了，却不想再做了。
　　
　　有些爱一直没机会爱，等有机会了，已经不爱了。
　　
　　有些人一直没机会见，等有机会见了，却又犹豫了，相见不如不见。
　　
　　有些话埋藏在心中好久，没机会说，等有机会说的时候，却说不出口了。
　　
　　有些话有很多机会说的，却想着以后再说，要说的时候，已经没机会了。
　　
　　有些人很多机会相见的，却总找借口推脱，想见的时候已经没机会了。
　　
　　有些爱给了你很多机会，却不在意没在乎，想重视的时候已经没机会爱了。
　　
　　有些事有很多机会做的，却一天一天推迟，想做的时候却发现没机会了。
　　
　　人生有时候，总是很讽刺。
　　
　　一转身可能就是一世。
　　
　　说好永远的，不知怎么就散了。最后自己想来想去竟然也搞不清当初是什么原因分开彼此的。然后，你忽然醒悟，感情原来是这么脆弱的。经得起风雨，却经不起平凡；风雨同船，天晴便各自散了。也许只是赌气，
　　
　　也许只是因为小小的事。幻想着和好的甜蜜，或重逢时的拥抱，那个时候会是边流泪边捶打对方，还傻笑着。
　　
　　该是多美的画面。
　　
　　没想到的是，一别竟是一辈子了。
　　
　　于是，各有各的生活，各自爱着别的人。曾经相爱，现在已互不相干。
　　
　　即使在同一个小小的城市，也不曾再相逢。某一天某一刻，走在同一条街，也看不见对方。先是感叹，后来是无奈。
　　
　　也许你很幸福，因为找到另一个适合自己的人。

【新年礼包-真情奉献】全能的foobar。漂亮的皮肤。方便的播放列表管理。完美的歌词功能。

hylijianjun@163.com(孤鸿念天) — Fri,01 Jan 2010 20:13:51 +0800

极限原帖地址：http://bbs.themex.net/showthread.php?t=16859360

引用内容

缘起：
其实千千静听最大的优势，无非是播放列表管理和歌词功能，使用确实方便，赢得了大批追随者。而foobar的可定制性也绝非虚名。然而，正是这个“可定制性”成为挡在众多美化爱好者面前的拦路虎。试问，面对一款播放器，普通的使用者哪个愿意抓着头皮研究参数？这是对软件使用体验的巨大摧残。同样，小笔者十分不愿意看见如此优秀的软件仅仅成为少数使用者的掌上明珠，好东西，齐分享。这便是小笔者制作这个foobar礼包的初衷。

引用和感谢：
对他人劳动成果的尊重，就是对自己的尊重。这个礼包的完成，需要感谢不少朋友。Mono皮肤原创者Fanco86；播放列表整合者Sparanoid。

介绍：
本foobar礼包版本为0.9.6.1，在这个版本中，小笔者整合入受众最广的中文版，毕竟英文版很多单词相对专业，将极大妨碍识别和影响使用体验。支持包括APE在内的多种音乐格式。所有的设置都经过细致的修正，最好的foobar原汁原味的展现。一切的一切，都是为了尽可能优质的使用体验。

皮肤：
大名鼎鼎的Mono皮肤，拥有众多的支持者，然而，由于中英文版本的差距，皮肤的众多按钮功能并不能完美实现，比如在中文版本下，连最基本的“上一首下一首播放暂停”按钮都无效，简直匪夷所思。因此，小笔者对皮肤参数进行了全面的修改，每一个按钮都有相对应的功能，看看小笔者精心制作的的超大海报呵呵。

播放列表：
这个播放列表功能已经极为完善，可以使用右键方便的管理你的播放列表，便捷程度不下千千静听。这一点对使用体验是重要的提升。

歌词功能：
Foobar的歌词功能真难以称得上"平易近人"，设置繁琐，远离大众。请放心，这个繁琐的过程小笔者已经帮大家全部完成了。安心享受吧，完美的歌词显示和搜索。

配套字体：
因为设置文件全部采用华文黑体，所以，下载之后，务必安装字体Valentio，放心，这只是小笔者改名的华文黑体，原汁原味，漂亮滴很~

下面是我本机的截图。效果还好。因为没有安装GDI之类的字体渲染软件，所以在字体显示方面，达不到原作的效果（我的机子是XP，或许在win 7和vista中好一点）

新年快乐

hylijianjun@163.com(孤鸿念天) — Thu,31 Dec 2009 20:25:45 +0800

2009年的最后一天。突然间不想去写什么总结什么反思什么展望了。
归根到底，日子，也便这样了。
家里的温度比之学校，低了几度。手脚有些冰凉。也习惯了。
两个月没有回家。元旦选择了回家。2号回学校。准备5号开始的又一轮考试。
2009年。太多可以述说以及不可不值言说的事情。压得有些累。
寒假。然后大三下学期。再然后，大四。再再然后，毕业。
那些曾经以为遥远的词汇，现在却觉得触手可及。
跟某五商量好，明年一起考人力资源管理师，应该是这个证书的名字吧，希望我没记错。
说是要去碰碰运气的公务员考试，也可以趁早做准备了，尽管某五早已经开始研究。
这一年，不愿与任何人扯上关系，尽管事实上依旧如过去甚至犹有过之。很多人来过，然后离去，消失。
只是我宁愿说，这一年是我自己一个人在自说自话。
明天元旦。2010年。日历还没有准备。
不紧不慢的时间。
我依旧这么啰嗦，问题的关键是我自己也不知道自己要说些什么。
新年快乐。

关于“浮梦呓语”网站源码的一些说明

hylijianjun@163.com(孤鸿念天) — Sat,26 Dec 2009 21:44:51 +0800

已经一年半没有碰这个网站的源码了。08年6月份发布了最终版，原本准备就此放手的。
一直陆陆续续有人加Q或者邮件问我一些代码的事情。
而自己也觉得还是有必要去改一下。
在有音乐版后，音乐的页面觉得有些鸡肋，所以索性换上友情链接的页面。
目前只支持首页更换背景，其他页面待续吧。
页面左侧的信息，在后台“我的资料”里可以设置。
网站的基本信息，都支持在后台的系统设置里面设置。
版权信息大家看着改吧。如果需要，在友情链接留下我的链接就可以，其他的都可以去掉。
管理地址：你的域名/admin
用户密码都是admin

网站预览：http://me.fblogs.cn

有什么使用中的问题可以回复留言，我尽量解决。

分流下载地址
站长下载：http://down.cnzz.cn/Info/53356.aspx
asp300：http://www.asp300.com/View/10/29946.html
洪越源代码：http://www.softhy.net/soft/10414.htm

ASP滚动图片新闻

hylijianjun@163.com(孤鸿念天) — Thu,24 Dec 2009 00:21:38 +0800

折腾了好长一段时间，不想碰这个，但是有需要，不得不拿出来重新研究了下。。。

下面是源码，非完整版，需要的可以点击附件下载。

复制内容到剪贴板程序代码

style="Z-INDEX: 1; BACKGROUND: #ffffff; LEFT: 0px; OVERFLOW: hidden; WIDTH: 685px; HEIGHT: 190px">

   <%
      set rs=server.createobject("adodb.recordset")
      rs.source="Select top 6 * FROM Ok3w_Article where IsPic=1 and IsPlay=1 orDER BY ID DESC"
      rs.Open rs.source,conn,1,1
      do while not rs.eof
     %>

<%
        rs.movenext
        loop
      %>

" target="_blank" title="<%=rs("title")%>">
onMouseOver=javascript:clearInterval(nos);
onMouseOut="javascript:RunMar('left','sl');" src="<%=rs("picfile")%>" width="200" height="145">

" target="_blank">

<%=left(rs("title"),11)%>

     <%  rs.close
        set rs=nothing
    %>

转载一些简单的话语

hylijianjun@163.com(孤鸿念天) — Thu,17 Dec 2009 21:54:16 +0800

⒈ 要习惯短信发不完的生活。
⒉ 等待，本身就是一个错误。
⒊ 看的开一点，伤的就会少一点。
⒋ 许多事情，总是在经历以后才会懂得，一如感情：错过了，遗憾了，才知道其实生活并不需要这么多无谓的执著。
5.  秋天，残忍的季节，成熟不成熟的都要一同收割。一切都会在秋冬交替的刹那间随风而逝，唯有那一泓鲜亮山溪般的记忆永远在我心中哗哗流动...
6. 珍惜手边的幸福，不要等到失去以后才悔不当初，也许，你的一生也就只有那么一个人会真正用心在你身上。
7. 人生就像一列车，车上总有形形色色的人穿梭往来。你也可能会在车上遇到很多你以为有缘分的人，但是车也会有停下来的时候，总会有人从人生这列车上上下下，当你下去的时候你挥挥手，一转身你能记住的只有回家的路。
8. 有的人你看了一辈子，却忽视了一辈子。有的人你看了一眼，却影响到你的一生。有的人热情的为你而快乐，却被你冷落。有的人让你拥有短暂的开心，却得到你思绪的连锁。有的人一厢情愿了N年，却被你拒绝了N年。
9. 不要欠朋友太多东西，因为你可能永远都没有机会还他。
10.曾经青涩的感受，曾经单纯的表达，
　  曾经真诚的体会，曾经无法割舍的留恋……
　   正在经历的幸福，正在憧憬的美好，
　   正在成长的兴奋与惶恐……走过的年轻，
　   渐渐地长大，在你我共同的记忆里，
　   有那些在校园中传唱着的动听的歌。
11.一个人过了二十岁，就不会动不动就许下承诺，也不会再动不动就为了理想放弃这、放弃那，每个人应该懂得“带你去看世界”那只是一句话，也要学会，有时在生活面前你所谓的尊严一文不值。
12.如果你懂事了，就不会再相信童话般的誓言，如果相信，那就一个，一个你知道不可能实现的童话。
13.不要指望对方为你付出一切，你觉得你的重量真的或者应该比父母、朋友更重要？如果说你很重要，那只是比其中一个或几个重要，但是也许在必要时他（她）会为你付出生命！
14.不要太看重梦想，吃饱饭才是一切的前提；不要太看重现实，他（她）肯陪着你，给你肩膀，已经是足够了。
15.爱情不是生活的一切，20岁了，应该知道那只是生活中的一部分。
16.每当你无聊的时候，总是会给你短信的那个人，才是关心你的人。不要因为习惯就觉得那是应该的。你应该知道没有事又没有企图，还会给你电话的人不多了，如果聊很久的话你应该懂得为什么。
17.每个人都会累，没人能为你承担所有伤悲，人总有一段时间要学会自己长大。
18.人可以冷漠，不可以冷血。比如你在街上看见一个乞丐，你可以不给他钱，因为你冷漠，不要说他可能是骗子，这不是你不帮他的理由；你如果看也不看一眼扔给他几毛钱，那是冷血。
19.爱情是两个人的，如果你只是口头说的多爱多爱，但是当他要求你为他做顿饭的时候，你还反问一句“为什么是女的做饭？”，那你觉得你配说爱他吗？你是否想过当他父母说你是大小姐，不同意你们时，他为你顶撞父母时的压力。
20.你可以不相信爱情，但是不可以不相信爱。
21.要学会说“你的眼泪，与我无关”。
22.在TA感情不属于你一个人的时候，记得对TA说“要么我是1，要么我是1/N，我的人生没有几分之一”。
23.如果手机里的老朋友好么越来越少，不要觉得孤单，那是必然的。
24.一句“不解释”，足以抵过千言万语。
25.眼泪只流在你的脸上，所以只需要你一个人尝。
26.勇敢不是用胆量来衡量的。
27.“人最大的敌人是自己”，那是高人没有对手时说的话，你要做的是怎么从别人手上抢饭碗。
28.付出没有得到回报那很正常，就像食堂里吃饭，给的钱一样，别人碗里的肉比你多一样的道理。
29.除了流行音乐外，起码有一首不出名的歌曲是让你心弦为之一颤，也是你经常听的。
30.如果你没有去过人才市场，那有空你应该去看看。
31.有机会一个人去旅行一下，记得关掉手机。

我原以为

hylijianjun@163.com(孤鸿念天) — Sun,29 Nov 2009 00:38:03 +0800

2009年11月29日。零点之后。

徐誉滕《我原以为》。我一向懒得想标题。很凑巧的播放到这首歌。

我一如既往地不喜欢冬天。以致于什么都不想去做。

刚暖和了两天。刚刚感慨了下这才叫秋天。

今天，准确的说是零点前的昨天，下雨了，降温了。

下午一点从床上爬起来吃老五煮好的饭。

下午五点去易初买了调料买了只鸡。回来做鸡汤。很好。久违的感觉。

晚上冲着热水澡的时候，想着，其实那些所谓的过去，真的没什么意义了。

忘记与否。没那么重要的。

400条包月短信还剩300多。手机昨天夜里摔下床。再次重创。

缺乏美术细胞。一个网站。总是搭配不好颜色。很苦闷的熬着夜慢慢调试。

终于还是忍受不了搜狗，换了QQ拼音。

零点二十分。栾大从网吧到达宿舍。客观记录下。

就像我跟糖宝说的。我觉得我挺装的。还好，我没否认过。

构思着什么时候回家。

大学三年半，保持着每个月最少回家一次的记录。

是的。大三一个学期都快结束了。

老五晚上说，大三下学期考试的科目只有三门。

可是在此之前的前提是，这学期得先考完这么多门。

会计学，管理定量分析。貌似会悲剧。

流水账一样的生活。完全宅在了宿舍。自从重新买了电饭锅之后更加变本加厉。

除了上课，大概就不会出宿舍了吧。

刚看完《秦时明月》第一部。准备第二部。高月。画的很好。推荐下。

青鸟飞鱼《此生不会》。回头看不曾走远。依依目光此生不换。

MV 《哭了》

hylijianjun@163.com(孤鸿念天) — Wed,25 Nov 2009 20:22:31 +0800

在寂寞地铁看到的MV，简单人工作室拍的。