fix: 完善windows
This commit is contained in:
parent
dea97cf9cd
commit
66303429e3
28
下载hilog.vbs
28
下载hilog.vbs
@ -1,28 +0,0 @@
|
|||||||
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
|
|
||||||
Loading…
x
Reference in New Issue
Block a user