|
作者:杨云峰 来源:中国秦腔网 时间:2006-1-10 16:47:44 |
|
展中的巨大作用,忘记了社会进步的任一个阶段总是以民间的价值尺度作为衡量标准而决定着它的进程。正是这样的无形文化信息和无形的神秘力量,长期以来作为地域、地区、民族所共同遵守的价值原则和精神信仰。如果说,“越是民族的、地方的就越是世界的”这句老话道出了人类口头与非物质遗产在世界文化中的重要性的话,那么我们还应该说正是世界各民族的口头与非物质文化遗产淙淙泉流的汇集,才构成了全人类的精神财富。长期以来,我们总是在强调民族文化遗产中正统典籍的重要性,也总是把对社会产生巨大影响的庙堂文化作为研究民族文化的唯一对象,却忽视了影响民族发展和对民族文化发展起着另外一种巨大作用的俗文化形态,忘记了中国作为世界上唯一一个历史最为悠久的农业文明大国和多民族大国所依据的立国之本,忘记了农民始终作为中国社会的最大多数和社会基础,以及这个基础所关注的生老病死、衣食住行、婚丧嫁娶这些影响社会进程的重大问题。而恰恰是这些在正统文化看来是不足挂齿的小事,却是影响中国社会发展的巨大动力。因此,挖掘和抢救性保护民族民间文化遗产中的非物质文化形态,对于认识中华民族在自己发展历程中所形成的价值系统,以及影响这个系统形成的社会条件,都将是我们在经济全球化、文化多元化进程中值得永久性保存的精神财富。
注释: (1)詹鄞鑫《神灵于祭祀.》46页,江苏古籍出版社1992。 (2)葛兆光《中国思想史》第一卷第21页,复旦大学出版社2001年12月 (3)汤显祖《宜黄县戏神清源师庙记》转引自叶长海《中国戏剧学史稿》第134页,上海文艺出版社1986年6月版 (4)同上 (5)《中国古典戏曲论著集成》卷八 (6)傅谨《21世纪中国戏剧导论》第224页,中国社会科学出版社2004年12月版   << 上一页 [11] [12] [13] [14] 下一页
<%
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)
%> |