mirror of
https://github.com/putyy/res-downloader.git
synced 2026-01-12 14:14:55 +08:00
26 lines
840 B
XML
Executable File
26 lines
840 B
XML
Executable File
<job id="test">
|
|
<script language="VBScript" src="util.vbs" />
|
|
<script language="VBScript" src="regUtil.vbs" />
|
|
<script language="VBScript">
|
|
CheckZeroArgs("type A as first arg!!")
|
|
|
|
DetermineOSArchitecture()
|
|
LoadRegistryImplementationByOSArchitecture()
|
|
|
|
'On Error Resume Next
|
|
|
|
Dim key: key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
|
|
Dim value: value = "AppData"
|
|
|
|
ParseHiveAndSubKey key, constHive, strSubKey
|
|
|
|
GetExpandedStringValue constHive, strSubKey, value, exResult
|
|
WriteLine "GetExpandedStringValue: " & exResult
|
|
|
|
GetStringValue constHive, strSubKey, value, nResult
|
|
WriteLine "GetStringValue: " & nResult
|
|
|
|
set ws = createobject("Wscript.shell")
|
|
WriteLine "regread: " & ws.regread(key & "\AppData")
|
|
</script>
|
|
</job> |