8,330
edits
Paradox-01 (talk | contribs) (cleaning MT main page later when all the script pieces have been transfered over here) |
Paradox-01 (talk | contribs) (more snippets) |
||
Line 31: | Line 31: | ||
' for 32-bit | ' for 32-bit | ||
' INFO : nt-x86\ | ' INFO : nt-x86\ | ||
====Directories==== | |||
' this can be useful for default locations like when selecting a folder | |||
DesktopPath = CreateObject("WScript.Shell").SpecialFolders("Desktop") | |||
logmessage DesktopPath | |||
====Message box==== | |||
' okay-only | |||
msgbox "message", 0, "title" | |||
' okay and cancel | |||
MyVar = msgbox ("message", 1, "title") | |||
if MyVar = 1 then | |||
logmessage "OK button clicked" | |||
logmessage MyVar ' = 1 | |||
else | |||
logmessage "Cancel button clicked" | |||
logmessage MyVar ' = 2 | |||
end if | |||
====Input box==== | |||
MyVar = inputbox ("message", "title" , "pre-entered content") | |||
if MyVar = false then | |||
logmessage "Cancel button clicked" | |||
else | |||
logmessage "OK button clicked" | |||
logmessage MyVar | |||
end if | |||
====Check executable version==== | |||
' taking OniSplit as example | |||
Set objFSO = CreateObject("Scripting.FileSystemObject") | |||
logmessage objFSO.GetFileVersion("F:\Program Files (x86)\Oni\Edition\install\onisplit.exe") | |||
' result looks like this: | |||
' INFO : 0.9.59.0 | |||
edits