佳木斯湛栽影视文化发展公司
主頁(yè) > 知識(shí)庫(kù) > vbs fso跨盤(pán)移動(dòng)文件夾的怪問(wèn)題

vbs fso跨盤(pán)移動(dòng)文件夾的怪問(wèn)題
熱門(mén)標(biāo)簽：銀行業(yè)務(wù) 智能手機(jī) 檢查注冊(cè)表項(xiàng) 美圖手機(jī) 呼叫中心市場(chǎng)需求 網(wǎng)站文章發(fā)布 鐵路電話(huà)系統(tǒng) 服務(wù)器配置
跨盤(pán)移動(dòng)文件夾的怪問(wèn)題
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFolder "C:\Scripts" , "d:\2"
權(quán)限拒絕，但是copy就可以?？梢圆捎米兺ǖ霓k法先復(fù)制再刪除
========================================wmi=================
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
"{impersonationLevel=impersonate}!\\" strComputer "\root\cimv2")
Set colFolders = objWMIService.ExecQuery _
("Select * from Win32_Directory where name = 'c:\\Scripts'")
For Each objFolder in colFolders
errResults = objFolder.Rename("d:\\VBScript")
Wscript.Echo errResults
Next
錯(cuò)誤碼13，估計(jì)是更名的時(shí)候不允許ren c:\1 d:\2這樣的格式
========================Shell.Application可以成功====================
Const FOF_CREATEPROGRESSDLG = H0
TargetFolder = "c:\3"
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace(TargetFolder)
objFolder.MoveHere "d:\downloads", FOF_CREATEPROGRESSDLG
但是必須目標(biāo)文件夾（像本例的是c:\3）存在才可以

標(biāo)簽：紅河 河南 長(zhǎng)治 樂(lè)山 沈陽(yáng) 上海 滄州 新疆

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《vbs fso跨盤(pán)移動(dòng)文件夾的怪問(wèn)題》，本文關(guān)鍵詞  ；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼

    • 電話(huà)咨詢(xún)

    • 400-1100-266
    遂平县| 曲周县| 宜宾市| 正宁县| 连平县| 大名县| 册亨县| 绍兴市| 拜城县| 武穴市| 晋州市| 岳西县| 弥勒县| 建平县| 光山县| 榆林市| 武威市| 特克斯县| 嘉兴市| 垫江县| 阿图什市| 许昌市| 定州市| 兴城市| 镇赉县| 林甸县| 本溪市| 综艺| 城步| 丰都县| 柯坪县| 南宁市| 舟山市| 福海县| 青河县| 原阳县| 乐东| 崇仁县| 灵川县| 华池县| 剑阁县|