29 lines
832 B
Plaintext
29 lines
832 B
Plaintext
Dim toolchainPath, downloadPath, timestamp, objShell, objFSO, cmd
|
|
|
|
toolchainPath = ".\window"
|
|
downloadPath = "..\logs"
|
|
|
|
' 创建 Shell 和文件系统对象
|
|
Set objShell = CreateObject("WScript.Shell")
|
|
Set objFSO = CreateObject("Scripting.FileSystemObject")
|
|
|
|
timestamp = Year(Now) & Right("0" & Month(Now), 2) & Right("0" & Day(Now), 2) & "_" & _
|
|
Right("0" & Hour(Now), 2) & Right("0" & Minute(Now), 2) & Right("0" & Second(Now), 2)
|
|
|
|
If Not objFSO.FolderExists(toolchainPath) Then
|
|
WScript.Echo "Error: Toolchain path does not exist: " & toolchainPath
|
|
WScript.Quit
|
|
End If
|
|
|
|
On Error Resume Next
|
|
objShell.Run "cmd.exe /c "
|
|
If Err.Number <> 0 Then
|
|
WScript.Echo "Error executing command: " & Err.Description
|
|
On Error GoTo 0
|
|
WScript.Quit
|
|
End If
|
|
On Error GoTo 0
|
|
|
|
Set objShell = Nothing
|
|
Set objFSO = Nothing
|