Dedcase
12-03-2015, 16:27
Приветствую! Есть такая проблема, написано несколько строк на 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
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