当前位置:首页经验技巧Ppt经验ppt教学

dreamweaver如何连接PowerPoint幻灯片

2024-07-14 17:43:50

1.dreamweaver如何连接ppt

"通过插入ActiveX的办法来控制PPT,比较完善的办法是脚本建立对PowerPoint对象的实例,再进行控制.还可以引用第三方控件,专门用来控制Office套件的软件,比如:iWebOffice等、下面介绍第一种方法:脚本是用VBS编写的,实现了打开PowerPoint并简单编辑:Set objPPT = CreateObject(""PowerPoint.Application"")objPPT.Visible = TrueSet objPresentation = objPPT.Presentations.AddobjPresentation.ApplyTemplate(""C:\Program Files\Microsoft Office\Templates\Presentation Designs\Globe.pot"")strComputer = "".""Set objWMIService = GetObject(""winmgmts:\\"" & strComputer & ""\root\cimv2"")Set colProcesses = objWMIService.ExecQuery(""Select * From Win32_Process"")For Each objProcess in colProcessesSet objSlide = objPresentation.Slides.Add(1,2)Set objShapes = objSlide.ShapesSet objTitle = objShapes.Item(""Rectangle 2"")objTitle.TextFrame.TextRange.Text = objProcess.NamestrText = ""Working set size: "" & objProcess.WorkingSetSize & vbCrLfstrText = strText & ""Priority: "" & objProcess.Priority & vbCrLfstrText = strText & ""Thread count: "" & objProcess.ThreadCount & vbCrLfSet objTitle = objShapes.Item(""Rectangle 3"")objTitle.TextFrame.TextRange.Text = .SaveAs(""C:\Scripts\Process.ppt"")objPresentation.CloseobjPPT.Quit"。

2.求VBScript代码,实现在ppt中插入图片的功能,感激不尽!注意不是

VBScript 代码:Dim objAppDim objPreDim objSlideDim objCustomLayoutSet objApp = CreateObject("PowerPoint.Application")Set objPre = objApp.Presentations.AddSet objCustomLayout = objPre.SlideMaster.CustomLayouts(1)Set objSlide = objPre.Slides.AddSlide(1, objCustomLayout)objSlide.Shapes.AddPicture "图片路径", -1, -1, 10, 10Set objSlide = NothingSet objCustomLayout = NothingSet objSlide = NothingSet objPre = NothingSet objApp = NothingPS:修改代码中的【图片路径】即可插入到新建的演示文稿的幻灯片中。

3.c#中需要引入microsoft powerpoint 15.0 object library,但是打开引用

在网上搜索一下发现很多人遇到过类似问题,很多人建议重装,其实大可不必。

可以参考,安装了Word的“.NET Programmability Support”之后,还可以有两种办法解决问题:1)简单点的,直接“项目”-“添加引用。

”-“浏览”-到“C:\Windows\Assmbly”-选择“Microsoft.Office.Interop.Word”-"确认"; 添加“using Word = Microsoft.Office.Interop.Word;”,这次就不会出错。

2)在VS2005的命令提示下,cd到“C:\Windows\Assmbly\GAC\Microsoft.Office.Interop.Word\11.0.0.0 71e9bce111e9429c” 后, 运行“regasm Microsoft.Office.Interop.Word.dll”,以后就应该不会有同样问题了。

4.VB里实现将已打开的DOC、PPT复制到指定的文件夹下

复制代码到窗体运行,一秒锺会检查一次打开的文Word、PPt,并复制到C盘根目录 ,具体检查间隔请自行修改.Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As LongDim WithEvents MyTimer As VB.TimerPrivate Sub Form_Load() Set MyTimer = Me.Controls.Add("VB.TIMER", "mytimetest") MyTimer.Interval = 1000 MyTimer.Enabled = TrueEnd SubPrivate Sub MyTimer_Timer() On Error Resume Next Set WordObj = GetObject(, "Word.application") CopyFile WordObj.activedocument.fullname, "C:\" & WordObj.activedocument.Name, 0 Set PowerPointObj = GetObject(, "PowerPoint.application") CopyFile PowerPointObj.ActivePresentation.fullname, "C:\" & PowerPointObj.ActivePresentation.Name, 0End Sub。

5.obj文件怎么群导入3Dmax里面

一. 用 3ds Max Script 同时导入多个.obj文件

1. MAXScript -> New Script, 将下列代码拷贝, 修改路径;

2. ctrl + s 保存该script文件;

3. MAXScript -> Run Script, 选择保存的script文件, 点击Open即可。

二. 在批量导入obj以后,首先进行group, 然后将该group进行放缩,平移,旋转变换。问题在于:当我进行变换之后,如果对其中某一obj修改后要重新导入3ds max, 这样它就不跟group的物体不相吻合。有一个办法可以处理:

1. 记下group的变换数据;

2. 选中新导进来的物体,依次按scale, translate, rotate的顺序,用上述记录下来的数据进行变换。

6.怎样将obj保存至sourcefiles

点击细分菜单下的Doo-sabin来实现细分-We assisted a geometric operation. This experiment by clicking the loading menu loading OBJ to read the data file, save OBJ operation can save you a breakdown of the data. Click on the menu shows the type of display can be achieved peak, indicating the border, showing the three facial features. Click on the menu under subdivision Doo-sabin to achieve a breakdown.。


电脑版

免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2024 All Rights Reserved .