您的位置:程序门 -> 企业开发 -> lotus



b/s视频播放的问题,大家帮我看看问题出在哪


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


b/s视频播放的问题,大家帮我看看问题出在哪
发表于:2007-05-19 14:41:39 楼主
点击页面1的播放键(建的一个热点,js代码为,open( "/vod.nsf/vod?openform ", "ok ", "toolbar=no,location=no,directory=no,status=no,menubar=no,scrollbar=no,resizable=no,width=480,height=390 "))

页面2为嵌入调用wmp的代码,(   <object   classid= "clsid:22d6f312-b0f6-11d0-94ab-0080c74c7e95 "   height= "378 "   id= "mediaplayer1 "  
width= "460 ">
<param   name= "autostart "   value= "-1 ">
<param   name= "showstatusbar "   value= "-1 ">
<param   name= "filename "   value= " ">
</object>     )
最后 <param   name= "filename "   value= " ">   value   值那里建了一个计算文本域继承新建表单里的文本域   url   ,写了一个代理,
sub   initialize
dim   session   as   new   notessession
dim   db   as   notesdatabase
dim   view   as   notesview
dim   cdoc   as   notesdocument
dim   doc   as   notesdocument

set   db=session.currentdatabase
set   view=db.getview( "spwj ")
set   doc=view.getfirstdocument
set   cdoc=session.documentcontext
if   not   doc   is   nothing   then
cdoc.url=doc.url(0)
end   if
end   sub

播放没问题,可始终只取最新更新的那个视频地址,大家帮我看看到底怎么改,急死了
发表于:2007-05-19 14:49:101楼 得分:0
为什么始终只传一个地址,晕死了
发表于:2007-05-19 17:02:232楼 得分:0
up
发表于:2007-05-22 10:32:103楼 得分:0
doc=view.getnextdocument
发表于:2007-05-22 13:47:184楼 得分:0
set   db=session.currentdatabase
set   view=db.getview( "spwj ")
set   doc=view.getfirstdocument
set   cdoc=session.documentcontext
while   not   doc   is   nothing  
if   not   doc   is   nothing   then
cdoc.url=doc.url(0)
end   if
set   doc=view.getnextdocument(doc)
wend
end   sub
发表于:2007-05-22 15:24:105楼 得分:0
nvw.getnextdocument(ndoc)
发表于:2007-05-31 10:06:016楼 得分:0
感谢各位的热心的帮助,我已经把那个js的open去掉了。直接在视图打开的页面嵌入
播放器的代码,value的值直接就是url。暂时是解决了这个问题!
        再次感谢各位热心解答的和帮顶兄弟,谢谢!


快速检索

最新资讯
热门点击