|
吗?管制当然是必要的,问题在于如何管制及管制的范围和方法。如果管制的结果是影剧中充满假大空而没有给人真善美的精神享受和升华,如果色情和暴力血腥加无聊充满影剧,如果管制带来垄断并资本化,我们到哪里去寻找真正的电影艺术以及非功利的影视大师?
重造大师赖以生长的“生态环境”
记者:您从素质及影响素质的文化和制度两个维度谈到了中国何以出不了大师。可否将文化和制度视为大师赖以生存的“生态环境”?如果我们不改变这样一种不利于大师发育生长的“生态环境”,出大师仍将是一厢情愿,是吗?
袁绪程:不错,必须改变大师赖以生长的“生态环境”,必须重建国人的精神家园。唯其如此,才可能长江后浪推前浪,江山代有才人出。如何营造良好的环境?
一是要从源头上狠抓教育改革。“十年树木,百年树人”。培养一个“贵族”需要三代以上,造就大师级的杰出人才也需要一代人的努力。要从幼儿教育抓起,让我们的下一代能够自由发展自己的个性、天性以及特长,并拥有一个健全的人格和追求真理、追求善良、追求美好的灵魂,而不是势利的“小大人”。中学和大学教育要培养自由的科学精神和人文主义情怀,要培养荣誉感和自我实现的使命感,这就需要从根本上改造我们落后的教育制度及办学理念,从官本位和商本位回归学本位,使我们的学校重新成为自由的学习和传播知识的殿堂以及净化心灵的圣地。
二是善待杰出人物,营造崇尚伟人的精神氛围。一些人崇尚权力,崇尚金钱,崇尚一切能生利之物,当然也包括崇尚能生钱的知识——如科技和财技以及功利性的励志知识,但内心并不崇尚创造这些的人,更不崇尚陶冶人们心灵的人文科学及其先哲们。他们拥有小聪明,却缺乏大智慧。殊不知,即使是像爱因斯坦、居里夫人这样伟大的自然科学家,以及像贝多芬、梵高这样伟大的音乐家、艺术家都具有高尚的品格和人文主义情怀。国人特有的势利眼光和对历史人物评价的反复无常不易产生伟人崇拜,如果曾经有过崇拜的话,那就是对毛泽东这样的政治领袖人物的崇拜。这是一个不太善待或不崇敬杰出人物的国度。这也是中国不易出杰出人物的一个原因吧。法国为什么大师辈出?这与法国人的伟人情结和使徒般的热情是分不开的。法国建有先贤祠,那里安放的主要是杰出的哲人、伟人及少量政治家,充满着“伟人可进,贤人可 上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [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
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)
%> |