skg123 发表于 2013-5-4 22:02:05

打开网页 lisp 代码 （转载）

本帖最后由 skg123 于 2013-5-8 18:58 编辑

构想，点击工具栏的工具 链接到自己的公司、 博客或空间上。
绘制CAD图，遇到问题，直接点击工具 就链接到 明经论坛了，方便快捷。
最简单的方法：
该方法得到rjtiantian 帮助
(defun c:tt
(command "BROWSER" "http://bbs.mjtd.com")
)


经过百度 ，源代码如下网址中
http://www.afralisp.net/archive/methods/lista/launchbrowserdialog_method.htm
案例Example :
(defun c:al-launchbrowserdialog ()

(vl-load-com)

(setq util (vla-get-utility
                   (vla-get-activedocument
                        (vlax-get-acad-object))))
                        
(vla-LaunchBrowserDialog util 'theurl "AfraLisp Browser"
      "Open" "http://www.afralisp.com" "ACADBROWSER" 1)

(princ theurl)

(princ)

);defun



sicky111 发表于 2013-5-5 15:33:59

不是用IE浏览器打开，窗口不能最大化，没啥用。

vlisp2012 发表于 2013-5-5 08:55:23

感觉买啥大用处啊！

skg123 发表于 2013-5-8 18:49:02

sicky111 发表于 2013-5-5 15:33 static/image/common/back.gif
不是用IE浏览器打开，窗口不能最大化，没啥用。

(defun c:tt
(command "BROWSER" "http://bbs.mjtd.com")
)

skg123 发表于 2013-5-8 18:49:42

http://bbs.mjtd.com/thread-95696-1-1.html
一个在CAD界面瞬间关掉所有网页的lsp程序

skg123 发表于 2013-5-8 18:56:50

vlisp2012 发表于 2013-5-5 08:55 static/image/common/back.gif
感觉买啥大用处啊！

有的，你可以把你的CAD相关的网站 做到工具栏中，有时候可以用CAD的时候，也可以直接连接到CAD相关网页中。

wjl1014 发表于 2013-5-19 20:14:57

大材小用。

圣天诺杰 发表于 2019-10-9 13:20:13

怎么用默认的浏览器打开？

yefei812678 发表于 2024-2-23 16:36:59

这有啥用啊 》
页: [1]
查看完整版本: 打开网页 lisp 代码 （转载）