'
文档查看
'
根据内外网用户自动获取服务端已经保存好的文档。
'dim domainName="http://xxx.XXYYZZ.com/"
'dim domainName="http://170.3.100.100/"
dim
domainName=ServerUrl()
'
查询网页的地址
dim
fileurl=
ExecuteScalar
(
"select nvl(max('HtmlDocument/'||file_folder||'/'||file_name ),'NULL') from delit_office_document where filetype='HTML' and recordid='"
&Me.Input2&
"'"
)
if
Me.Input1=
"VIEW"
then
'
已经发布了的
html
if
fileurl<>
"NULL"
then
文档显示部件
1.TemplateUrl=domainName&fileurl
else
showmessage
(
"
发布的信息不存在,可能是已经删除或撤销。
"
,2)
end if
文档显示部件
1.RefreshData()
end if
|
原文地址 :http://plat.delit.cn/forum.php?mod=viewthread&tid=226
转载请注明出处:
撰写人;度量科技www.delit.cn