我试图在mathematica 8 上制作网络爬虫。
webcrawler[rooturl_, depth_] := Flatten[Rest[
NestList[
Union[Flatten[
Thread[# ->
Import[#, "Hyperlinks",
"ServerAuthentication" -> False ]] & /@
Last /@ #]] &, {"" -> rooturl}, depth]]];
它运行良好,唯一的问题是当有与用户和密码身份验证的 ia 链接时,会弹出一个框,我需要单击取消,有什么方法可以自动完成吗?