本技术资料版权所有,禁止分发.©(2003-2007),重庆软航科技有限公司,保留所有权利.NTKO和软航是软航科技的商标

NTKO OFFICE文档控件技术资料

ppt通过AddOLEObject对象插入flash


创建时间:02/18/2011 09:22:40 AM 修改时间: 10/26/2011 01:42:35 PM
分类:BS开发-常见问题, BS开发-开发技巧, BS后台开发-JSP,J2EE开发, BS后台开发-C#.NET,VB.NET, BS后台开发-PHP开发, BS后台开发-ASP开发
适应版本号:4,0,6,X; 4,0,3,X; 4,0,1,X; 4,0,0,X; 3,0,0,x

相关文档:本文档没有相关文档



//ppt
function addPic(){
TANGER_OCX_OBJ.ActiveDocument.Application.ActiveWindow.Selection.SlideRange.Shapes.AddPicture("C:\\Documents and Settings\\xuy\\My Documents\\My Pictures\\足球队.jpg", 0, -1, 60, 45,600, 450).Select();
}
//插入电影
function addMov(){
TANGER_OCX_OBJ.ActiveDocument.Application.ActiveWindow.Selection.SlideRange.Shapes.AddMediaObject("C:\\Documents and Settings\\xuy\\My Documents\\My Pictures\\test.avi",0, -1, 322.5, 232.5).Select();
}
//插入flash
function addFlash(){
TANGER_OCX_OBJ.ActiveDocument.Application.ActiveWindow.Selection.SlideRange.Shapes.AddOLEObject(414, 276, 72, 72, "ShockwaveFlash.ShockwaveFlash.1","",0,"",0,"",0).Select();
TANGER_OCX_OBJ.ActiveDocument.Application.ActiveWindow.Selection.SlideRange.Shapes("ShockwaveFlash1").OLEFormat.Object.Movie = "http://imgfree.21cn.com/free/flash/67.swf";
}

返回页面顶部↑  
本文档的相关文档:
本文档没有相关文档