易语⾔⽹页另存为html,易语⾔Html对象取⽹页body⽂本源码.版本 2
.⽀持库 HtmlView
网页html下载.⼦程序 编辑器内容, ⽂本型, 公开, 读写编辑器内容
.参数 写内容, ⽂本型, 可空, 空⽩为读取内容
.局部变量 Doc, 对象
.局部变量 Editor, 对象
.局部变量 Textarea, 对象
.局部变量 Display, 逻辑型
.局部变量 Obj, 对象
Doc = 超⽂本浏览框1.取⽂档对象 ()
‘ WebBrowser.GetDocument ().对象型⽅法 (“getElementById”, “divid”).读属性 (“innerHTML”, )
.
如果真 (取反 (Doc.是否为空 ()))
Editor = Doc.对象型⽅法 (“getElementById”, “editor_body_area”).读对象型属性 (“contentWindow”, ).读对象型属性(“document”, ).读对象型属性 (“body”, )
Textarea = Doc.对象型⽅法 (“getElementById”, “editor_body_textarea”)
Display = Textarea.读对象型属性 (“style”, ).读⽂本属性 (“display”, ) = “none”
Obj = 选择 (Display, Editor, Textarea)
.如果真 (取反 (是否为空 (写内容)))
Obj.写属性 (“innerHTML”, 写内容)
.如果真结束
返回 (选择 (是否为空 (写内容), Obj.读⽂本属性 (“innerHTML”, ), “”))
.如果真结束
返回 (“”)

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。