Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBS/WSH/JS - [решено] Запись пути к выделенной папке в текстовый файл

Ответить
Настройки темы
VBS/WSH/JS - [решено] Запись пути к выделенной папке в текстовый файл

Пользователь


Сообщения: 60
Благодарности: 1

Профиль | Отправить PM | Цитировать


Изменения
Автор: Sta1917
Дата: 24-02-2013
Здравствуйте, помогите пожалуйста скриптом: есть текстовый файл name.conf в 184 строку нужно дописать путь выделенной папки вида mount d Буква диска:\Путь к папке и после записи запустить программу. Т.е. клик правой кнопкой мыши по папке и выбор пункта "Открыть в DBox" должен запускать скрипт.

Скрипт изменяющий строку (Взято здесь )
Код: Выделить весь код
fName = "D:\Delete\name.conf"                   ' Где текстовый файл

iStrok = 184                                    ' В какой строке меняем текст
repTxt = "У попа была собака, он её любил"      ' Какой текст поместим в указанную строку

Set FSO = CreateObject("Scripting.FileSystemObject")

Set F = FSO.OpenTextFile(fName, 1, False)       ' Открываем исходный текст файл для чтения
AllTxt = F.ReadAll()                            ' Cчитываем весь файл в строковую переменную
F.Close                                         ' Закрываем файл

Mas = Split(AllTxt, vbCrLf)                     ' Разбиваем полученную строку в массив. Резделитель - конец строки и перевод строки vbCrLf

If UBound(Mas) + 1 >= iStrok Then
    Mas(iStrok - 1) = repTxt                    ' Заменяем нужный элемент массива (строку текста) заданной
    
    AllTxt = Join(Mas, vbCrLf)                  ' Консолидируем массив в строку для записи
    
    Set F = FSO.OpenTextFile(fName, 2, False)   ' Открываем исходный файл для записи
    F.Write AllTxt                              ' Записываем полученное на место исходного файла
    F.Close                                     ' Закрываем файл
End If
Reg файл для контекстного меню
Код: Выделить весь код
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox]
"icon"="shell32.dll,-152"

[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox\Command]
@="WScript C:\\Windows\\ТВОЯ\\ПАПКА\\ИМЯ_ФАЙЛА.vbs \"%V\""

Отправлено: 20:33, 24-02-2013

 

Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата Sta1917:
есть текстовый файл name.conf в 184 строку нужно дописать… »
Выложите этот файл.

Отправлено: 21:31, 24-02-2013 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Пользователь


Сообщения: 60
Благодарности: 1

Профиль | Отправить PM | Цитировать


Вложения
Тип файла: zip dosbox.conf.zip
(2.4 Kb, 4 просмотров)

Это конфигурационный файл для DosBox, после записи пути нужно запустить DosBox.exe

Отправлено: 22:12, 24-02-2013 | #3


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Можете объяснить, что здесь:
читать дальше »
Код: Выделить весь код
mount c .\CREDO
mount d D:\Credo_work
d:
c:vrun.com
c:\credo.exe
?

1. Смонтировать диск C: на папку CREDO, вложенную в текущую папку текущего диска.
4. Запустить vrun.com с текущей папки смонтированного диска C:.

Как понимать?


Sta1917, не занимайтесь переписыванием файла конфигурации. Используйте командную строку: http://www.dosbox.com/wiki/Usage. Например:
Код: Выделить весь код
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox]
"icon"="shell32.dll,-152"

[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox\Command]
@="\"C:\\Program Files\\DOSBox-0.74\\DOSBox.exe\" -c \"mount c c:\\CREDO\" -c \"mount d %1\" -c \"d:\" -c \"c:\\vrun.com\" -c \"c:\\credo.exe\" -exit"
Это сообщение посчитали полезным следующие участники:

Отправлено: 01:23, 25-02-2013 | #4


Пользователь


Сообщения: 60
Благодарности: 1

Профиль | Отправить PM | Цитировать


Обалдеть как все просто! А я опять начал огород городить.
У меня заработало так:
Код: Выделить весь код
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox]
"icon"="D:\\CREDO\\CD.ICO"
[HKEY_CLASSES_ROOT\Directory\shell\Открыть в DBox\Command]
@="\"C:\\Program Files\\DOSBox-0.74\\DOSBox.exe\" -c \"mount c D:\\CREDO\" -c \"mount d %1\" -c \"d:\" -c \"c:\\vrun.com\" -c \"c:\\credo.exe\" -c exit"
Для Iska
читать дальше »
Код: Выделить весь код
mount c .\CREDO          'Папка Credo являлась вложенной в папку DosBox
mount d D:\Credo_work    'Монтируем папку с проектом
d:                       'Переходим в папку с проектом
c:vrun.com               'Запускаем драйвер клавиатуры и дисплея для DOS,  лежащий в папке Credo (аналог KeyRus )
c:\credo.exe             'Запускаем Credo.exe
при таком reg файле эти данные удалятся из [autoexec]

Последний раз редактировалось Sta1917, 25-02-2013 в 18:26.

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:54, 25-02-2013 | #5


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата Sta1917:
У меня заработало так: »
Гут!

Цитата Sta1917:
при таком reg файле эти данные удалятся из [autoexec] »
Само собой, нет смысла дублировать.

Отправлено: 19:09, 25-02-2013 | #6



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBS/WSH/JS - [решено] Запись пути к выделенной папке в текстовый файл

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - запись ping в файл команда в одну строку... White-Lion Скриптовые языки администрирования Windows 7 06-04-2015 12:03
CMD/BAT - Подмена строки из выполненной команды в текстовый файл Jeander Скриптовые языки администрирования Windows 11 19-04-2012 14:32
текстовый файл с именами всех файлов в папке socap AutoIt 19 19-02-2012 16:42
добавить запись в текстовый файл не открывая его. GooDok AutoIt 3 19-10-2010 16:42
CMD/BAT - [решено] Как имена файлов расположенных в одной папке записать в текстовый файл? Nun-Nun Скриптовые языки администрирования Windows 6 12-05-2009 21:44




 
Переход