关于新闻小偷中FOR循环的问题

For i=657894 To 657899
  Dim Url,getpage url="http://home.soufun.com/news/2006-03-10/&i&.htm"
 getpage=getHTTPPage(url)
 response.write getpagea1=instr(getpage,"<html>")
a2=instr(getpage,"</title>")
title=mid(getpage,a1,a2-a1)sql="select title from newsdetails"
rs.open sql,Conn2,1,3rs.addnew
rs("title")=title
rs.update
i=i+1next
rs.close
conn2.close
这个是不是写对的 就是把所有的页面标题写到数据库

解决方案 »

  1.   

    没有错！看到这里，我好怀念vb啊.用vb写小偷tmd容易，用c#写麻烦死了，它太严格了。
      

  2.   

    可是要报错啊 
    错误类型：
    Microsoft VBScript 运行时错误 (0x800A0005)
    无效的过程调用或参数: 'InStr'
    /yyy.asp, 第 61 行
    这是怎么回事啊
      

  3.   

    要么就是这种
    错误类型：
    Microsoft VBScript 运行时错误 (0x800A0005)
    无效的过程调用或参数: 'mid'
    /yyy.asp, 第 62 行