Программирование "удобняшек" на VBScript (Часть 2) - [12] :: Прикладное программирование :: Компьютерный форум Ru.Board

Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?

Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Программирование "удобняшек" на VBScript (Часть 2)

Модерирует : ShIvADeSt
Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67

Открыть новую тему

Написать ответ в эту тему

Moderator

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Вопросы, задачи и их решения по VBScript.

Мануал (english, 600 Кб). | Зеркало
MS Scripting 5.6 (700 КБ), включает последнюю версию VBS. Владельцам XP/2000(?) должен быть не нужен. | Зеркало
Немного на wikiпедии.
Предыдущие части: 1

Смежные темы:
Сценарии Windows
Командная строка, батники\сценарии (bat, cmd)
Скрипты KiXtart

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 04:12 12-07-2011 | Исправлено: Smitis, 23:28 26-02-2018

jeykey

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

fire4x

Цитата:

А каким образом? Можете объяснить на примере любой службы?

На примере службы "Удаленный реестр": Подробнее...

Всего записей: 21 | Зарегистр. 29-08-2006 | Отправлено: 09:17 02-04-2012

Black_Lung Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору MatroskinK vbs не дружит с двоичным умножением, но есть идея..
	Всего записей: 275 \| Зарегистр. 09-10-2008 \| Отправлено: 18:59 02-04-2012

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

проблема решена. Vbs поддерживает деление с преобразованием результата в подтип Currency. А потом уже анализирую, как строку, полученный результат...
Black_Lung, а какая была идея?

Всего записей: 5 | Зарегистр. 10-12-2006 | Отправлено: 21:00 02-04-2012

Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

MatroskinK
У меня было идея умножения по таблице двоичных 10, можно работать с довольно большими числами с 64 битными и больше
Сегодня доделал рисует^ красивую горочку из 0 и 1:
Подробнее...

Currency и hex? тоже интересно как.

fire4x

Удаление папки

Всего записей: 275 | Зарегистр. 09-10-2008 | Отправлено: 11:27 03-04-2012

smaharbA Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Подробнее... [/more]
	Всего записей: 8 \| Зарегистр. 08-04-2012 \| Отправлено: 15:34 08-04-2012 \| Исправлено: smaharbA, 15:34 08-04-2012

Junior Member

Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Set ObjShell=CreateObject("WScript.Shell")
RegStr="HKLM\software\test"
ObjShell.RegWrite "RegStr&Birthday","1303","reg_SZ"

Ошибка в строке 3 символ 1.
Недопустимы вызов или аргумент процедуры.
Кто может подсказать в чем не так?

Всего записей: 92 | Зарегистр. 29-07-2008 | Отправлено: 19:16 09-04-2012

smaharbA Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору ObjShell.RegWrite RegStr,"1303","reg_SZ"
	Всего записей: 8 \| Зарегистр. 08-04-2012 \| Отправлено: 19:23 09-04-2012

timurgall Junior Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору Такая же ошибка.
	Всего записей: 92 \| Зарегистр. 29-07-2008 \| Отправлено: 08:51 10-04-2012 \| Исправлено: timurgall, 08:52 10-04-2012

smaharbA Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору HKLM\software\test - это раздел ? если да то ObjShell.RegWrite RegStr & "\Birthday","1303","REG_SZ"
	Всего записей: 8 \| Зарегистр. 08-04-2012 \| Отправлено: 09:32 10-04-2012

