[转帖]通过Vlisp下载网络资源的4个函数
从晓东CAD里传过来的，好像明经里还没有！如果有重复，请帮删除吧！函数1~2下载时会弹出下载对话框.
函数3~4下载是不弹出下载对话框.在下认为这种无声无息的下载方式存在一定的危险,因为这可能会给病毒传播提供一种不知不觉的途径,所以本贴设置了一定的访问权限.
函数1-ShellDownload
;;Usage: (ShellDownload "http://carnet-de-cablage.chez-alice.fr/Lisp/Rbloc.zip")
(DEFUN ShellDownload (url / shell)
(SETQ shell (VLAX-CREATE-OBJECT "Shell.Application"))
(VLAX-INVOKE shell 'OPEN url)
(VLAX-RELEASE-OBJECT shell)
)
函数2-IeDownload
;;Usage: (ShellDownload "http://carnet-de-cablage.chez-alice.fr/Lisp/Rbloc.zip")
(DEFUN IeDownload (url / ie)
(SETQ ie (VLAX-CREATE-OBJECT "InternetExplorer.Application"))
(VLAX-INVOKE ie 'navigate url)
(VLAX-RELEASE-OBJECT ie)
)
由于在晓东积分不够，无法看到第3、4个函数。
请高手补充一下，第3、4个函数。谢谢 mccad 发表于 2008-12-14 16:54
用MSXML2.XMLHTTP可读取网络的文件，可参照以下帖子：用VisualLISP程序查看明经社区的最新帖子:http://www. ...
明总链接失效可以从新发一下吗
函数3和4怎看不到？？ 我积分到了也看不到的？请问版主什么问题？ <p>看的人很多，没人顶呀？</p><p>自己顶一个</p> 不错，用Scripting.FileSystemObject也可以做到下载。 <p>回果可以隐藏的下载，那么就可以做到网络验证啦！</p><p>有谁可以告诉我隐藏下载的函数呢？</p><p></p><p><font size="2">函数3~4下载是不弹出下载对话框.在下认为这种无声无息的下载方式存在一定的危险,因为这可能会给病毒传播提供一种不知不觉的途径,所以本贴设置了一定的访问权限</font></p> 隐藏读取网络文件的函数很多，如果你没有装杀毒软件上网，每天都可以感染病毒的。 <p>mccad能不能告诉几个隐藏读取网络文件的函数？？？</p><p>杀毒软件我想大家都装了！如果是想用CAD来挂病毒，那何必这么累呢？</p><p>只是想多学个技术罢了！</p> <p>用MSXML2.XMLHTTP可读取网络的文件，可参照以下帖子：</p><p>用VisualLISP程序查看明经社区的最新帖子:<br/><a href="http://www.mjtd.com/bbs/dispbbs.asp?BoardID=3&replyID=41704&id=56789&skin=0">http://www.mjtd.com/bbs/dispbbs.asp?BoardID=3&replyID=41704&id=56789&skin=0</a></p> 正在学习 函数3和4怎看不到？？ 学习学习~~~