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

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://www.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电影| 很黄无遮挡在线免费网站| 美女在线观看av少妇| 永久永久免费黄色一级片| 国产黄a三级三级三级老师绑| 日韩毛片免费看美日韩毛片| 粗长挺进新婚人妻诗岚| 亚洲一区二区三区精品日韩| 久久亚洲中文字幕精品熟女| 久久日韩人妻中文字幕| 日本2区3区视频在线观看| 欧美日韩综合在线第一页| 亚洲免费av一区在线观看| 亚洲av精二区三区四区| 国产精品97久久97久久久久| 亚洲一区欧美二区日韩| 国产成人一区二区三区综合区| 日本免费一区二区在线视频| 国产精品成人一区二区艾草| 人妻少妇亚洲中文字幕| 最近免费欧美一级黄片| 粗长挺进新婚人妻诗岚| 日韩精品视频高清在线观看| 国产精品一区午夜福利| 国产精品亚洲国产精品| 97全国免费观看视频| 成年视频免费观看视频| 久久精品中文字幕有码日本道 | 日本一区二区精品视频| 在线成人免费日韩视频| 国产精品一区二区国产激情久久| 日韩欧美一区精品在线观看| 国产精品无卡无在线播放| 国产中文字二暮区2021综合 | 午夜视频在线观看麻豆| 日本高清免费播放一区二区| 免费在线观看欧美色妇| 亚洲伦理在线一区二区| 久久亚洲av麻衣北条麻妃| 久久亚洲av电影网站| 午夜免费视频观看在线|