Z
zjbfvfv
Unregistered / Unconfirmed
GUEST, unregistred user!
我的Scrip如下,用来保存当前IE浏览页面:
<script language="VBScript">
Sub OnContextMenu()
On Error Resume Next
set EPObj=CreateObject("EasyPad.EPObj")
if err<>0 then
Alert("eLib haven't installed in your computer!")
else
call EPObj.AddWebPage(external.menuArguments.document)
end if
end sub
Call OnContextMenu()
</script>
请告知有关此external.menuArguments.document在Delphi的使用
<script language="VBScript">
Sub OnContextMenu()
On Error Resume Next
set EPObj=CreateObject("EasyPad.EPObj")
if err<>0 then
Alert("eLib haven't installed in your computer!")
else
call EPObj.AddWebPage(external.menuArguments.document)
end if
end sub
Call OnContextMenu()
</script>
请告知有关此external.menuArguments.document在Delphi的使用