博客_熊玉华_百度空间

文章列表

2012-05-23 13:16

<%
if trim(request.form("url"))<>"" then
dim VBody:VBody=GetResStr(trim(request.form("url")))
dim Res:Res=VBody
dim code:code=GetCode(VBody,"charset= {0,}([^ ]+) {0,}""")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>抓取页面</title>

阅读全文>>

类别：Asp|评论(0) |浏览(11)

asp 采集代码获取源文件代码

2012-05-19 12:00

<%
Function GetPage(url)
Set Http=Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
With Http
  .Open "GET", url, False
  .Send()
  GetPage=BytesToBstr(.ResponseBody)
End With
Set Http=Nothing
End Function

Function BytesToBstr(body)
dim objstream
set objstream = Server.CreateObject("adodb.stream")

阅读全文>>

类别：Asp|评论(0) |浏览(11)

HTTP Status Code 代码网页状态

2012-05-05 16:14

所谓HTTP Status Code即是HTTP状态码，是用以表示网页服务器HTTP响应状态的3位数字代码。它由 RFC 2616 规范定义的，并得到RFC 2518、RFC 2817、RFC 2295、RFC 2774、RFC 4918等规范扩展。所有状态码的第一个数字代表了响应的五种状态之一。

大家都知道，我们当浏览一些浏览过的网页的时候，打不开的时候经常有403，404，502等等http错误。http错误是针对游览器无法连接到服务器而增加出来的错误提示，引导并告诉浏览者该页是哪里出了问题。这些http错误其实就是HTTP状态码。

阅读全文>>

类别：Asp|评论(0) |浏览(11)

Request 对象错误 'ASP 0104 : 80004005' 是什么回事?

2012-05-01 10:37

原因: IIS6.0 禁止上传超过 200kB 的文件
因此你需要修改 IIS 的默认设置
然后在服务里关闭iis admin service服务
找到windows\system32\inesrv\下的metabase.xml,
打开，找到ASPMaxRequestEntityAllowed
把他修改为需要的值，默认为204800，
即200K 然后重启iis admin service服务
把它修改为51200000（50M）
如果你是自己的服务器，你可以进行以上操作，
如果你是买的空间，请与空间商联系

阅读全文>>

类别：服务器|评论(0) |浏览(8)

批量复制文件及子目录文件到另外一个文件夹

2012-04-26 16:23

xcopy E:\copy1\wwwroot E:\copy2\wwwroot /e /r /c /y
xcopy E:\copy1\wwwroot E:\copy3\wwwroot /e /r /c /y
xcopy E:\copy1\wwwroot E:\copy4\wwwroot /e /r /c /y

保存为.cmd即可

阅读全文>>

类别：服务器|评论(0) |浏览(14)

传台湾艺人大S无法怀孕

2012-04-24 19:10

大S嫁入豪门后就一直努力生子，可以一年过多去了，小S都生了三个大S还是一点反映也没有，眼看大S也是奔40岁的人了。最近好友爆料，医生已经给大S判了死刑，可能永远无法怀孕了。婆婆抱孙心切逼儿汪小菲离婚。

台湾艺人徐熙媛（绰号“大S” ）17岁以一首《十分钟的恋爱》出道，后与小S主持八大“娱乐百分百”。2001年，演出《流星花园》

阅读全文>>

类别：新闻|评论(0) |浏览(17)

半夜强拆兰州一免费公厕，导致管理员险些被活埋

2012-04-23 17:46

　据南昌九四医院转载报道21日，位于兰州市城关区平凉路的兰州市邮电家属院附近的一座冲水式免费公共厕所，于凌晨4时许被人开挖掘机拆除，公厕管理人员在阻止拆除过程中被打伤。

　　呼叫求救被扔出门

　　“当时我在熟睡中，忽然听见外面有声响。凌晨4时左右，响声越来越大，一面墙‘轰’的倒了。”21日9时许，该公厕管理员蔺月红回述说，“刚开始是房子在震动，后来我才发现有人在拆公厕。”紧接着，蔺月红呼叫并求救，却被几个人架起来推至门外。

阅读全文>>

类别：新闻|评论(0) |浏览(20)

让ASP程序自动运行的代码

2012-04-22 15:50

关键词:让ASP程序自动运行的代码
这要用到计划任务，首先假定你这个程序的地址为“http://1.0.0.8/a.asp”，那么你编辑如下内容：

复制代码代码如下:

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
ie.navigate("http://1.0.0.8/a.asp")
ie.visible=1
Set IE = Nothing
存储成一个vbs后缀的文件，比如test.vbs。
在windows的管理工具——服务中启动“计划任务”服务。

阅读全文>>

类别：Asp|评论(0) |浏览(10)

phpcms v9模板制作过程中一些常用代码集合（个人收藏）函数调用、数据SQL调用等

2012-04-19 15:45

phpcms v9模板制作常用代码集合（个人收藏）

1.截取调用标题长度

{str_cut($r[title],36,'')}

2.格式化时间

调用格式化时间 2011-05-06 11:22:33

{date('Y-m-d H:i:s',$r[inputtime])}

3.多栏目调用&多推荐位调用

调用需求：文章范围为59 60 61三个栏目，并且推送到了27 和28两个推荐位；
从第

阅读全文>>

类别：Phpcms V9|评论(0) |浏览(19)

利用JS获取IE客户端IP及MAC的实现

2012-04-19 10:43

利用JS获取IE客户端IP及MAC的实现

<HTML><HEAD><TITLE>WMI Scripting HTML</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<SCRIPT language=JScript event="OnCompleted(hResult,pErrorObject, pAsyncContext)" for=foo>
document.forms[0].txtMACAddr.value=unescape(MACAddr);
document.forms[0].txtIPAddr.value=unescape(IPAddr);

阅读全文>>

类别：Javascript|评论(0) |浏览(11)