welcome to birdnn's blog

1 | 2 | 3 | 4 | >

预览模式: 普通 | 列表

插画手稿	1 \| 0 \| 66
插画线稿	1 \| 0 \| 86
bird's角色设计	2 \| 0 \| 116
插画线稿	2 \| 0 \| 233
Ice cream	1 \| 0 \| 232
涂鸦视频(动态)	0 \| 0 \| 195
Ballance	3 \| 0 \| 276
Leave 03-heart is empty	3 \| 0 \| 321
涂鸦字体设计 2	2 \| 0 \| 391
Leave 02-flowers have withered	1 \| 0 \| 233
Illustrations(2)	3 \| 0 \| 227
Illustrations(1)	0 \| 0 \| 180
未完稿《许愿》	6 \| 0 \| 349
油画作品《噬》	1 \| 0 \| 374
My style	0 \| 0 \| 401
盘点09油画作品	3 \| 0 \| 450
涂鸦字体设计	1 \| 0 \| 753
graffiti-Adobe(老图)	0 \| 0 \| 602
Birds'story--Hawaii	1 \| 0 \| 555
Memory	2 \| 0 \| 552

1 | 2 | 3 | 4 | >

Open music Close music
音乐播放器

00:00|00:00

<%'This is mis99 Change. http://Yesls.cn %>

建站时间: 2008-02-03

<% 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) %>