add first test

This commit is contained in:
Bassem Girgis
2020-11-12 10:40:37 -06:00
parent b2bac942b8
commit 0341fd46fd
11 changed files with 105 additions and 4 deletions

22
vsc.vbs Normal file
View File

@@ -0,0 +1,22 @@
Option Explicit
Dim fsObj
Dim wshShell
Dim scriptDir
Dim strCommand1
Dim strCommand2
Set fsObj = CreateObject("Scripting.FileSystemObject")
Set wshShell = WScript.CreateObject("WScript.Shell")
scriptDir = fsObj.GetParentFolderName(WScript.ScriptFullName)
strCommand1 = Chr(34) & scriptDir & "\.vscode\pyenv.bat" & Chr(34)
strCommand2 = Chr(34) & scriptDir & "\.vscode\vsc.bat" & Chr(34)
' x = msgbox(strCommand1,0, "Launch Command")
' x = msgbox(strCommand2,0, "Launch Command")
Call wshShell.Run(strCommand1, 1, True)
Call wshShell.Run(strCommand2, 0, True)