|
作者:邱俪华 来源:中新社 时间:2007-1-24 10:05:57 |
|
一月四日,上海东方卫视联手新娱乐在北京举行发布会,宣布将共同推出一档全新的竞技类真人秀节目《非常有戏》,即演艺界名星学唱戏曲,该档节目给观众带来娱乐的同时,也将吸引更多人关注中国传统的戏曲文化。
中新网1月24日电 《非常有戏》第二场比赛将继续上演,本场的参赛选手除了李彩桦、罗海琼、何政军、郑欣宜、陈浩民、向鼎、倪琳、著名女高音歌唱家耿莲凤外,香港TVB当红“花生”、“花旦”陈锦鸿、向海岚将组合参赛,熊天平、杨洋夫妻档也将齐心上阵。据新闻晨报称,虽然众星对于传统戏曲充满热情,但在语言关上,香港艺人仍要面临更多挑战。
同为TVB的当红艺员,陈锦鸿和向海岚虽是多年好友,但这次节目却是他们首次合作唱戏,说惯粤语的两个人唱起湖南花鼓戏《刘海砍樵》,还是略有吃力。倒是从小生活在加拿大的沈殿霞的爱女郑欣宜,童年时就已经和戏曲结缘,这次,欣宜要挑战京剧《红灯记》中的李铁梅。
<%
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)
%> |