主页 > 知识库 > PDF的VBS小程序代码

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微信小程序之语言播报功能

标签:长治 乐山 沧州 上海 沈阳 红河 河南 新疆

巨人网络通讯声明:本文标题《PDF的VBS小程序代码》,本文关键词  ;如发现本文内容存在版权问题,烦请提供相关信息告之我们,我们将及时沟通与处理。本站内容系统采集于网络,涉及言论、版权与本站无关。
  • 相关文章
  • 收缩
    • 微信客服
    • 微信二维码
    • 电话咨询

    • 400-1100-266