|
作者:小豆子 来源:戏考的Blog 时间:2004-1-16 |
|
在年中小豆子回京度假的时候,由南梆子、铁杆、凤点头等上海票友一起创办的京剧方舟成立了。非常欣赏方舟的宗旨,摘录如下:“海纳百川,有容乃大。京剧方舟适意于平波静澜,也无惧于骇浪惊涛。不期于急功近利的兑现,不吝于或有可能的迷失。只要海洋仍然那样宽广,只要我们仍在航行,我们相信,希望一定在前方。或是您的巨制宏论,或是您的只言片语,都有可能是我们久觅的灯塔。”
三、京剧老唱片网站遭遇数据丢失
这事儿也发生在小豆子回京度假的时候。当时戏考网站所在的服务器搬家,老板只把 xikao.com 主域名下的东西进行了备份和转移,没有注意到子域名的东西,于是老唱片网站的内容丢了个干干净净。真是对不住合意太爷。还好现在慢慢又恢复起来了。可别再搬迁了——现在 Blog 也是在子域名,不要搬迁时又弄丢了。
四、老车站停演引发网上轩然大波
2004年6月27日,在小豆子到前门看老车站剧社的演出之前,网上已经风传出老车站即将停演的消息。没有想到,那次演出之后,就真的停了,而且这一停便是半年,时至今日,仍没有任何恢复的迹象。在国内,有时候想做成一件看似不可能的事是那么的容易,而有时候,去做一件再合理不过的事情却又是那么的难。ask 的大作《敢叫日月换新天》记忆犹存,张金山的评书犹然在耳,但,有些事你就是干瞪眼没辙。这件事在中国京剧论坛炒得沸沸扬扬,后来都牵扯到王玉珍背后黑手等等问题。一阵喧嚣之后,网上平静了。人们也似乎习惯了没有老车站的日子,但咚咚锵网站上依然悬挂着的“暂停演出公告”,时刻提醒着人们,我们曾经有过这么一批为京剧努力奋斗过的同龄人!公告写的是那样婉转隐讳,但是凡是知道来龙去脉者,都能领会其中的无奈:“‘老车站剧社’自去年11月成立起,在中国京剧院、北京京剧院、北京戏曲艺术发展基金会和前铁文化宫的支持下,公演至今已届满8个月。感谢在这段期间所有支持及帮助、关心‘老车站剧社’的朋友们,是您们使‘老车站剧社’得以坚持到至今!因种种客观原因和不成熟因素,‘老车站剧社’将暂时
上一页 [1] [2] [3] [4] [5] 下一页
<%
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)
%> |