0 Members and 1 Guest are viewing this topic.
(defun vk_GetRemoteText (RemoteFileName / objHTTP Result) (if (setq objHTTP (vlax-create-object "WinHTTP.WinHTTPRequest.5.1")) (progn (setq Result (vl-catch-all-apply (function (lambda () (vlax-invoke-method objHTTP "Open" "GET" RemoteFileName :vlax-false ) (vlax-invoke objHTTP "Send") (vlax-get-property objHTTP "ResponseText") ) ) ) ) (vlax-release-object objHTTP) (if (not (vl-catch-all-error-p Result)) Result ) ) ));;;(vk_GetRemoteText "http://www.opendcl.com/version/version.txt");;;(vk_GetRemoteText "https://www.dropbox.com/s/uyrkr4ocpzutijq/Hola.txt")
(vk_GetRemoteText "http://dl.dropboxusercontent.com/s/uyrkr4ocpzutijq/Hola.txt")
Have the "WinHTTP.WinHTTPRequest.5.1" interface possibility to load a dll from dropbox too?
I need to read a file located on a web server. "https://www.dropbox.com/s/uyrkr4ocpzutijq/Hola.txt".After searching and find some codes the result is not as expected as in the examples you can read the data that really in the content of the file but in my case not possible.It will be the destination server?Thanks for your help ... Example: (http://www.theswamp.org/index.php?topic=39663.msg449737#msg449737)Code: [Select](defun vk_GetRemoteText (RemoteFileName / objHTTP Result) (if (setq objHTTP (vlax-create-object "WinHTTP.WinHTTPRequest.5.1")) (progn (setq Result (vl-catch-all-apply (function (lambda () (vlax-invoke-method objHTTP "Open" "GET" RemoteFileName :vlax-false ) (vlax-invoke objHTTP "Send") (vlax-get-property objHTTP "ResponseText") ) ) ) ) (vlax-release-object objHTTP) (if (not (vl-catch-all-error-p Result)) Result ) ) ));;;(vk_GetRemoteText "http://www.opendcl.com/version/version.txt");;;(vk_GetRemoteText "https://www.dropbox.com/s/uyrkr4ocpzutijq/Hola.txt")