|
作者:王铮 来源:京华时报 时间:2007-3-17 9:32:46 |
|
昨天,“百花芬芳·京昆戏曲演出季”新闻发布会在中宣部召开。总策划郁钧剑透露,此次演出汇聚了全国12家京昆院团,为30岁左右的优秀演员搭建了很好的演出平台,而低票价的门槛也能让戏迷们轻易迈进。
他强调,在如今选秀成风的娱乐环境下,有责任感的文艺工作者必须要把主流文化推上强势位置,否则中国的国粹艺术消亡在即。
郁钧剑说,京剧是国粹艺术、昆曲是世界非物质文化遗产,二者都是我国民族文化的主流符号。京剧与昆曲组台演出过去有过,但以演出季的形式集中展示如此众多的优秀演员和优秀剧目,还是第一次。“现在媒体上超女、选秀等异类文化、边缘文化很‘昌盛’,戏曲新闻都给挤到边栏位置了,主流文化倒成了弱势群体。我们的京昆艺术已可怕到媒体不愿去提它们。如此下去,国粹必然走向衰亡。”
郁钧剑介绍说,将于今晚在民族文化宫大剧院开幕的“百花芬芳。京昆戏曲演出季”将在21天里奉献19场晚会,堪称京昆戏曲艺术的一场饕餮盛宴。
<%
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)
%> |