JavaScript отключён. Чтобы полноценно использовать наш сайт, включите JavaScript в своём браузере.

Ответить в теме

Сообщение: [QUOTE="Dragokas, post: 236069, member: 6966"] 2 и 3-я строка лишние. Если Вам хочется прописать полный путь к папке 111, которая находится в папке со скриптом, то делайте так: [code=vbnet] Set FSO = CreateObject("Scripting.FileSystemObject") cur = FSO.GetParentFolderName(WScript.ScriptFullName) Set Folder = FSO.GetFolder(cur & "\" & "111") MsgBox Folder.Size [/code] или так (что технически более верно): [code=vbnet] Set FSO = CreateObject("Scripting.FileSystemObject") cur = FSO.GetParentFolderName(WScript.ScriptFullName) Set Folder = FSO.GetFolder(FSO.BuildPath(cur, "111")) MsgBox Folder.Size [/code] [/QUOTE]