Windowsにログインせずにアーカイブフォルダのサイズを取得するにはどうすればよいですか？

Question

Windowsにログインせずにアーカイブフォルダのサイズを取得するにはどうしたらいいですか？コンピュータの名前をメモ帳に変数として受け取るだけです。 私はパスとして\\kullanici\d$\lotus\notes\data\archiveを使用しています。 私のVBSコードはここにあります。ほかにいくつかのパッチ未適用のセキュリティ上の脆弱性を悪用から

Set FSO = CreateObject("Scripting.FileSystemObject") 
Set WshNetwork = WScript.CreateObject("WScript.Network") 
Set TextFile = FSO.OpenTextFile("C:\Info.txt", 2, True) 

TextFile.Writeline "Sonuclar:" & cikti 
const dosyaYolu = "\d$\lotus\notes\data\archive\" 
const okumaModu = 1 
dim fso, dizin, makineAdlari, tekilAdlar, satir, cikti, FarkliMakine 
cikti = "" 
set fso = createObject("Scripting.FileSystemObject") 
if fso.FileExists("adlar.txt") then 
makineAdlari = fso.OpenTextFile("adlar.txt", okumaModu).readAll 
tekilAdlar = split(makineAdlari,vbCrLf) 
for each satir in tekilAdlar 
    farkliMakine = "\\" & satir & dosyaYolu 
    if fso.FolderExists(farkliMakine) then 
    set dizin = fso.GetFolder(farkliMakine) 
    cikti = cikti & vbcrlf & satir & " adlı makinede " & dosyaYolu & " dizini ~" & (dizin.Size /1073741824) & " mB" 
    set dizin = Nothing 
    else 
    cikti = cikti & vbCrLf & satir & " kullanıcısı " & dosyaYolu & " dizinine sahip değil!" 
    end if 
next 
msgBox cikti,64,"Sonuçlar:" 
else 
msgbox "adlar.txt dosyasının vbs dosyası ile aynı klasörde bulunduğundan emin olun.", 16 or 0, "Hata!" 
end if 

Set TextFile = Nothing 
Set WshNetwork = Nothing 
set fso = Nothing 

Answer 1

は、Windows OS上で実行されているとVBScriptを使用している場合、あなたはD $共有へのアクセス権を持つアカウントでkullanici \に認証できるようにする必要があります。通常、管理者だけがそのような隠し管理共有にアクセスできます。

\ kullaniciがWindows 2000コンピュータの場合、Everyoneにd $共有とD：\ lotus \ notes \ data \ archiveフォルダへのアクセス権を与えた場合、匿名ユーザーは誰でもアクセスできます。