Capacitor

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Уважаемые форумчане!
Большая просьба помочь создать скрипт по переименованию файлов с использованием в имени файла вчерашней даты. Поискав по форуму, сделал вывод, что оптимальным решением будет использование скрипта vbs. Нашел пост по использованию даты на день раньше текущей (http://forum.ru-board.com/topic.cgi?forum=62&topic=9040&start=760#17), но так как я в VBS не разбираюсь абсолютно, хотел бы вас попросить помочь в создании скрипта, который должен ежесуточно переименовывать текстовый файл(файл в папке автоматически создается прикладной программой), имя которого состоит из текстовой части и даты в формате YYMMDD. Пример имени файла: Maket_120410.txt. Задача состоит в переименовании в имени файла текущей даты во вчерашнюю дату. Текстовая часть имени файла и его расширение не изменяется, но должна быть возможность коррекции этого имени и расширения в скрипте(при необходимости). Т.е. фактически, файлу, с нужным расширением нужно задать, новое имя полностью.
Если не трудно, подскажите, с какими параметрами нужно запускать скрипт для переименования файла?

Всего записей: 2 | Зарегистр. 02-10-2006 | Отправлено: 11:21 10-04-2012

Junior Member

Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Цитата:

HKLM\software\test - это раздел ? если да то
ObjShell.RegWrite RegStr & "\Birthday","1303","REG_SZ"

smaharbA Спасибо. Я много раз и по разному пытался изменять аргументы но ни разу не менял "reg_SZ" на "REG_SZ" и именно из-за него была ошибка.

Добавлено:
Set ObjShell=CreateObject("WScript.Shell")

ОbjShell.RegWrite "HKLM\X\X\X\Windows\Layers\M:\\WORKDB\\CLIENT\\deal32.exe","DisableNXShowUI","REG_SZ"

В итоге она делает не ключ "M:\\WORKDB\\CLIENT\\deal32.exe" со значением DisableNXShowUI
А разделы вниз по дереву Layers\M:\WORKDB\CLIENT\ и уже ключ deal32.exe со значение DisableNXShowUI
Подмена на переменную ничего не дает.
Как ей так обьяснить чего я хочу, чтобы она поняла?

Всего записей: 92 | Зарегистр. 29-07-2008 | Отправлено: 13:54 10-04-2012

jeykey Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору timurgall Можно через WMI сделать Подробнее...
	Всего записей: 21 \| Зарегистр. 29-08-2006 \| Отправлено: 20:33 10-04-2012 \| Исправлено: jeykey, 23:14 10-04-2012

smaharbA Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору ОbjShell.RegWrite "HKLM\X\X\X\Windows\Layers\M:/WORKDB/CLIENT/deal32.exe","DisableNXShowUI","REG_SZ" либо вми
	Всего записей: 8 \| Зарегистр. 08-04-2012 \| Отправлено: 06:30 11-04-2012

Black_Lung Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Capacitor Подробнее...
	Всего записей: 275 \| Зарегистр. 09-10-2008 \| Отправлено: 14:51 11-04-2012

Capacitor Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Black_Lung Спасибо огромное! Очень выручили! Не знаю как, но все работает четко, и даже лучше, чем я думал!!! Еще раз спасибо!
	Всего записей: 2 \| Зарегистр. 02-10-2006 \| Отправлено: 14:27 12-04-2012

tgkonvent

Full Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Всем доброго времени суток!
Помогите написать скрипт по деинсталяции AutoCAD любой версии.
Если взять строку, которую он прописывает в реестре Uninstall, то там запускается оболочка в котороый пользователь должен сам выбрать что он хочет делать - обновить, исправить или деинсталлировать Автокад
А, мне необходим скрипт в котором будет производиться безусловное удаление автокада с машины, без всяких запросов.

Всего записей: 438 | Зарегистр. 02-11-2005 | Отправлено: 14:47 12-04-2012

megamozg13 Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору tgkonvent Уважаемый, может вам поискать портативные сборки, не требующие инсталяции и не оставляющие следов на машине?
	Всего записей: 313 \| Зарегистр. 27-07-2004 \| Отправлено: 15:20 12-04-2012

tgkonvent

Full Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:

Уважаемый, может вам поискать портативные сборки, не требующие инсталяции и не оставляющие следов на машине?

Поишу и такие сборки! А, через скрипт есть возможность удаления такой программы?

Всего записей: 438 | Зарегистр. 02-11-2005 | Отправлено: 15:31 12-04-2012

kazavo4ka Advanced Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору tgkonvent http://usa.autodesk.com/adsk/servlet/ps/dl/item?siteID=123112&id=16077500&linkID=9240617 при необходимости модифицируй под свои задачи
	Всего записей: 1655 \| Зарегистр. 17-02-2006 \| Отправлено: 15:44 12-04-2012

timurgall Junior Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору jeykey, smaharbA Спасибо, получилось.
	Всего записей: 92 \| Зарегистр. 29-07-2008 \| Отправлено: 08:49 13-04-2012

Открыть новую тему

Написать ответ в эту тему

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Программирование "удобняшек" на VBScript (Часть 2)

Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC