VBScriptから外部コマンド(DOSコマンド)を管理者権限で実行したい

Question

VBScriptから外部コマンド(DOSコマンド)を管理者権限で実行したいです。
下記のようにしてみたのですが、管理者権限でコマンドプロンプトは立ち上がりましたが
その後のコマンドは実行されませんでした。。
管理者権限で実行までするにはどうしたらよいのでしょうか？

rc = MsgBox(".NetFrameworkを有効化します。よろしいですか？", vbYesNo)
If rc = vbYes Then
    Set objShell = WScript.CreateObject("WScript.Shell")
    objShell.Run "runas /user:administrator cmd"
    objShell.Run "Dism.exe /online /enable-feature /featurename:NetFX3 /All /Source:C:\sources\sxs /LimitAccess"
    Set objShell = Nothing
End If