PDF的VBS小程序代码
更新时间：2008年08月17日 12:09:13 作者：
PDF的VBS小程序，看上去应该是处理pdf文件的
Dim ls_File
Set objArgs = WScript.Arguments '命令行参数
if objArgs.Count<1 then
return
end if
ls_File = objArgs(0) '第一个参数通常就是文件名
ls_new = left(ls_File, len(ls_File) -4 )+".pdf"
Set pptApp = CreateObject("PowerPoint.Application") '申明调用函数
pptApp.Visible = True '在使用PowerPoint时,一定要有此句，否则会出错
Set MyPress = pptApp.Presentations.Open( ls_file) 'Presentation 对象
MyPress.Saveas ls_new,32
pptApp.Quit
Set objArgs = WScript.Arguments '命令行参数
if objArgs.Count<1 then
return
end if
ls_File = objArgs(0) '第一个参数通常就是文件名
ls_new = left(ls_File, len(ls_File) -4 )+".pdf"
Set pptApp = CreateObject("PowerPoint.Application") '申明调用函数
pptApp.Visible = True '在使用PowerPoint时,一定要有此句，否则会出错
Set MyPress = pptApp.Presentations.Open( ls_file) 'Presentation 对象
MyPress.Saveas ls_new,32
pptApp.Quit
相关文章
这篇文章主要介绍了vbs脚本实现修改DNS和清空IE临时文件功能,本文直接给出实现两种功能的脚本代码,需要的朋友可以参考下2015-02-02
用来计算中文姓名的笔画数的脚本，非常不错，算命常用的2009-08-08
CMD下的dir好像没法列出从某段时间到某段时间的文件，所以写了这个小东东，方便根据我们的要求显示数据2008-05-05
VBS教程：正则表达式简介 -正则表达式...2006-11-11
文件夹定时自动备份 AutoBackUpFolder.vbs
定时自动备份文件夹到一个以时间命名的新目录，设置好后加到启动项里，只要一启动机器程序就会自动运行，占系统资源可以不计。2009-07-07
在一个vbs中包含其他vbs文件的方法...2007-03-03
一个可以删除指定天数文件的vbs脚本...2007-02-02
这篇文章主要为大家介绍了VBScript编写Windows防止锁屏脚本程序示例，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步，早日升职加薪<BR>2022-05-05
VBS教程：运算符-\ 运算符...2006-11-11
VBS教程：函数-Date 函数...2006-11-11
最新评论