" search=search&"" search=search&"" search=search&"按照标题搜索" search=search&"按照内容搜索" search=search&"" search=search&"" set rs=server.CreateObject("ADODB.RecordSet") set rs_info=server.CreateObject("ADODB.RecordSet") set rs_yl=server.CreateObject("ADODB.RecordSet") set rs_t=server.CreateObject("ADODB.RecordSet") function Title(content) if content<>"" then Title=content Title=replace(Title,"[加粗]","") Title=replace(Title,"[倾斜]","") Title=replace(Title,"[下划线]","") Title=replace(Title,"[删除线]","") if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" Title=replace(Title,"[红色]","") Title=replace(Title,"[蓝色]","") Title=replace(Title,"[绿色]","") Title=replace(Title,"[紫色]","") Title=replace(Title,"[酱色]","") Title=replace(Title,"[橙色]","") if instr(1,Title,"0 then Title=Title+"" Title=replace(Title,"[建议]","[建议]") Title=replace(Title,"[注意]","[注意]") Title=replace(Title,"[下载]","[下载]") Title=replace(Title,"[公告]","[公告]") Title=replace(Title,"[转载]","[转载]") Title=replace(Title,"[焦点]","[焦点]") Title=replace(Title,"[社会]","[社会]") Title=replace(Title,"[推荐]","[推荐]") Title=replace(Title,"[原创]","[原创]") end if End function function Site_Link(showType,showNum) dim link_i,link_ii link_i=0 link=0 if showType=1 then sql="select top "&showNum&" * from SiteLink where isLogo=1 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&vbcrlf link = link + 2 if link mod 6 =1 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close else sql="select top "&showNum&" * from SiteLink where isLogo=0 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&rs("mySiteName")&""& vbcrlf link_i = link_i + 1 if link_i mod 8 =0 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close end if end function strSite_Link_Text=Site_Link(0,8) strSite_Link_Logo=Site_Link(1,24) i=0 sql="select top 30 title,id,dj,date from info where date>Now()-7 order by hits desc" rs.open sql,conn,1,1 if rs.eof then top="还没有文章" else do while not rs.eof filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&""&"..." else titley=rs("Title")&"" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen_wz)&"" else titley=rs("Title") end if end if if rs("dj")=6 then Txtop=Txtop&"·"&Title(titley)&"
" else Txtop=Txtop&"·"&Title(titley)&"
" end if i=i+1 if i>=30 then exit do rs.movenext loop end if rs.close '今日导读开始 i=0 sql="select top 12 id,title,tid,date from info order by date desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有文章" else for i=1 to 12 if rs.eof then exit for rs_t.open "select * from infotype where id="&rs("tid"),conn,1,1 if not rs_t.EOF then TN=split(rs_t("tname"),"|") end if rs_t.close filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) datetime=year(rs("date"))&"_"&month(rs("date"))&"_"&day(rs("date"))'时间格式：年/月/日 datetime1=month(rs("date"))&"/"&day(rs("date"))'时间格式：月/日 '今日导读标题断行开始 if len(rs("Title"))>17 then titley=left(rs("Title"),17)&"..." else titley=rs("Title") end if '今日导读标题断行结束 infolist=infolist&""&lm&"·"&Title(titley)&"
" rs.movenext next end if rs.close '今日导读结束 rs2=conn.execute("select count(*) from info where year(date)&month(date)&day(date)=year(date())&month(date())&day(date())") shuinfo=rs2(0) Dim list_4(20) Dim list_5(20) Dim list_6(20) sql="select * from specialx where tj=1 and spics<>''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof kk=kk+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_4(kk)=""&SSY_name&"
"&rs("introduce")&"" list_5(kk)="" rs.MoveNext loop end if rs.close sql="select * from specialx where tj=1 and spics=''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof tt=tt+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_6(tt)=""&SSY_name&"" rs.MoveNext loop end if rs.close rs.open "select * from infotype ",conn,1,1 if not rs.eof then ts=rs("ts") TN=split(rs("tname"),"|") TI=split(rs("ts"), ",") for i = 0 to ubound(TN)-1 if i=ubound(TN)-2 and ubound(TN)>1 then TTY_id=TI(i) TTY_name=TN(i) end if all_type_top_id=TI(i) all_type_name=TN(i) thistype=thistype & "-> "&TN(i)&"" thistitle=thistitle & " - "&TN(i)&"" next end if rs.close i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then image="还没有图片文章" else do while not rs.eof if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&""&"..." else titley=rs("Title")&"" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen)&"" else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then image=image&"" else image=image&"" end if pic=rs("pic") pic=Replace(pic, "../../", "") image=image& "
"&titley&"" if i=6 then exit do rs.movenext loop end if rs.close '公告开始 sql="select top 1 id,newsname,addtime,newsnote from Announce order by addtime desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有公告" else do while not rs.eof Announce=Announce&""&rs("newsnote")&"["&rs("addtime")&"]
" rs.movenext loop end if rs.close '图文混排开始 i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then DefaultPic="还没有图片文章" else do while not rs.eof infoy=left(rs("info"),108)&"..." if instr(rs("Title"),"0 then if len(rs("Title"))>10 then titley=left(rs("Title"),toplen1)&""&"..." else titley=rs("Title")&"" end if else if len(rs("Title"))>1 then titley=left(rs("Title"),16)&"..." else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then DefaultPic=DefaultPic&"" else DefaultPic=DefaultPic&"" end if pic=rs("pic") pic=Replace(pic, "../", "") DefaultPic=DefaultPic&"
"&Titley&"
  "&infoy&"[详细报道]" if i>=1 then exit do rs.movenext loop end if rs.close '图文混排结束 list=list&"" rs.open "select * from infotype where tj=1 order by id",conn,1,1 if NOT rs.EOF then allshu=rs.recordcount Dim list_1(20) Dim list_2(20) Dim list_3(20) do while NOT rs.EOF ii=ii+1 list=list&""&split(rs("tname"),"|")(rs("tj")-1)&"|" list_1(ii)=""&split(rs("tname"),"|")(rs("tj")-1)&"" list_2(ii)="

