Текущая директория

14.09.2010, 18:20. **Показов** 2534. **Ответов** 9

Author24 — интернет-сервис помощи студентам

Извините за тупой вопрос, но как переменной в VBScript присвоить путь к текущей директории?
Спасибо, что не обиделись...

06.10.2010, 23:24

такой же ответ. если ты не забыл, текущая директория - это точка '.'
т.е. данные команды эквивалентны

Код

c:windows> dir c:windows

Код

c:windows> dir .

соответственно две точки - это на уроень выше '..', т.е. эквивалентны команды

Код

c:windows> dir c:

Код

c:windows> dir ..

если мы хотим перецти на два уровня выше а затем в директорию , скажем, games, то используем

Код

c:windowssystem32> cd ....games

Код

c:games>

т.е. все как в юниксе, только слеши наоборот

11.10.2010, 14:04

Спасибо за ответ, но не помогло.
Вот, что мне нужно (что я пытался сделать):

Код

dir = '.html '
...
Set doc = wrd.Documents.Open(dir & Args(0) & '.html')

Не работает. Ругается на меня VBS!!!
Вот если сказать ему
'C: uthtml ' & Args(0) & '.html'
Это он поймет, а как мне быть?

@vers · 11.10.2010, 15:03

А для чего тебе такой скрипт? Только на локалке ...
Просто не могу понять

11.10.2010, 17:53

Я не занимаюсь Web-программированием, я простой техпис и мне это требуется, чтобы избавить себя от лишнего ручного труда.
Так как мне это сделать? Мне говорили про функцию, типа GetCWD, или что-нибудь такое, но я не нашел. Уж будьте добры, подскажите...

@bazile · 11.10.2010, 18:05

Текущий каталог я не знаю как получить. В своих скриптах я пользуюсь такой функцией для определения в каком каталоге находится скрипт. Может она вам поможет:

Код

Function ScriptFolder()
    Dim rv, objFSO
    Set objFSO = WScript.CreateObject('Scripting.FileSystemObject')
    rv = objFSO.GetParentFolderName(WScript.ScriptFullName)
    If ' '<>Mid(rv, Len(rv), 1) Then rv = rv & ' '
    scriptFolder = rv
End Function

11.10.2010, 18:21

Премного благодарен. Работает.
Но, неужели в столь популярном (на мой взгляд со стороны) языке нет своей такой функции? Как-то неприятный осадок остается даже от столь скоротечного знакомства с этим языком...

@eklmn · 13.10.2010, 11:04

Это VB то популярный? Извините, must die...

@palva · 13.10.2010, 12:17

У меня работает такой скрипт:

Код

Set fso = CreateObject('Scripting.FileSystemObject')
Set fld = fso.GetFolder('.')
msgbox fld.Path
' Или короче
msgbox fso.GetFolder('.').Path
Set fso = Nothing

13.10.2010, 14:40

2palva Спасибо, так выглядит симпатичнее

(а работает также

))))

2SVOLOCH Значит мне просто показалось...

Новые блоги и статьи
Какой язык программирования лучший для разработки нейронных сетей InfoMaster 20.01.2025 В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .	Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .	Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .	Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .	Как объединить два словаря одним выражением в Python InfoMaster 19.01.2025 В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .

Asker
		1
	Текущая директория 14.09.2010, 18:20. Показов 2534. Ответов 9 Метки нет (Все метки) Извините за тупой вопрос, но как переменной в VBScript присвоить путь к текущей директории? Спасибо, что не обиделись...

cepera
	06.10.2010, 23:24	2
	такой же ответ. если ты не забыл, текущая директория - это точка '.' т.е. данные команды эквивалентны Код c:windows> dir c:windows Код c:windows> dir . соответственно две точки - это на уроень выше '..', т.е. эквивалентны команды Код c:windows> dir c: Код c:windows> dir .. если мы хотим перецти на два уровня выше а затем в директорию , скажем, games, то используем Код c:windowssystem32> cd ....games Код c:games> т.е. все как в юниксе, только слеши наоборот

Asker
	11.10.2010, 14:04	3
	Спасибо за ответ, но не помогло. Вот, что мне нужно (что я пытался сделать): Код dir = '.html ' ... Set doc = wrd.Documents.Open(dir & Args(0) & '.html') Не работает. Ругается на меня VBS!!! Вот если сказать ему 'C: uthtml ' & Args(0) & '.html' Это он поймет, а как мне быть?

@vers 3 / 3 / 6 Регистрация: 20.06.2010 Сообщений: 580
	11.10.2010, 15:03	4
	А для чего тебе такой скрипт? Только на локалке ... Просто не могу понять 0

Asker
	11.10.2010, 17:53	5
	Я не занимаюсь Web-программированием, я простой техпис и мне это требуется, чтобы избавить себя от лишнего ручного труда. Так как мне это сделать? Мне говорили про функцию, типа GetCWD, или что-нибудь такое, но я не нашел. Уж будьте добры, подскажите...

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,906
	11.10.2010, 18:05	6
	Текущий каталог я не знаю как получить. В своих скриптах я пользуюсь такой функцией для определения в каком каталоге находится скрипт. Может она вам поможет: Код Function ScriptFolder() Dim rv, objFSO Set objFSO = WScript.CreateObject('Scripting.FileSystemObject') rv = objFSO.GetParentFolderName(WScript.ScriptFullName) If ' '<>Mid(rv, Len(rv), 1) Then rv = rv & ' ' scriptFolder = rv End Function 0

Asker
	11.10.2010, 18:21	7
	Премного благодарен. Работает. Но, неужели в столь популярном (на мой взгляд со стороны) языке нет своей такой функции? Как-то неприятный осадок остается даже от столь скоротечного знакомства с этим языком...

@eklmn 3 / 3 / 3 Регистрация: 09.07.2008 Сообщений: 422
	13.10.2010, 11:04	8
	Это VB то популярный? Извините, must die... 0

@palva 4256 / 2952 / 688 Регистрация: 08.06.2007 Сообщений: 9,860 Записей в блоге: 4
	13.10.2010, 12:17	9
	У меня работает такой скрипт: Код Set fso = CreateObject('Scripting.FileSystemObject') Set fld = fso.GetFolder('.') msgbox fld.Path ' Или короче msgbox fso.GetFolder('.').Path Set fso = Nothing 0

Asker
	13.10.2010, 14:40	10
	2palva Спасибо, так выглядит симпатичнее (а работает также )))) 2SVOLOCH Значит мне просто показалось...