欧美一级特黄大片做受成人-亚洲成人一区二区电影-激情熟女一区二区三区-日韩专区欧美专区国产专区

VbsCOM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼-創(chuàng)新互聯(lián)

小編給大家分享一下Vbs COM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼,相信大部分人都還不怎么了解,因此分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后大有收獲,下面讓我們一起去了解一下吧!

創(chuàng)新互聯(lián)公司主要業(yè)務(wù)有網(wǎng)站營(yíng)銷策劃、做網(wǎng)站、網(wǎng)站設(shè)計(jì)、微信公眾號(hào)開(kāi)發(fā)、微信小程序定制開(kāi)發(fā)、H5場(chǎng)景定制、程序開(kāi)發(fā)等業(yè)務(wù)。一次合作終身朋友,是我們奉行的宗旨;我們不僅僅把客戶當(dāng)客戶,還把客戶視為我們的合作伙伴,在開(kāi)展業(yè)務(wù)的過(guò)程中,公司還積累了豐富的行業(yè)經(jīng)驗(yàn)、全網(wǎng)營(yíng)銷推廣資源和合作伙伴關(guān)系資源,并逐漸建立起規(guī)范的客戶服務(wù)和保障體系。 

您先把如下的代碼復(fù)制,然后保存為FileSave.vbs,雙擊打開(kāi),您看到了什么呢?


復(fù)制代碼 代碼如下:


Set objDialog = CreateObject("SAFRCFileDlg.FileSave")
Set fso = CreateObject("Scripting.FileSystemObject")
objDialog.FileName = "test"
objDialog.FileType = ".txt"
intReturn = objDialog.OpenFileSaveDlg
If intReturn Then
fso.CreateTextFile(objDialog.FileName & objdialog.filetype)
Else
Wscript.Quit
End if



Vbs在很多時(shí)候一直給用戶以不友好的文件打開(kāi)或是保存方式,總是自己在后臺(tái)處理掉了一些FSO操作,而不能讓用戶自己進(jìn)行一些設(shè)當(dāng)?shù)腄IY。所以,為什么不用COM呢?COM組件在系統(tǒng)里是一直存在的,利用它,我們的用戶體驗(yàn)將會(huì)提升很多。
上面的代碼是不能彈出一個(gè)保存test.txt文件的對(duì)話框呢?后綴名和文件名大家自己去修改,估計(jì)懂點(diǎn)vbs基礎(chǔ)知識(shí)的人都能修改筆者的這個(gè)小腳本,并將它鑲嵌到自己的腳本中去吧?
下面再看一個(gè)例子,這次是打開(kāi)文件,獲得文件名。


復(fù)制代碼 代碼如下:


set objFile = CreateObject("SAFRCFileDlg.FileOpen")
bRet = objFile.OpenFileOpenDlg
if bRet then
Wscript.Echo "文件打開(kāi)成功!文件名為:" & objFile.filename
else
wscript.quit
End if


運(yùn)行這個(gè)腳本(FileOpen.vbs),將會(huì)彈出一個(gè)讓用戶自己選擇文件的對(duì)話框窗口,非常友好地讓用戶自己選擇文件。bRet是執(zhí)行的返回值,不為0則成功,objFile的FileName可以返回選擇的文件名。

Vbs COM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼
一個(gè)名稱,一個(gè)調(diào)用方法,僅此而已。
如果您覺(jué)得這個(gè)不夠帥,您想用類似于MFC中完全自己DIY的CFileDialog,您該怎么辦呢?也很簡(jiǎn)單,UserAccounts對(duì)象為我們提供了CommonDialog,這個(gè)更加高級(jí)的打開(kāi)通用對(duì)話框。


復(fù)制代碼 代碼如下:


Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = "vbs File|*.vbs"
objDialog.InitialDir = "E:"
bRet=objDialog.ShowOpen
if bRet then
strLoadFile = objDialog.FileName
Wscript.Echo strLoadFile
else
Wscript.quit
End if


將其保存為FileOpenAdvance.vbs吧,雙擊打開(kāi),它連過(guò)濾的文件類型都為您留好了接口。

Vbs COM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼

默認(rèn)文件名,后綴過(guò)濾器,后綴索引,標(biāo)志,初始化未知,擁有者,一個(gè)調(diào)用方法。

以上是“Vbs COM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼”這篇文章的所有內(nèi)容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內(nèi)容對(duì)大家有所幫助,如果還想學(xué)習(xí)更多知識(shí),歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道!

分享名稱:VbsCOM如何實(shí)現(xiàn)打開(kāi)/保存文件的腳本代碼-創(chuàng)新互聯(lián)
文章鏈接:http://aaarwkj.com/article44/gciee.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站設(shè)計(jì)、域名注冊(cè)ChatGPT、外貿(mào)網(wǎng)站建設(shè)、響應(yīng)式網(wǎng)站、網(wǎng)站制作

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)

成都定制網(wǎng)站網(wǎng)頁(yè)設(shè)計(jì)
精品少妇人妻久久av免费| 久久精品少妇人妻视频| 亚洲高清有码在线观看| 国产精品极品网站91青青| 粉嫩一区二区三区在线| 蜜臀av成人精品蜜臀av| 国产欧美日韩另类在线| 亚洲午夜精品久久久天堂| 蜜桃av在线播放视频| 国产免费看黄色的网站| 国产亚洲欧美日韩各类| av在线免费观看不卡| 亚洲成年人黄色在线观看| 国产怡红院在线视频观看| 日韩有码大片最新自拍| 欧美性生活之欧美日韩| 色婷婷丝袜一区网站| 91午夜福利国产在线观看 | 日本 一区二区在线| 青青草原精品视频在线| 日韩不卡免费在线视频| 久娜娜精品视频在线观看| 国产国产人免费人成免费人妖| 日本黄色中文字幕在线观看| 男人天堂插插综合搜索| 少妇的诱惑免费在线播放| 99精品热视频在线观看| 蜜臀av网站在线播放| 国产激情盗摄一区二区三区| 玩弄丰满熟妇留守妇女| 国产国产成人精品久久蜜| 99精品人妻一区二区三区蜜桃| 91精品国产高清一区二区性色| 国产精品自偷自偷自偷| 天堂在线精品亚洲综合网| 日本不卡一二区不久精品免费| 亚洲精品一区二区影院| 欧美香蕉视频播放二区| 日韩永久免费av网站| 亚洲激情自拍偷拍视频| 亚洲国产香蕉视频在线播放|