最近2018中文字幕在日韩欧美国产成人片_国产日韩精品一区二区在线_在线观看成年美女黄网色视频_国产精品一区三区五区_国产精彩刺激乱对白_看黄色黄大色黄片免费_人人超碰自拍cao_国产高清av在线_亚洲精品电影av_日韩美女尤物视频网站

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

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

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

復(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í)候一直給用戶以不友好的文件打開或是保存方式，總是自己在后臺(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è)例子，這次是打開文件，獲得文件名。

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

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

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

一個(gè)名稱，一個(gè)調(diào)用方法，僅此而已。
如果您覺得這個(gè)不夠帥，您想用類似于MFC中完全自己DIY的CFileDialog，您該怎么辦呢？也很簡(jiǎn)單，UserAccounts對(duì)象為我們提供了CommonDialog，這個(gè)更加高級(jí)的打開通用對(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吧，雙擊打開，它連過濾的文件類型都為您留好了接口。

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

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

當(dāng)前名稱：VbsCOM如何實(shí)現(xiàn)打開/保存文件的腳本代碼-創(chuàng)新互聯(lián)
網(wǎng)頁網(wǎng)址：http://fisionsoft.com.cn/article/gciee.html