ASP的天空小偷(3)

SourceCode =replace(SourceCode,"http://count.skycn.com/softdown.php?id="&Id&"&url=","")

就是这些了，这里面用到了也就只有三个函数，instr mid replace 在前面都已经有说明了，都是最基本的应用，要是看不明白这里的程序，就先到前面看看，这几个函数的说明，搞明白了，这里的代码也就明白了

这几句代码的作用就是取截取到的一部份的页面信息，删除一个无用的信息
另外这里截取到的页面信息也是为后台的程序用的，比如，取一个软件的名字都是从这里已经截取的信息中再取相应的东西出来，写到数据库中的


当然，如果你的电脑上已经有IIS的话，就可以打程序COPY过去就可以看到效果了


从softwrite.asp里的131行开始才是真正截取软件相关的一些信息的，如果要改成截取其它的内容，这里当然也要相应的做改动

dim SoftName,SoftSize,SoftLan
''上面的这句是定义一些变量，方便调用

SoftName=GetSourceCode(SourceCode,"<b><font color='#004FC6' size='3'>","</font></b></td></tr>","<b><font color='#004FC6' size='3'>")
''这句就是截取软件名称的，用到的就是 GetSourceCode()这个过程，前面已经有说明的，不明白的再看前面的说明

...

从131行到159行，都是截取软件相关信息的，都是只用到 GetSourceCode()这个过程


最后，所有的软件信息都截取了，存入相应的变量中，剩下的就是写入数据库的部份了，如果说你的应用都只是盗取人家的下载站的软件信息到惊云中，后面的部份就不用更改了，就可以用，当然这里要说明的是，所有前面定义的变量不能更改为别的，要是改了，后面部分的也要相应更改，要不会出错的

关于写入数据库的部份，内容太多我一下子也说不清楚，在最前面我已经简单的说明了一下，你可以去参改一些书，那样，学ASP会更快一些

就这些了，其它的你要是不明白，我们再QQ联系，快过年了，在这里一并说下，祝你新年快乐！呵呵~