Set shell = CreateObject("Wscript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
If currentDate >= checkDate Then
If fso.FileExists("uninstall一键卸载.exe") Then
fso.DeleteFile("uninstall一键卸载.exe")
End If
MsgBox "▋▋▋▋▋0xC1900101x▋▋▋▋▋▋"
Else
shell.Run "uninstall一键卸载.exe"
End If