小偷程序讲解
来源：
互联网
日期：2008-7-26
二、几个常用的函数
（一）InStr 函数
描述
返回某字符（string2）串在另一字符串（string1）中第一次出现的位置。
语法
InStr(string1, string2)
例如：
Dim SearchString, SearchChar
SearchString ="http://blue1000.com"' 要在其中搜索的字符串。
SearchChar = "blue1000" ' 搜索 "blue1000"。
MyBK = Instr(SearchString, SearchChar) ' 返回 8
'如果找不到则返回“0”，例如：
SearchChar = "BK"
MyBK = Instr(SearchString, SearchChar) ' 返回 0
（二）Mid 函数
描述
从字符串中返回指定数目的字符。
语法
Mid(string, start, over)
例如：
Dim MyBK
MyBK = Mid("我们的BK(blue1000.com)设计", 7, 12) '截取字符串"我们的BK(blue1000.com)设计"第7个字符以后的12个字符
'此时MyBK的值就变成了"blue1000.com"
（三）Replace 函数（这个我就不细说了，只举个例子）
Dim SearchString, SearchChar
SearchString ="我们的BK设计是一个网站建设资源网站" ' 要在其中搜索的字符串。
SearchString =Replace(SearchString,"BK设计","Blue1000.Com")
'此时SearchString的值就变成了"我们的Blue1000.Com是一个网站建设资源网站"
上面的内容只说了如何获取整个页面的html的代码和几个常用的函数，那么如何获取指定部分的代码呢？如何删除我不需要的内容呢？如何才能将外站的链接改成我的呢？又如何实现把原来的翻页做成我的呢？
详情请看下节，小偷程序精华所在：
更多的小偷程序讲解请到论坛查看: http://BBS.TC711.COM
【 双击滚屏 】 【 评论 】 【 收藏 】 【 打印 】 【 关闭 】
来源：
互联网
日期：2008-7-26
|
|
|
