|
| 首页 | 热站 | 电影 | 论文 | 文学 | 影视 | 音乐 | 聊天 | 交友 | 游戏 | 笑话 | 明星 | 美女 | 论坛 | 博客 | 查询 | 收藏 |
| 杂志 | 时尚 | 旅游 | 汽车 | 下载 | 图书 | 军人 | flash | 星座 | 搜索 | 购物 | 数码 | 两性 | 地图 | 银行 | 宠物 | 大学 |
| 新闻 | 软件 | BT | 证券 | 汽车 | 手机 | 人才 | 旅游 | 教育 | Flash | 医疗 | 电脑 | 艺术 | 论文 | 军事 | 足球 | 天气 |
|
| 推荐栏: 免费论文大全 交友频道 汽车 星座 时尚 旅游 奥运北京2008 PPLive 实用查询 艺术 理财 股票 NBA 免费电影 |
|
| |
<%'以下为显示链接，10天内曾经有访问过的
'SQLstr="Select * from [51dh].dbo.search where friendshow=1 and friend=1 and datediff(d,showndate,getdate())<15 order by articleid"
SQLstr="Select * from [51dh].dbo.search where friendshow=1 and friend=1 and datediff(d,showndate,getdate())<60 order by articleid"
Set Rs=conn.Execute(SQLstr)
dim ii
ii=1
do while not Rs.eof
if ii mod 9=0 then%>
" target="_blank"><%if not IsNull(Rs("urllogo")) and (instr(lcase(Rs("urllogo")),".gif")>0 or instr(lcase(Rs("urllogo")),".jpg")>0 )then%> |