|
![[图]](http://www.qinqiang.com/00jz/080515yisushe.jpg)
[图]西安易俗社优秀中青年演员个人专场演出
西安秦腔剧院易俗社优秀中青年演员个人专场节目单：
演出时间：
2008年5月15日-18日
2008年5月22日-31日
（2008年5月19日-21日 全国哀悼日，停演三天）
演出地点：西安易俗社剧场
票价：50元/张
演出安排：
一、惠敏莉秦腔折子戏个人专场
演出时间：
2008年5月15日19：45
2008年5月16日19：45
演出剧目：
秦腔《新断桥》
秦腔《烤火》
秦腔《斩窦娥》
二、温军海秦腔折子戏个人专场
演出时间：
2008年5月17日19：45
2008年5月18日19：45
演出剧目：
秦腔《黑虎坐台》
秦腔《打金枝·绑子》
秦腔《黑叮本》
三、韩利霞秦腔折子戏个人专场
演出时间：
2008年5月22日19：45
2008年5月23日19：45
演出剧目：
秦腔《方芸娘》
秦腔《白鹿原·怒斥》
秦腔《清风亭·盼子》
四、张小亮秦腔折子戏个人专场
演出时间：
2008年5月24日19：45
2008年5月25日19：45
演出剧目：
秦腔《斩单童》
秦腔《草坡面理》
秦腔《包公赔情》
五、李淑芳秦腔折子戏个人专场
演出时间：
2008年5月26日19：45
2008年5月27日19：45
演出剧目：
秦腔《数罗汉》
秦腔《夺锦楼·柳公馆》
秦腔《游西湖·藏舟》
六、晁红勃秦腔折子戏个人专场
演出时间：
2008年5月28日19：45
2008年5月29日19：45
演出剧目：
秦腔《斩颜良》
秦腔《回荆州·芦花荡》
秦腔《火焰驹·传信》
七、王宏义秦腔折子戏个人专场
演出时间：
2008年5月30日19：45
2008年5月31日19：45
演出剧目：
秦腔《打镇台》
秦腔《二启箭》
秦腔《铡美案·杀庙》
<%
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)
%> |
用户登录 
新用户注册 
