革天明 发表于 2015-11-16 15:25:29

cx-ReleaseObject是否等同于vlax-release-object？

革天明 发表于 2015-11-16 15:52:00

当下载的文件较大时（1M左右），下载不下来，结果就是1KB的文件

eechenchun 发表于 2021-3-16 18:39:59

我也想要啊可是没有币

MXS 发表于 2022-8-11 23:30:08

本帖最后由 MXS 于 2022-8-11 23:52 编辑

想删除此回复

MXS 发表于 2022-8-11 23:51:43

想请问为何下载下来的dwg或者lsp都不能使用

nyistjz 发表于 2022-8-17 15:33:14

你这个不对啊，少了最后面的两个函数，无法运行的！

;;;(cx-DownLoad "http://www.youyicad.com/download/YouYi_Lib.VLX" "c:\\testggggggg.vlx")
(defun cx-DownLoad(Url_String SaveFile_String / adobd xmlx)
        (Setq XmlX (vlax-get-or-create-object "Msxml2.XMLHTTP"))
        (vlax-invoke-method XmlX 'open "Get" Url_String 0)
        (vlax-invoke-method XmlX 'Send)
        (setq AdoBd(vlax-get-or-create-object "ADODB.Stream"))
        (vlax-put-property AdoBd 'Mode 3)
        (vlax-put-property AdoBd 'Type 1)
        (vlax-invoke AdoBd 'open)
        (vlax-invoke-method AdoBd 'Write (vlax-Get-property XmlX 'responseBody))
        (vlax-invoke-method AdoBd 'SaveToFile SaveFile_String 2)
        (cx-ReleaseObject XmlX)
        (cx-ReleaseObject AdoBd)
)

MXS 发表于 2022-9-7 23:25:11

nyistjz 发表于 2022-8-17 15:33
你这个不对啊，少了最后面的两个函数，无法运行的！

;;;(cx-DownLoad "http://www.youyicad.com/downloa ...

您好解决了吗

nyistjz 发表于 2022-9-8 08:58:19

MXS 发表于 2022-9-7 23:25
您好解决了吗

当然没有了，需要楼主提供，但他没有啊。发出来的附件，只能用来骗币了

Bdj 发表于 2022-9-8 13:34:30

是不是要测试附件程序可行性的话，还得自己要有个服务器

happyboy75 发表于 2022-9-9 08:20:15

vlax-release-object好像这个
页: 1 [2]
查看完整版本: Vlisp实现从网上下载文件功能.