|
v7: Работа с архивом через VBS
| ☑ |
0
forforumandspam
13.02.12
✎
15:01
|
Как из скрипта VBS узнать, есть ли в архиве ZIP файл 1cv7.md?
|
|
1
Ёпрст
13.02.12
✎
15:20
|
тупо открыть как текст и прочитать.. есть ли там 1Cv7.MD
|
|
2
makfromkz
13.02.12
✎
15:26
|
rar t ИмяАрхива >1.txt
и 1.txt уже шерстить на наличие *.md
|
|
3
le_
13.02.12
✎
15:30
|
ZipFile="d:\Test.Zip"
Set fso = CreateObject("Scripting.FileSystemObject")
set objShell = CreateObject("Shell.Application")
set FilesInZip = objShell.NameSpace(ZipFile).items()
oga = false
For Each it in FilesInZip
if InStr(fso.GetFileName(it),"1cv7.md") <> 0 Then
oga = true
Exit For
end if
'WScript.Echo fso.GetFileName(it)
Next
if oga then
MsgBox "Есть!"
else
MsgBox "Нет!"
end if
Set fso = Nothing
Set objShell = Nothing
|
|
4
le_
13.02.12
✎
15:31
|
+ (3) Добавь lcase шоб наверняка.
|
|
5
skunk
13.02.12
✎
15:32
|
find /c "1cv7.md" back.zip > 1.txt
если размер 1.txt больше нуля то есть
|
|
6
Ёпрст
13.02.12
✎
15:37
|
(3) от, то что надо
(2,5) ну это же не спортивно!
:)
|
|
7
forforumandspam
13.02.12
✎
15:44
|
Всем спасибо!!!!!
Полезны все способы. Применять буду (3)
|
|