PDF的VBS小程序代码
导读:收集整理的这篇文章主要介绍了PDF的VBS小程序代码,觉得挺不错的,现在分享给大家,也给大家做个参考。 Dim ls_File Set objargs = WScript.argumen...
收集整理的这篇文章主要介绍了PDF的VBS小程序代码,觉得挺不错的,现在分享给大家,也给大家做个参考。 Dim ls_File Set objargs = WScript.arguments '命令行参数
if objArgs.Count1 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小程序
- 实用vbs提醒小程序
- C语言实现的一个万年历小程序
- C语言小程序 如何判断三角型类型
- C语言小程序 计算第二天日期示例代码
- C语言小程序 如何判断两个日期之差
- c语言10个经典小程序
- 好玩的vbs微信小程序之语言播报功能
声明:本文内容由网友自发贡献,本站不承担相应法律责任。对本内容有异议或投诉,请联系2913721942#qq.com核实处理,我们将尽快回复您,谢谢合作!
若转载请注明出处: PDF的VBS小程序代码
本文地址: https://pptw.com/jishu/609721.html
