PowerShell: शफल फ़ाइलें

शुभ दिन,% हबलस%!
हाल ही में, उन्होंने मुझे पहली नज़र के काम के बजाय एक सरल बना दिया: हमें मतदान प्रणाली के लिए लगभग 1000 फ़ोटो मिलाने की आवश्यकता है।
मैन्युअल रूप से ऐसा करना एक धन्यवाद का काम है। थोड़ी अच्छी स्क्रिप्ट चाहिए।
PowerShell एक आदर्श विकल्प निकला: मैं अजगर की तरह कुछ स्थापित नहीं करना चाहता था, लेकिन मैंने अपने जीवन में .bat फ़ाइलों के साथ दोस्त बनाए हैं।

चलिए शुरू करते हैं।
तस्वीरों के नाम महत्वपूर्ण थे और मैं उन्हें रखना चाहता था। मैंने उन्हें फ़ाइल संपत्तियों में हटाने का फैसला किया (WinXp के लिए "सारांश", Win7 के लिए "विवरण")। इसके अलावा, वोट शेयरपॉइंट पर लिखा गया है, और यह फ़ाइल गुणों से "नाम" उठा सकता है। यह बहुत सुविधाजनक निकला।
फ़ाइल गुणों को संपादित करने के लिए, OLE फ़ाइल संपत्ति रीडर 2.1 घटक का उपयोग किया गया था (vb7 उदाहरण फ़ोल्डर में .net के लिए एक पुस्तकालय आवरण है), लाभ पहले से ही मशीन पर स्थापित किया गया है। घटक कार्यालय दस्तावेजों के लिए अभिप्रेत है, लेकिन चित्रों के लिए भी।

वास्तविक स्क्रिप्ट:

[System.Reflection.Assembly]::LoadFrom('c:\DsoFile\Source\Vb7Demo\bin\Interop.DSOFile.dll') function SetSummary-Name([string] $folder, [string]$pattern = '*.*') { $files = [System.IO.Directory]::GetFiles($folder, $pattern) foreach ($f in $files) { $oled = New-Object -TypeName DSOFile.OleDocumentPropertiesClass $oled.Open($f, $false, [DSOFile.dsoFileOpenOptions]::dsoOptionDefault) $sp = $oled.SummaryProperties $sp.Title = $f.Substring($f.lastindexof('\') + 1, $f.lastindexof('.') - $f.lastindexof('\') - 1) $oled.close($true) } } SetSummary-Name -folder 'c:\photo' 

अगला, मिश्रण करने के लिए आगे बढ़ें:
संख्यात्मक नाम उत्पन्न करना संभव था, लेकिन अचानक मैं वास्तव में जटिल डिजाइन की एक साइकिल का आविष्कार करना चाहता था।

 #        function RandomName([string]$path) { $length = 20 #    $sb = New-Object -TypeName System.Text.StringBuilder for($i=0; $i -lt $length; $i++) { #   ,  ... [char]$ch = [Convert]::ToChar([Convert]::ToInt32([Math]::Floor(26 * $rand.NextDouble() + 65))) $tmp = $sb.Append($ch) # Append    ,    $tmp } $name = $path.Substring($path.lastindexof('\') + 1, $path.lastindexof('.') - $path.lastindexof('\') - 1) $sb = $sb.ToString().ToLower() return $path.Replace($name, $sb) } function MixFiles([string]$From, [string]$pattern = '*.*') { $files = [System.IO.Directory]::GetFiles($from, $pattern) foreach($f in $files) { $path = RandomName -path $f #    , while([System.IO.File]::Exists($path)) { #  ,    $path $path = RandomName -path $f } #        Write-Host ($f + ' -> ' + $path) [System.IO.File]::Move($f, $path) } } $rand = New-Object -TypeName Random MixFiles -from 'c:\test\' -pattern '*.jpg' 

आपके ध्यान के लिए धन्यवाद, मुझे आशा है कि मैं किसी के लिए उपयोगी होगा।