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

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

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

Новый участник


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

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


Приветствую! Есть такая проблема, написано несколько строк на vbs:
Dim Wall
Wall = CInt(Int((2 * Rnd()) + 1))
Set objWshShell = WScript.CreateObject("Wscript.Shell")
strPath2DestWallpaper = "D:\Wall\значение переменной Wall.bmp"
objWshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\Desktop\Wallpaper", strPath2DestWallpaper, "REG_SZ"
objWshShell.Run """%SystemRoot%\System32\RUNDLL32.EXE"" user32.dll,UpdatePerUserSystemParameters", 0, True

Как значение переменной Wall (тут получается "рандомная" цифра от 1 до 2) вставить в путь вместо "значение переменной Wall" ? Необходимо для случайного выбора фона рабочего экрана из картинок с именами 1.bmp и 2.bmp

Отправлено: 16:27, 12-03-2015

 

Ветеран


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

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


Код: Выделить весь код
strPath2DestWallpaper = "D:\Wall\" & CStr(Wall) & ".bmp"

Отправлено: 17:15, 12-03-2015 | #2



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

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


Новый участник


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

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


не буду создавать новые темы.
А как укзывать весь путь в переменной?

Код: Выделить весь код
dim log, text
log = C:\hikka\log.txt

Text = Text & "START " & Date &  " "  & time  
set FSO = CreateObject("Scripting.FileSystemObject")
set OFile = FSO.OpenTextFile(" log ", 8, True)
 OFile.Write(Text & vbCrLf)
OFile.Close

Отправлено: 21:42, 10-12-2015 | #3


Ветеран


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

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


Код: Выделить весь код
log = "C:\hikka\log.txt"
…
set OFile = FSO.OpenTextFile(log, 8, True)
В чём смысл:
Цитата blacktor:
Text = Text & »
?
Это сообщение посчитали полезным следующие участники:

Отправлено: 03:17, 11-12-2015 | #4


Новый участник


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

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


Iska, наверно его нет)

Код: Выделить весь код
dim log, text
log = C:\hikka\log.txt

Text = "START " & Date &  " "  & time  
set FSO = CreateObject("Scripting.FileSystemObject")
set OFile = FSO.OpenTextFile(" log ", 8, True)
 OFile.Write(Text & vbCrLf)
OFile.Close

Отправлено: 16:18, 11-12-2015 | #5


Ветеран


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

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


Цитата blacktor:
Код: Выделить весь код
log = C:\hikka\log.txt
…
set OFile = FSO.OpenTextFile(" log ", 8, True)
»
Могу повторить:
Код: Выделить весь код
log = "C:\hikka\log.txt"
…
set OFile = FSO.OpenTextFile(log, 8, True)
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:14, 11-12-2015 | #6



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

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
VBS/WSH/JS - Как в путь вставить переменную, помогите pioli Скриптовые языки администрирования Windows 1 06-01-2013 12:44
Любой язык - [решено] Присвоить значение переменной(исключая заданные) zion87 Скриптовые языки администрирования Windows 6 11-12-2011 20:29
VBS/WSH/JS - [решено] путь к файлу mamont1 Скриптовые языки администрирования Windows 2 18-07-2011 16:05
C/C++ - Обьекты,Form, путь к файлу. K1nDeR45 Программирование и базы данных 0 06-10-2010 12:08
[решено] Вставить в окно текст из переменной FlatX007 AutoIt 3 11-05-2009 14:52




 
Переход