deleted
parent
bbb866fcbf
commit
1c501fa90b
|
@ -1,19 +0,0 @@
|
|||
Function ReadFromRegistry(strRegistryKey, strDefault)
|
||||
Dim WSHShell, value
|
||||
|
||||
On Error Resume Next
|
||||
Set WSHShell = CreateObject("WScript.Shell")
|
||||
value = WSHShell.RegRead( strRegistryKey )
|
||||
|
||||
If err.number <> 0 Then
|
||||
readFromRegistry = strDefault
|
||||
Else
|
||||
readFromRegistry = value
|
||||
End If
|
||||
|
||||
Set WSHShell = Nothing
|
||||
End Function
|
||||
|
||||
str = readFromRegistry("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Valve\Steam\InstallPath", "InstallPath")
|
||||
|
||||
wscript.echo "The value is " & str & "steamapps\common\Team Fortress 2\tf\cfg"
|
Loading…
Reference in New Issue