首页 > 代码库 > Visual Lisp获得网络时间的方法
Visual Lisp获得网络时间的方法
(defun c:tt (/ ie-obj) (setq ie-obj (vlax-get-or-create-object "Msxml2.xmlhttp")) (vlax-invoke-method ie-obj ‘open "get" "https://www.hao123.com/" 0) (vlax-invoke-method ie-obj ‘setRequestHeader "If-Modified-Since" "q") (vlax-invoke-method ie-obj "Send") (if (= (vlax-get-property ie-obj "readyState" ) 4) (setq s (vlax-invoke-method ie-obj ‘getResponseHeader "Date")) (alert "读取网页失败!") ) (and s (print s)) (vlax-release-object ie-obj) (princ) )
Visual Lisp获得网络时间的方法
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。