1

我试图在mathematica 8 上制作网络爬虫。

  webcrawler[rooturl_, depth_] :=    Flatten[Rest[
     NestList[
      Union[Flatten[
         Thread[# -> 
             Import[#, "Hyperlinks", 
              "ServerAuthentication" -> False ]] & /@ 
          Last /@ #]] &, {"" -> rooturl}, depth]]];

它运行良好,唯一的问题是当有与用户和密码身份验证的 ia 链接时,会弹出一个框,我需要单击取消,有什么方法可以自动完成吗?

4

0 回答 0