乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 566|回复: 1

[编程交流] GetRemoteFile方法问题

[复制链接]

20

主题

65

帖子

63

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
84
发表于 2022-10-5 18:30:10 | 显示全部楼层 |阅读模式
GetRemoteFile方法问题-无法从长URL下载照片
正如标题所说,我正在尝试从不同的URL下载照片。但当我注意到URL太长时,就会出现问题,然后无法下载(可能是当其长度超过256?)。谁能帮我解决这个问题?是否有一些功能可以帮助我从大URL下载照片?我尝试使用RenderMan的GetFileURL,我将其附加在下面。
  1. (defun GetFileURL  (url path / utilObj tempPath newPath)
  2. ;; © RenderMan 2011, CADTutor.net
  3. ;; Example: (GETFILEURL "https://damassets.autodesk.net/content/dam/estore/customer-service/AutoCAD_Shortcuts_11x8.5_MECH-REV.pdf" (getvar 'dwgprefix))
  4. (vl-load-com)
  5. (setq utilObj (vla-get-utility (vla-get-activedocument (vlax-get-acad-object))))
  6. (if (= :vlax-true (vla-isurl utilObj url))
  7.    (if (vl-catch-all-error-p
  8.          (vl-catch-all-apply
  9.            'vla-GetRemoteFile
  10.            (list utilObj url 'tempPath :vlax-true))
  11.         )
  12.      (prompt "\n  <!>  Error Downloading File From URL  <!> ")
  13.      (progn
  14.        (if (findfile
  15.              (setq newPath
  16.                     (strcat path
  17.                             (vl-filename-base url)
  18.                             (vl-filename-extension url))))
  19.          (vl-file-rename
  20.            newPath
  21.            (setq voidPath
  22.                   (strcat
  23.                     (vl-filename-directory newPath)
  24.                     "\\void_"
  25.                     (vl-filename-base newPath)
  26.                     "_"
  27.                     (menucmd
  28.                       "M=$(edtime,$(getvar,date),YYYY-MO-DD-HH-MM-SS)")
  29.                     (vl-filename-extension newPath)))))
  30.        (vl-file-copy tempPath newPath)
  31.        (vl-file-delete tempPath))
  32.   )
  33.    (prompt "\n  <!>  Invalid URL  <!> "))
  34. (vl-catch-all-apply 'vlax-release-object (list utilObj))
  35. (princ)
  36. )


回复

使用道具 举报

48

主题

657

帖子

33

银币

限制会员

铜币
-1
发表于 2022-10-5 19:33:13 | 显示全部楼层
右键单击照片,“另存为”到您的计算机。。。。
或者让照片所有者通过电子邮件发送给您?
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-4 01:45 , Processed in 0.346232 second(s), 56 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表