File: OpenLogsFolder.vbs

package info (click to toggle)
0ad 0.0.21-2
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 54,068 kB
  • sloc: cpp: 230,527; ansic: 23,115; python: 13,559; perl: 2,499; sh: 948; xml: 776; makefile: 696; java: 533; ruby: 229; erlang: 53; sql: 21
file content (5 lines) | stat: -rw-r--r-- 275 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
 
' Simple VBScript to open the 0 A.D. logs folder
' the path varies on different versions of Windows
Set objShell = CreateObject("Shell.Application")
' 0x1C is equivalent to the ssfLOCALAPPDATA constant in VB
objShell.Explore objShell.Namespace(&H1C&).Self.Path & "\0ad\logs"