파일 위치에 변수를 추가하는 방법 vbscript/html

Question

이것은 vbs입니다. 내가 뭘 잘못하고 있는지 모르겠다.

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"> 

Answer 1

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

는 당신이 필요로하는 모두이다.