| “河北梆子网上演唱会”要网络天下梆子戏迷 |
|
|
|
作者:中国秦腔网 来源:中国秦腔网 时间:2004-3-30 |
|
中国秦腔网河北消息:作为河北省河北梆子剧院2004年的工作规划之一,旨在宣传专业演员、扩大河北梆子影响、培养河北梆子戏迷的“河北梆子网上演唱会”将于近期举行。
此次活动由河北省河北梆子剧院主办,利用河北梆子语音聊天室――戏友聊吧,定期举办河北梆子网上演唱交流会,每期有专业演员参与演出,或特邀著名艺术家做客聊天室,集演唱、切磋、点评、普及为一体,与网上戏迷互动交流, 剧院将不定期邀请权威专家或有关人士作客聊天室,与戏迷朋友就感兴趣的话题共同探讨。第一期演唱会将于4月中旬举办,参演者为河北梆子青年优秀演员吴桂云。欢迎朋友们届时光临我们共同的网上家园――戏友聊吧!
网上河北梆子演唱会组织机构及成员
主办:河北省河北梆子剧院
承办:河北省河北梆子剧院网站
制作人:李建锁(河北省河北梆子剧院院长)
策划、监制:王新生(河北省河北梆子剧院副院长)
统筹:孙凤章(河北省河北梆子剧院网站站长)
主持:孙凤章或特邀嘉宾主持
演出地点:河北梆子语音聊天室――戏友聊吧(可容纳90人)
演出时间:04年4月――12月,每月一期,每期参演人数1至2人。12月底举办新年网上联欢会。
参演人员:河北省河北梆子剧院艺术家及青年优秀演员。
受众:特邀专家、专业演员、网上戏迷及热心听众。
<%
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)
%> |
|
文章录入:中国秦腔网 责任编辑:长安小生 |
|
【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
|
|
相 临 文 章: |
上一篇文章: 越剧秦腔 南北握手 ——昨天陕沪戏剧家座谈会侧记… 下一篇文章: 喜看评剧新苗茁壮成长 |
|
相 关 文 章: |
|
河北梆子看家戏之一《蝴蝶杯》久演不衰百看不厌 河北梆子经典戏《钟馗》首赴澳门演出 千余河北梆子唱段唱响互联网 地方剧种找到新载体… 孙凤章,一个把河北梆子“搬”上网的人 河北梆子《长剑歌》将与观众见面 燕赵之声唱响五月 河北梆子剧院奉献传统名剧… 河北梆子《忒拜城》美洲戏剧节赢喝彩
|
| 论坛精华 (全国会员最多的戏曲论坛[中国戏曲论坛]) |
|
|