2014-10-11 7 views
0

Это vbs. Я не уверен, что я делаю неправильно.Как добавить переменную в местоположение файла vbscript/html

Sub Window_onLoad 
    Set objSysInfo = CreateObject("WinNTSystemInfo") 
    strUserName = objSysInfo.UserName 
End Sub 
Sub OpenCP 
    CreateObject("WScript.Shell").Run("""C:\Users\" & strUserName & "\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\System Tools\Control Panel.lnk""") 
End Sub 

Вот как я обращаюсь к югу.

<input type="button" value="Open Control Panel" name="open_cp" onClick="OpenCP" id="button"> 

ответ

1
CreateObject("WScript.Shell").Run "control" 

все, что нужно сделать.

+0

это здорово! Как бы я сделал переменный путь для других путей. – overmyer2013

+0

Ваш код в порядке, но вы сделали предположения. IE - это папка пользователя так же, как и имя? Вы можете получить свою папку либо путем расширения строк среды (% userprofile%). ИЛИ msgbox CreateObject («Shell.Application»). Пространство имен (& h10) .self.path. Папка AppData - это 0x1a и 0x1c, профиль - 0x28, startmenu - 0xb – Noodles

+0

. Я нашел другой способ, который я просто бросил вместе, это была моя проблема, я не могу получить sub для вызова внутри другого sub idk, если это возможно, также я попытался использовать% USERNAME%, как в файле bat, но это не работает для всех машин по какой-то причине – overmyer2013

Смежные вопросы