麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 編程 > VBScript > 正文

PDF的VBS小程序代碼

2020-07-26 11:55:31
字體：大 中 小
來源：轉載
供稿：網友
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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 久久99精品久久久久久秒播蜜臀 | 亚洲视频在线免费看 | 91av在线免费播放 | 91成人一区二区三区 | 香蕉视频h| 欧美色另类 | 国产一级午夜 | 欧美亚洲一级 | 少妇一级淫片免费放4p | 久久久麻豆 | 久草最新在线 | av国产在线被下药迷网站 | 男女无套免费视频 | av影院在线播放 | 羞羞视频免费观看入口 | 国产成人在线视频 | 九九综合九九 | 欧美成在线视频 | 日本网站一区二区三区 | 国产91久久精品 | 国产一级毛片不卡 | 久久久久久久久浪潮精品 | 天天操综| 97超级碰碰人国产在线观看 | 免费看性xxx高清视频自由 | 91精品福利视频 | 亚洲精品久久久久久下一站 | 久久久久久麻豆 | av视在线| 久久亚洲精品国产一区 | 欧美亚成人 | 久久夜夜视频 | 久久精品一级片 | 成人精品aaaa网站 | 羞羞视频免费入口网站 | 免费中文视频 | 免费色片| qyl在线视频精品免费观看 | 91福利免费视频 | 在线1区 | 一级成人欧美一区在线观看 |