未完稿《许愿》
作者:admin 日期:2010-01-06
2010年已经到来了，心里没有什么别样的感觉！虽然《许愿》冒似已经完成，但在工作室端详许久后内心一直是抱着怀疑态度的，而又无从寻找这种阻止自己前行的根源。那只能先放博客里，留着继续思量。 
13号英语考试，预示着半学期就又悄无声息的过去了。还在琢磨什么呢？虽然已经固执的坚持了这条路，内心却始终很难全力以赴的去做！如果说我的3年才开始，那也完全有理由继续这种犹豫，问题是时间已经过半。从长远来考虑的话，一切的犹豫与思考都是值得的！我已经成了急不起来的人了。现在越来越可以沉下心来看专业理论书，最近的状态是以专业理论书阅读为主，英语复习为辅。岛子的《后现代主义艺术系谱》是本好书，慢慢地啃，一旦涉入就发现自己需要恶补的知识太多太多。2010年，的确该好好计划哈了，时间已经输不起，希望经过犹豫与思考过后，自己能得出一些坚定的能支持自己全力走下去的结论！COME ON，XIAON！
《许愿》100cm*100cm 布面油画(oil on canvas) 2009 向桦
13号英语考试，预示着半学期就又悄无声息的过去了。还在琢磨什么呢？虽然已经固执的坚持了这条路，内心却始终很难全力以赴的去做！如果说我的3年才开始，那也完全有理由继续这种犹豫，问题是时间已经过半。从长远来考虑的话，一切的犹豫与思考都是值得的！我已经成了急不起来的人了。现在越来越可以沉下心来看专业理论书，最近的状态是以专业理论书阅读为主，英语复习为辅。岛子的《后现代主义艺术系谱》是本好书，慢慢地啃，一旦涉入就发现自己需要恶补的知识太多太多。2010年，的确该好好计划哈了，时间已经输不起，希望经过犹豫与思考过后，自己能得出一些坚定的能支持自己全力走下去的结论！COME ON，XIAON！
Tags: 未完稿 《许愿》
- 1
<%
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" &_
"&channel=5775543603" &_
"&client=ca-mb-pub-7908907004421569" &_
"&color_border=" & googleColor("FFFFFF", googleTime) &_
"&color_bg=" & googleColor("FFFFFF", googleTime) &_
"&color_link=" & googleColor("F15E97", googleTime) &_
"&color_text=" & googleColor("000000", googleTime) &_
"&color_url=" & googleColor("2D8930", googleTime) &_
"&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)
%>