" i=0 sqqq_yl="" sql_yl="select * from infotype where ts like '"&rs("ts")&"%'" rs_yl.open sql_yl,conn,1,1 if not rs_yl.eof then do while not rs_yl.eof sqqq_yl=sqqq_yl& " or tid="&rs_yl("id")&"" rs_yl.MoveNext loop end if rs_yl.close rs_info.open "select id,title,dj,date from info where tid="&rs("id")&""&sqqq_yl&" order by id desc",conn,1,1 if NOT rs_info.EOF then do while not rs_info.eof fileming=year(rs_info("date"))&month(rs_info("date"))&day(rs_info("date"))&hour(rs_info("date"))&minute(rs_info("date"))&second(rs_info("date")) if instr(rs_info("Title"),"0 then chalen1=chalen+20 if len(rs_info("Title"))>chalen1 then titlex=left(rs_info("Title"),chalen1)&""&"..." else titlex=rs_info("Title")&"" end if else if len(rs_info("Title"))>chalen then titlex=left(rs_info("Title"),chalen)&"..." else titlex=rs_info("Title") end if end if if rs_info("dj")=6 then list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" else list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" end if i=i+1 if i>=newshu then exit do rs_info.movenext loop end if rs_info.close rs.MoveNext loop end if rs.close set rs=nothing set rs_yl=nothing set rs_info=nothing conn.close set conn=nothing%>

报料、招商、投诉热线:020-83825987 在线订报  在线投稿 网站首页 | 活动视窗 | 时政要闻 | 金融财经 | 产经新闻 | 社会新闻 | 科技动态 | 教育文化 | 旅游休闲 | 饮食娱乐 | 粤港合作 泛珠新闻 | 广州 深圳 珠海 佛山 汕头 中山 东莞 江门 韶关 河源 梅州 惠州 汕尾 阳江 湛江 茂名 肇庆 清远 潮州 揭阳 云浮

