<% if request.querystring("postback")="1" then getkeyword=trim(request("keyword")) gettype=request("type") End if Set rsclass= Server.CreateObject ("ADODB.RecordSet") sqlclass = "select * from Class order by ClassID desc" rsclass.open sqlclass,conn,1,1 Set rs=Server.CreateObject("Adodb.Recordset") Set rs1=Server.CreateObject("Adodb.Recordset") Set rs2=Server.CreateObject("Adodb.Recordset") Set rs3=Server.CreateObject("Adodb.Recordset") Set rs4=Server.CreateObject("Adodb.Recordset") Set rs5=Server.CreateObject("Adodb.Recordset") Set rs6=Server.CreateObject("Adodb.Recordset") SQL="Select top 6 * from news where type='文化快报' " SQL1="Select top 6 * from news where type='文化新闻' " SQL2="Select top 3 * from news where type='演出动态' " SQL3="Select top 3 * from news where type='旅游快报' " SQL4="Select top 6 * from news where type='文化年鉴' " SQL5="Select top 6 * from news where type='新书排行' " SQL6="Select top 6 * from news where type='滚动更新' " '-----------------------关键字查询 if getkeyword<>"" then sql=sql + " where title LIKE '%" & getkeyword & "%' " End if '-----------------------类别查询 if request.querystring("postback")="1" then if getkeyword<>"" and gettype<>"0" and gettype<>"" then sql=sql + " and type='" & gettype & "'" end if end if if request.querystring("postback")="1" then if getkeyword="" and gettype<>"0" and gettype<>"" then sql=sql + " where type='" & gettype & "'" end if end if SQL=SQL + " order by ID desc" rs.open SQL,conn,1,1 rs1.open SQL1,conn,1,1 rs2.open SQL2,conn,1,1 rs3.open SQL3,conn,1,1 rs4.open SQL4,conn,1,1 rs5.open SQL5,conn,1,1 rs6.open SQL6,conn,1,1 if rs.eof then errmeg1="没有任何新闻!" errmes1="1" else rs.MoveFirst '到第一条记录 rs.pagesize=MaxPerPage '定义每页记录数 'howmanyfields=rs.Fields.Count-1 CurrentPage= 1 If trim(Request("Page"))<>"" then CurrentPage= CLng(request("Page")) If CurrentPage> rs.PageCount then CurrentPage = rs.PageCount End If Else CurrentPage= 1 End If totalPut=rs.recordcount 'totalput=总记录数 if CurrentPage<>1 then if (currentPage-1)*MaxPerPage < totalPut then rs.move(currentPage-1)*MaxPerPage end if end if end if %> 厦门文化信息网欢迎您!

 

 

 
 

 

  全文检索:


 

 

文化单位

 

厦门市群众艺术馆简介

 

    

    厦门市群众艺术馆是政府设立的文化事业单位,位于市中心路段的新华路47号文化宫大厦10层至13层,现有面积5800平方米,编制25人。馆内设有音乐舞蹈部、美术摄影部、戏剧曲艺部、调研部、办公室。
    厦门市群众艺术馆是组织、指导群众文化艺术活动,特别是组织具有示范性的大型文艺活动,引导群众文化活动逐步走向高层次;辅导、培训文化馆、站业务干部及具有一定水平的业余文艺骨干;面向社会举办各艺术门类的培训班;开展群众性文艺创作活动,组织、辅导、选拔优秀作品参加市、省及国家举办的各项文艺活动和比赛;组织、开展群众文化理论研究,为有关部门的文化决策提供资料和信息;编辑出版文艺刊物和群众文化简讯。
    近几年,厦门市群众艺术馆承办了“厦门市群众文化艺术节”、“情系两岸”中华民间民俗艺术大汇展、“海峡月圆”中秋焰火晚会等多项大型文艺活动。本馆组织创作和辅导的舞蹈、戏剧、音乐、美术等艺术作品在全国“群星奖”、“蒲公英奖”等全国比赛中获得优秀的成绩。本馆组建的群星艺术团、民乐团、少儿艺术团,在我市群众文化活动和对外文化交流中发挥了积极的作用。
    厦门市群众艺术馆艺术培训中心拥有5000平方米的培训场所,有各种类型的综合排练厅、学术报告厅、培训室、教室、琴房、美术室、练功厅等,设备先进、环境优美。拥有一批高素质、高学历且富有教学经验的教师。本馆开办了适合青少年和中老年活动的舞蹈、美术、音乐、戏剧、表演、模特等各类培训班。
    地址:厦门市新华路47号文化宫大厦13层
    办公电话:2113958 2113968 2113978 2053155
    传 真:2112751 2112735

返回上一页

 

主办:厦门市文化局 承办:厦门图书馆 2003™ 版权所有© 保留所有权利
文娱服务 首页 文化事业 综艺大舞台 文化大观 闽台文化 鹭岛风情