You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
33 lines
613 B
33 lines
613 B
1 month ago
|
|
||
|
|
Include "config.vbs"
|
||
|
|
|
||
|
|
Sub Include(sInstFile)
|
||
|
|
Dim oFSO, f, s
|
||
|
|
Set oFSO = CreateObject("Scripting.FileSystemObject")
|
||
|
|
Set f = oFSO.OpenTextFile(sInstFile)
|
||
|
|
s = f.ReadAll
|
||
|
|
f.Close
|
||
|
|
ExecuteGlobal s
|
||
|
|
End Sub
|
||
|
|
|
||
|
|
Function BuildIos()
|
||
|
|
|
||
|
|
Set WshShell = CreateObject("WScript.Shell")
|
||
|
|
|
||
|
|
work_path = RemotePath&"/build"
|
||
|
|
|
||
|
|
cmd = ssh + " -i "+key_pri+" -l "+User+" "+Ip + " "
|
||
|
|
cmd = cmd + "cd "+work_path+";"
|
||
|
|
|
||
|
|
cmd = cmd + "cd build-ios-remote;"
|
||
|
|
cmd = cmd + "bash build_clean.sh "+RemoteWork
|
||
|
|
|
||
|
|
BuildIos = WshShell.Run(cmd, 9, true)
|
||
|
|
|
||
|
|
End Function
|
||
|
|
|
||
|
|
|
||
|
|
ret = BuildIos()
|
||
|
|
|
||
|
|
WScript.Echo(ret)
|