您的位置：首页 > 综合新闻 > 其他类别 　 佛门泰斗开宗释义 名刹弘法莲花喜人 　 wwpprd.com 作者:wwpprd.com 来自:文汇报 点击:0 时间:2006-6-5   （本报珠三角新闻中心记者富义、刘宝珠电）深圳弘法寺地处深圳市东郊梧桐山麓。背靠陡峭叠翠的山崖，前临涟漪万顷的仙湖，依山傍水，气势雄伟，殿堂亭阁，鳞次栉比，琉璃飞檐，金碧辉煌，草木葱茏，风光旖旎。      深圳弘法寺始建于1985年，是伴随着深圳改革开放步伐崛起的寺庙，是佛门泰斗百岁老和尚本焕法师住锡的道场。   本焕老和尚其人     记者没来弘法寺之前，查阅了诸多有关本焕老和尚的文字资料，采访这位充满传奇人生泰山北斗级的百岁高僧心怀多重敬畏，内心不禁有些忐忑不安。始落座老和尚便亲切的问记者能否习惯吃寺里的素斋，慈爱的目光使记者紧绷的心态得到释放。面对记者的本焕老和尚，就是一位慈祥的长者，举手投足都洋溢着高僧的慈悲，当记者说明来意请老和尚为本栏目命名和题字时，老和尚欣然应允，并当场命名题字“和谐人生”，通篇字体稳健遒劲，字如其人。     本焕老和尚生于1907年，现年一百岁。一生经历坎坷曲折，七十余载行化南北，弘法利生，法流天下，其高尚的修为和人品被世人尊为佛门泰斗，他开示的“眼里要有大众的影子，耳里要有大众的声音，心里要有大众的功绩，身上要有大众的恩惠”以及“合理的经济生活，正义的政治生活，服务的社会生活，慈悲的道德生活”，等偈语对构建和谐人生具有极高的指导意义，他把“不为自己求安乐，但愿众生得离苦”的禅门宝训亲自书写成条幅，挂在方丈室墙壁上，作为自己修行的准则，度化众生的格言。     百岁的本老，思维敏捷，步履稳健，生活几乎全部自理，规律有序，每日在弘法寺谦恭接待十方善众，皆称自己是个“百岁小和尚”。佛菩萨的心肠，慈悲关爱的笑容，让记者难忘。   弘法寺──科学人文管理的道场     漫步在游人如织的弘法寺，登上高高的藏经楼，极目云天，遥望山下一池碧水，似璀璨明珠，整个寺庙殿宇生辉，慧灯光耀，气象万千。翩然而至接受记者采访的印顺法师，可谓“天庭饱满，地阁方圆”法相十分庄严。本焕老和尚崇高的佛门敬业精神，佛菩萨般的慈悲心肠，广博精深的佛学理念，促使他放弃尘世功名利禄毅然出家。他是本焕老和尚的衣钵弟子，身职弘法寺监院。他倡导的“以道风建设为中心，以慈善事业和佛教文化为两翼，构筑珠江三角乃至两岸四地面向世界的弘法利生平台”的建寺理念，尽得本焕老和尚的真传，得到了国家有关部门的高度认可。     谈到弘法寺的发展历程，印顺法师颇为感触的说：“深圳是个新兴的城市，也是一个充满活力的城市，年轻人的创业乐土，高速度的工作节奏，某种程度上人们无法顾及宗教活动，特别是佛教信徒在我国老年人所占比例较高，弘法寺如何融进这个极具现代化的环境，传统的寺庙弘法方式无疑受到挑战，古人云 “人能弘道，非道弘人”。古汉语中，“弘”是“大” 的意思，所以我们所要弘化“道”是“大道”，这个“大道”就是现在我们正在进行的宗教与社会主义社会相适应的佛教现代化的“大道”，也是当前党中央和中国政府所强调的社会和谐的弘大之道。”围绕着这个理念弘法寺在如下几个方面进行了改革。   一、打造国内外一流的寺庙旅游环境      一个完美的菩提道场不仅满足信徒瞻拜，同时也是大众心情放飞的愉悦天堂。弘法寺在国内寺庙首开先河，第一个把寺庙交给物业公司管理，得到了巨大成功，由于物业公司管理专业到位，深圳弘法寺的寺容寺貌整洁一新，几乎没有乱刻乱画痕迹，游客观光旅游井然有序，心旷神怡，优美的环境更利于和尚静修，各得其乐。国家宗教局对此给予了高度评价，称深圳弘法寺自然环境管理特别是卫生管理在国内独一无二。   二、打造寺庙和信众心灵互动的模范道场       深圳弘法寺除指导信徒诵经礼佛外，还和信众建立文化交流平台，将博大精深的禅文化理论与信众的事业结合起来，用禅学具有科学性的道理来为信众开示现实生活中的苦恼和问题，禅解事业、禅解人生、禅与现代化管理等专题讲座弘法寺已经举办过多期，特别是禅与现代化管理课题，在深圳这个高度商品化、资本化运转的现代都市引起了强烈共鸣，包括港澳的知名企业家都慕名前来弘法寺进行研讨，印顺法师向记者透露，在本老百年诞辰到来之际，弘法寺将有系列凝聚着本老参禅精华的图书出版，届时将是我国文化界、佛教界、工商界共襄的一届盛会。   三、以禅文化为主题把弘法寺建成佛教文化主题公园       弘法寺充分利用墙壁、长廊等空间，把佛教故事按时间排序，以图文并茂的形式绘制在上面，让游客在不经意间领略博大精深的佛家文化，在此同时，弘法寺还不定期的举办各类文化活动，如画展、艺术品展、即将成立的弘法书画院将是我国佛教界最专业、最规范的专业画院，很多知名学者业已加盟。   四、摒弃商业气息寺院与民同乐       本老一生都在弘化四方，慈悲济世广结善缘。游客来到深圳弘法寺感觉不到一丝商业气息，在弘法寺看不到追逐香客兜售香箔的小贩，更没有鼎沸的香火街，因为每个到弘法寺的香客都能免费得到三炷香，进入山门也不需要门票，这在国内外也是为数极少的。   五、建立长久慈善机构为社会造福       弘法寺秉承本焕老和尚“诸恶莫做，众善奉行”度人无量。多年来国家很多重大慈善救济活动都有弘法寺参加，多次得到中央的嘉奖和表彰，充分体现了弘法寺诸僧为国分忧的高风亮节。       夜暮时分，喧嚣一天的弘法寺已静谧无声，大雄宝殿响起“嘭嘭嘭”的击鼓声，随后阵阵朗朗诵经声忽高忽低、忽远忽近、忽轻忽重，缥缈而幽沉，缱绻又苍茫，恍世间如闻天籁之音，卧席而眠，窗外月光洗练，星辉晶亮，方丈楼外阵阵蛙鸣，山风吹袭大殿四角的挂铃发出一阵阵空灵的叮铛声，小沙弥“梆梆梆”的打板声似历史由远至近，僧寮的灯光渐渐隐去，弘法寺诗画般的安静。   深圳弘法寺，国家宗教政策落实结出的标志性成果。 深圳弘法寺，现代化手段管理寺庙成功的范例。 责任编辑：cnred 文章页数第[1]页  页面功能 【我来说两句】【字体：大 中 小】【打印】 【关闭】 相 关 连 接 ·还没有相关文章 网 友 评 论 ·还没有相关的评论！ 发 表 评 论 您的大名: （点击这里注册） 这里填写您的评论：） 友情提醒：评论请限制在100字以内，有长篇大论欢迎到论坛发表：） 　 综合新闻|广东新闻|专题新闻 >> 本类热点新闻 ·川剧在广东精彩“变脸”——访川剧 ·粤公安澄清单程证无代办 ·崛起的历史名城——广西百色市右江 ·不一般的情人，也有权握着——同一 ·全球化呼唤 中华文化复兴 ·港人失证件罗湖口岸可办理 ·「十一五」粤拟570亿投水利 ·工联会服务中心扩至京沪莞 ·粤媒体大幅报道魔警案 ·民建联吁改善深汕公路

合作媒体： 合作及广告联系电话: 020-83825987 文汇报简介 | 广告服务 | 读者联谊 | 在线订报 | 在线投稿 | 站内公告 | 设为首页 | 收藏本站 新闻中心地址：广州市沿江中路323号临江国际大厦15楼 电话：020-83825987  传真：020-83817466 网管信箱：webmaster@wwpprd.com  编辑信箱：editor@wwpprd.com 香港文汇报珠三角新闻网　版权所有©Copyright 2004 www.wwpprd.com 来访统计：  技术支持：中国红电子商务频道