Foss
Advanced Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
slech
Цитата: Подумалось, что может было бы даже удобнее создать просто идентичную структуру папок с файлами нулевого размера.
Может кто такое умеет ? |
Total Commander + скрипт, повешенный на его кнопку, напр.:
Код: '=====================================================================
' Создание структуры каталогов и файлов нулевого размера в них
' В параметрах вызова из TC должно быть прописано:
' %L "%T"
'=====================================================================
Option Explicit
Dim FSO, WSH, OTF, Target, NewTar
Dim Selected
Set FSO = CreateObject("Scripting.FileSystemObject")
Set WSH = CreateObject("WScript.Shell")
Set OTF = FSO.OpenTextFile(WScript.Arguments(0), 1)
Target = WScript.Arguments(1)
Do While Not OTF.AtEndOfStream
Selected = OTF.ReadLine
If FSO.FileExists(Selected) Then
WSH.Run "fsutil file createnew """ & Target & FSO.GetFile(Selected).Name & """ 0", 7, True
End If
If FSO.FolderExists(Selected) Then
NewTar = Target & FSO.GetFolder(Selected).Name
If Not FSO.FolderExists(NewTar) Then
FSO.CreateFolder(NewTar)
End If
FolderProcess FSO.GetFolder(Selected), NewTar & "\"
End If
Loop
'MsgBox("Выполнено!")
Set OTF = Nothing
Set FSO = Nothing
Set WSH = Nothing
WScript.Quit()
Function FolderProcess(Fold, Tar)
Dim sf, f, NewF
For Each sf in Fold.SubFolders
NewF = Tar & sf.Name
If Not FSO.FolderExists(NewF) Then
FSO.CreateFolder(NewF)
End If
FolderProcess sf, NewF & "\"
Next
For Each f in Fold.Files
WSH.Run "fsutil file createnew """ & Tar & FSO.GetFile(f).Name & """ 0", 7, True
Next
End Function |
Цитата:| Возможность навигации по папкам и что бы было видно их содержимое. |
Total Commander + любой из кучи плагинов, копирующих структуру содержимого папки, диска (catalogmaker.wcx, diskdirextended.wcx, diskdir.wcx и проч.). Эти плагины создают файлы содержащие всю информацию о иерархической системе папки, диска со списком всех файлов и информацией о них типа размер и тд). В созданные файлы можно зайти в TC, как в обычный архив (то есть по левому двойному клику) и наблюдать туже самую картину, как если бы вы были в папке или на диске (иконки тоже видны).
Это самые простые и быстрые способы решения вашей проблемы.
Вариант с HTML заведомо бесперспективен, поскольку большие html файлы жутко тормозят и в конце концов вы бросите эту затею, даже если возметесь за нее поначалу. |
Всего записей: 1316 | Зарегистр. 15-04-2003 | Отправлено: 10:18 06-04-2014 | Исправлено: Foss, 10:21 06-04-2014 |
|
