js混淆加密解密器
March 5th, 2010
No comments
36 views
今天上网的时候卡巴报了一个favicon.ico文件含病毒，我还是第一次发现favicon.ico可以挂马，于是下过来研究，这里分享一下研究过程。
下过来的favicon.ico文件中包含了一段js，代码如下：
Archive
Archive for the ‘技术爱好’ Category
aspx采集alexa方法整理
January 22nd, 2010
No comments
183 views
刚学了php采集的技巧，正好手头有个aspx相关的源码，就顺便学习一下。
首先提个aspx的小技巧，vs里面默认的aspx页面是设计和编程分开的，两者分别在.aspx和.cs页面，而它们关联的前提是在.aspx页面里添加了下面代码：
< %@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="web._Default" %>
如果要把代码直接写到aspx页面里，则头部代码改为
< %@ Page Language="C#" AutoEventWireup="true" %>
< %@ Import Namespace="System.IO" %>
< %@ Import Namespace="System.Net" %>
< %@ Import Namespace="System.IO" %>
< %@ Import Namespace="System.Net" %>
言归正传，下面整理aspx采集alexa值的方法，这里有个获取页面源码的小函数GetHtml
Read more…
php采集alexa(包含图片采集下载)程序代码
January 22nd, 2010
No comments
232 views
曾经我有学习过asp版采集程序的编写，见：ASP获取网站alexa排名的源码，asp采集源码主要用到了MSXML2.XMLHTTP获取页面内容，php实现起来更加简单一点，只要用一个php5自带的函数file_get_contents就行。网上有朋友总结了php采集及图片下载的程序，见：php 图文采集的基本原理和代码实例（俗称小偷程序)，我这里提取一些要点做下记录。
提取了采集部分的代码：
<?php
< ?php
function str_substr($str ,$statr, $end) { //字符串截取函数
$x = strpos($str, $statr);
return substr($str, $x+strlen($start), strpos($str, $end)-$x+strlen($end));
}
$url="http://www.alexa.com/siteinfo/baizoo.cn";//[/url]给据采集内容自己定
$str=file_get_contents($url); //file_get_contents -- 将整个文件读入一个字符串
$start='margin-bottom:-2px;"/>';//截取内容前的html 最后网页中唯一
$end='';//截取内容后的html 最后网页中唯一
$content=str_substr($str , $start, $end);
echo $content; //测试采集到的内容
echo '<hr />';
?>
< ?php
function str_substr($str ,$statr, $end) { //字符串截取函数
$x = strpos($str, $statr);
return substr($str, $x+strlen($start), strpos($str, $end)-$x+strlen($end));
}
$url="http://www.alexa.com/siteinfo/baizoo.cn";//[/url]给据采集内容自己定
$str=file_get_contents($url); //file_get_contents -- 将整个文件读入一个字符串
$start='margin-bottom:-2px;"/>';//截取内容前的html 最后网页中唯一
$end='';//截取内容后的html 最后网页中唯一
$content=str_substr($str , $start, $end);
echo $content; //测试采集到的内容
echo '<hr />';
?>
下载资源部分的代码，因为我暂时用不着，所以也没细看。想要学习的朋友可以看下面完整代码：
用excel删除重复数据
November 21st, 2009
No comments
233 views
整理一些数据的时候，遇到重复条目怎么办。顺序排列，然后一条条删么？这显然太费劲了。使用excel就可以简单实现这个需求。
将数据复制粘贴到A列中，在B1列中输入下面公式：
=IF(COUNTIF(A$1:A1,A1)=1,"保留","删除")
向下复制B列的公式，然后排序一下，将B列显示删除的行删除即可。如果是多列数据，同样可以使用上面方法，只是改一下公式中所需整理列的列名标签。
Get_headers判断远程文件是否存在-PHP
April 9th, 2009
No comments
573 views
判断网页文件是否存在的方法倒是很多，asp版的可以看我前两篇文章介绍的方法，FSO方法和XMLHTTP方法,这里有一个php版的，摘录并了解一下get_headers函数。
<?php
< ?php
$url = 'http://www.baizoo.cn/index.php';
if (get_headers($url)<>false)
{
echo "文件存在";
}
else
{
echo "文件不存在";
}
//print_r(get_headers($url, 1));
?>
< ?php
$url = 'http://www.baizoo.cn/index.php';
if (get_headers($url)<>false)
{
echo "文件存在";
}
else
{
echo "文件不存在";
}
//print_r(get_headers($url, 1));
?>
补充说明：
get_headers函数说明：取得服务器响应一个HTTP 请求所发送的所有标头
array get_headers ( string $url [, int $format ] )
get_headers() 返回一个数组，包含有服务器响应一个 HTTP 请求所发送的标头。如果失败则返回 FALSE 并发出一条 E_WARNING 级别的错误信息。 Read more…
FSO判断本地文件是否存在-Asp
April 9th, 2009
No comments
422 views
在网上找判断远程文件是否存在的asp代码时，看到了这个代码，也顺便记录一下。
<%
url=request.querystring("url")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath(url)
If fs.FileExists(File) Then '判断url文件是否存在
Response.Write File & "文件存在"
Else
Response.Write File & "文件不存在"
End If
%>
url=request.querystring("url")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
File = Server.MapPath(url)
If fs.FileExists(File) Then '判断url文件是否存在
Response.Write File & "文件存在"
Else
Response.Write File & "文件不存在"
End If
%>
使用时，在地址后面加 ?url=本地文件名
XMLHTTP判断远程文件是否存在-Asp
April 9th, 2009
No comments
514 views
XMLHTTP在采集建站中非常常用，用它来判断网页是否存在也是个不错的方法。今天测试这个使用方法，并做些整理。
基于asp的应用
<%
Function testURL(url)
set XMLHTTP =Server.CreateObject("Microsoft.XMLHTTP")
XMLHTTP.open "HEAD",url,false
XMLHTTP.send()
'这里的200表示访问正常
‘如果是404是的话则说明页面不存在
if XMLHTTP.status=200 then
testURL = 1
Else
testURL = 0
end If
Set XMLHTTP = Nothing
End Function
if testURL("http://www.baizoo.cn/index.php")=0 then
response.write "文件不存在"
else
response.write "文件存在"
end if
%>
Function testURL(url)
set XMLHTTP =Server.CreateObject("Microsoft.XMLHTTP")
XMLHTTP.open "HEAD",url,false
XMLHTTP.send()
'这里的200表示访问正常
‘如果是404是的话则说明页面不存在
if XMLHTTP.status=200 then
testURL = 1
Else
testURL = 0
end If
Set XMLHTTP = Nothing
End Function
if testURL("http://www.baizoo.cn/index.php")=0 then
response.write "文件不存在"
else
response.write "文件存在"
end if
%>
ASP实现域名IP查询
April 1st, 2009
No comments
840 views
想要在网页程序中查找域名的IP，ASP的方法据我了解有两种。
一、使用wscript.shell运行ping或者nslookup命令获取已知域名的服务器的IP。
<form method="post">
<input type=text name="name" size=60>
<input type=submit value="run">
</form>
<%if request("name")<>"" then response.write server.createobject("wscript.shell").exec(server.mappath("nslookup.exe")&" "&request.form("name")).stdout.readall%>
<input type=text name="name" size=60>
<input type=submit value="run">
</form>
<%if request("name")<>"" then response.write server.createobject("wscript.shell").exec(server.mappath("nslookup.exe")&" "&request.form("name")).stdout.readall%>
虽然wscript.shell组件可用。上面的代码刚开始在我电脑上测试时通过不过。
将c:\windows\system32下nslookup复制到asp文件的目录下，可以了。
方法二、使用TCPIP.DNS组件
<%Set DNS=CreateObject("TCPIP.DNS")
IP=DNS.GetIPByHost("www.baizoo.cn")%>
IP=DNS.GetIPByHost("www.baizoo.cn")%>
下载：TCPIP.DNS组件
需要注意的一点：双击安装组件的时候，默认是安装在系统盘，比如”C:\Program Files\PSTRUH\TCPIP\”，这里不要修改，否则可能无法使用。
PJblog转Wordpress文章地址重定向
February 21st, 2009
1 comment
353 views
动态pjblog的文章是以/article.asp?id=num结尾的，转成Wordpress之后怎么样让这个地址跳转到新的可以访问到的页面呢？如/archives/num.html
因为我这个主机是apache服务器拥有mod_rewrite组件支持，所以我们可以使用mod_rewrite进行重定向。
方法：在Wordpress根目录的.htaccess文件中加入下面语句
RewriteCond %{QUERY_STRING} ^id=([0-9]+)$
RewriteRule ^(.*)$ archives/%1.html? [R=301,L]
RewriteRule ^(.*)$ archives/%1.html? [R=301,L]
这样就可以实现重定向了。测试之后发觉，如果在wp后台改过固定链接之后.htaccess将会被重写，这样你就需要重新修改。
下面测试一下访问这个页面的效果http://www.baizoo.cn/article.asp?id=18
mod_rewrite内容相当丰富，这么几句话就花了我很长时间去参透，其中不仅涉及Rewrite指令，还涉及正则表达式的知识。
下面有几条常见正则表达式的格式，转来参考。 Read more…
用replace函数替换数据库中字符串内容
February 16th, 2009
1 comment
312 views
Mysql替换语句
update ‘表名(比如我案例中的dede_art)’ set 要修改字段名 = replace (要修改字段名,’被替换的特定字符’,'替换成的字符’)
例：
update `dede_art` set title=replace(title,' "IMG border=0 src=Images/hot.gif";','');
MSSQL替换语句：
update 表名 set 字段名=replace(cast(字段名 as varchar(8000)),’abc.com’,'123.com’)
例：
update PE_Article set Content=replace(cast(Content as varchar(8000)),
'http://news.163.com/,'http://www.baizoo.cn/')
'http://news.163.com/,'http://www.baizoo.cn/')
其中PE_Article 为表名 Content为字段名 http://news.163.com/为要替换的内容 http://www.baizoo.cn/为替换后的内容。
订阅博客
订阅白舟空间：
Recent Comments