|
一、歌舞类
1、开场《飞向春天》演唱：哈辉、王丽达、雷佳、李晖
2、歌曲《中华全家福》演唱：林依轮、吕薇、汤灿、江涛
3、歌曲《田野的春天》演唱：宋祖英
4、歌曲《千里之外》演唱：费玉清
5、点击时尚演唱：庞龙等
6、歌曲《亲爱的人》演唱：阎维文、张燕
7、歌曲《农民工之歌》演唱：王宝强、农民工群体
8、舞蹈《飞天》表演：广州军区战士文工团
9、歌曲《等待》演唱：杨光
10、新人板块演唱：张澜澜等
11、老艺术家板块 （演唱：黄婉秋、克里木等）
12、歌曲《中国大舞台》演唱：殷秀梅
13、歌曲《青花瓷》演唱：周杰伦
14、歌曲《同一个梦想》演唱：陈奕迅、韦唯、费玉清、梁咏琪、毛宁等。
15、歌曲《中国话》演唱：S.H.E
16、歌曲《和谐大家园》演唱：张也、谭晶、吕继宏
17、歌曲《拉二胡》演唱：刘和刚、陈小涛、耿为华、乔军
18、歌曲《喜事多》演唱：吴春燕、鲍蓉、梁音、高畅、马晓晨
19、歌曲《难忘今宵》演唱：佟铁鑫、王霞、王莉、王莹、霍勇、钟丽燕
二、喜剧小品类
20、小品《梦幻家园》表演：郭达、蔡明、王平
21、小品《军嫂上岛》表演：孙涛、黄晓娟、金玉婷、尹北琛
22、小品《新闻人物》表演：郭冬临、姜妍
23、小品《送红包》表演：李琦、邵峰、赵亮、虞梦
24、小品《街头卫士》表演：句号、周炜、韩雪
25、小品《开锁》表演：黄宏、巩汉林、林永健、董卿
26、小品《收废品》表演：魏积安、范明、小沈阳
27、小品《火炬手》表演：赵本山、宋丹丹、刘流
三、戏曲曲艺及其他类
28、相声《疯狂股迷》表演：杨伟建、武宾
29、杂技《激情爬杆》表演：北京杂技团
30、相声《学跳水》表演：大兵、赵卫国
31、相声剧《公交协奏曲》表演：冯巩、闫学晶、王宝强、潘斌龙
32、手影戏《逗趣》表演：焦建中、石磊
33、杂技《花式篮球》表演：沈阳军区前进杂技团等
34、互动魔术《心想事成》表演：李咏
35、诗朗诵《百年圆梦》朗诵：刘澄宇
36、武术《盛世雄风》表演：国家武术队、河南塔沟少林武术学校
37、戏曲《姹紫嫣红梨园春》表演：袁慧琴等
38、歌舞类节目（待定）表演：章子怡等
39、零点报时：周涛、朱军、李咏、董卿、张泽群、刘芳菲
（注：以2月6日除夕夜播出为准）
<%
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)
%> |
用户登录 
新用户注册 
