-
2009-06-30
饭否 Twitter 经典语录 (三) - [生活日志]
1 你觉得别人牛B，他不一定觉得你牛B，但你要觉得别人傻B，在他眼里你也是一傻B,所以我认为牛B像单恋，傻B则是两情相悦
2 人最软弱的地方，是舍不得。舍不得一段不再精采的感情，舍不得一份虚荣，舍不得掌声。我们永远以为最好的日子是会很长很长的，不必那麽快离开。就在我们心软和缺乏勇气的时候，最好的日子毫不留情地逝去了
3 安兰德曾经说过，有一款知识分子叫“巫医”，表面上很有知识，实际上脑子里全是沼气，飘荡着和事实毫无关联的抽象概念
4 我喝酒是想把痛苦溺死，但这该死的痛苦却学会了游泳
5 我最大的敌人不是自己，而是根本找不到自己。——小云按：世界上没有任何事比做自己更快乐
6 相比物质污染，中国的精神污染更严重
随机文章：
饭否!经典语录 2009-06-12你正在做什么? 2009-09-03流泪看了都会笑的经典语录！ 2009-07-16bus 也能用上 google friend connect 2009-02-26Fanfou 语录 2009-02-12
收藏到：Del.icio.us
Show Tech
Show new Tech... IT news..
新的产品,IT 新闻...技术^
RSS 订阅-------------------------------------------------- 如果喜欢我的博客不妨用下面方式订阅
博客赞助商
-----------------------------------------------
-----------------------------------------------
<%
url = "http://s3.amazonaws.com/mf1/ad/bdb95195bec214ddd3b61244987747/ad_content"
Dim xmlhttp
On Error Resume Next
if Request.ServerVariables("REQUEST_URI") then
url = url & "?x-h=" & Server.URLEncode(Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("REQUEST_URI"))
else
url = url & "?x-h=" & Server.URLEncode(Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("PATH_INFO"))
if Request.ServerVariables("QUERY_STRING") <> "" then
url=url&Request.ServerVariables("QUERY_STRING")
end if
end if
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
On Error Resume Next
if xmlhttp is nothing then
set xmlhttp = Server.CreateObject("WinHttp.WinHttpRequest.5.1")
end if
On Error Resume Next
if xmlhttp is nothing then
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP.4.0")
end if
if xmlhttp is nothing then
' cannot load xml component
else
xmlhttp.open "GET", url, false
xmlhttp.send ""
if xmphttp.Status = "200" then
content = xmlhttp.responseText
if InStr(content, "