|
作者：肖洁 来源：兰州新闻网 时间：2007-3-10 3:55:21 |
|
2005年9月兰州被中国戏剧家协会命名为“中国秦腔发展基地”，经过一年多的考证，从政府到专家、学者包括秦腔爱好者，都想为该称号填充内容，使其更加丰满、厚重。本报在去年也发表过“专家呼吁建立秦腔博物馆”的系列报道。如果说充实“秦腔发展基地”需要“四梁八柱”，那么秦腔博物馆的建设将成为一根坚实的顶梁柱而先立起来。
3月8日，兰州市文化出版局召开了关于秦腔博物馆建设的第一次专家座谈会，这标志着该项目已提上议事日程，筹备工作正式启动。我省戏剧界专家王正强、李智、范克峻、雷志华、王勉、严森林、阎仲雄等在座谈会上各抒己见，为秦腔博物馆建设把脉支招。
文化流失让人心痛
兰州秦腔文化是甘肃戏剧的主流文化，现存历代秦腔剧本3000多本，其中很多都是绝版，为秦腔的发展奠定了坚实的基础。就古戏楼而言，在唐代，我省就出现了专门用于演唱秦腔的古戏楼，据史书记载有百余座之多。与此同时陕西秦腔受到甘肃秦腔的重大影响，许多甘肃著名的剧本都流传到了陕西，还有兰州独有的耿家脸谱。周正俗、三元宫、郗德育、耿忠义、靖正恭等，这些极具代表性的人物在兰州秦腔史上有很大的影响力，对兰州秦腔的发展做出了巨大的贡献，应该让世人了解。然而，随着老秦腔艺人的离世，后继秦腔人才的缺乏，不同程度的制约了兰州秦腔的持续发展，更让人困惑的是这些丰厚文化遗产的不断流失。对此，省剧协主席这样语重心长地说道：“文化流失让人心痛。”
“基地”需要资料佐证
专家一致认为，兰州被命名为“中国秦腔发展基地”后，兰州秦腔人应该做些什么？“基地”的称号应该用什么来佐证？当然，我们可以用足够的史料来诠释这一代表西北人文精神的文化符号，我们还要通过丰富的馆藏和利用现代化技术留住转瞬即失的舞台艺术，让人们看到秦腔近千年来的辉煌发展。在座谈会上，每位专家发言结束时，都会表态，愿意无条件的为秦腔博物馆建设出一份力，愿意将自己的藏品奉献给将建成的博物馆。听到这些的时候，让人感到震撼，他们愿意将自己的心血，甚至一生的心血奉献出来，不求回报，只有一个目的———将秦腔艺术发扬光大。
收集先从广度做起
对于将要建成的秦腔博物馆，它应该包括哪些内容？承载怎样的责任？王正强认为，博物馆的含义就是收藏、研究、陈列，就秦腔博物馆而言，其藏品的收集要有深度，这需要时间的积累，而面对大量被腐蚀、虫蛀的珍贵剧本；录下了甘肃演员演唱的传统、改编、现代本戏、折戏、唱段等长达10万分钟的录音带；一座座被拆除的古戏楼，尽快从眼前抓起，在历史的东西还未搜集的时候，先把眼皮底下的东西保护起来。省剧协副主席雷志华说：“秦腔博物馆的建成将起到记载历史，反映历史，启迪、教育后代的作用。在文化的形成和发展中，兰州有着秦腔这块特有的阵地和橱窗，将成为现代文化的一个亮点。”剧作家李智表示，历代秦腔班社、名角、场地、剧目在秦腔博物馆中应该得到集中展示，因为目前大部分资源分散在民间，民间也有很多人愿意拿出来展示。
意向选址尚有两处
秦腔博物馆建立的实质性工作已经启动。据市文化出版局局长王有伟介绍，目前，秦腔博物馆的意向选址有两处：其一，金天观内的雷坛院；其二，金城观仿古建筑群中的部分建筑。另外，秦腔博物馆的筹建小组和顾问小组将马上成立，并立即开展工作。至于经费问题，表示要下决心解决。总之，秦腔博物馆要尽快建立，以填补西北博物馆的空白，随着时间的推移，秦腔博物馆的价值将体现出来，这是长期效益。
<%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
If IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
End If
resArray = Split(screenRes, delimiter, 2)
If (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
End If
End Function
Function googleDcmguid()
Dim dcmguid
dcmguid = Request.ServerVariables("HTTP_X_DCMGUID")
If Not IsEmpty(dcmguid) Then
googleDcmguid = "&dcmguid=" & dcmguid
End If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=" &_
"&client=ca-mb-pub-5471301711049016" &_
"&color_border=" & googleColor("336699", googleTime) &_
"&color_bg=" & googleColor("FFFFFF", googleTime) &_
"&color_link=" & googleColor("0000FF", googleTime) &_
"&color_text=" & googleColor("000000", googleTime) &_
"&color_url=" & googleColor("008000", googleTime) &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes() &_
googleDcmguid()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%><%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
if IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
end If
resArray = Split(screenRes, delimiter, 2)
if (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
end If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
if StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=6495040935" &_
"&client=ca-mb-pub-9595218071455095" &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%> |
用户登录 
新用户注册 