[xp] xp sluit programma's niet (altijd) af

[SkyKnife]

Velen kennen dit probleem vast wel, XP die processes niet goed sluit.

In mijn geval is het voornamelijk "hl.exe" (half-life/counter-strike).
Intussen heeft iemand vast een oplossing? (ja ik heb gezocht btw, van adje mag nieuw topic)

[SkyKnife]

Het probleem is de 'compatibility mode' van XP. Ik heb het kunnen oplossen door een 'hl.vbs' file te maken. Volgende stuk code is de inhoud:

code:

'version v0.05 (rc)
'author: Wired (#wired on quakenet)
'

Dim hlExecPath, staticArgs, cmdLineArgs, HLcmdLine

'-----Settings--------------------------------------------------------
'add any static args here
'---------------------------------------------------------------------
    staticArgs = "-toconsole -noipx -noforcemparms -noforcemaccel -noforcemspd" 
'---------------------------------------------------------------------


'-----This Function Reads The Install Path from HL out of registry-----
function readHLInstallPath ()
    Dim WshShell
    Set WshShell = WScript.CreateObject("WScript.Shell")

    readHLInstallPath = WshShell.RegRead("HKEY_CURRENT_USER\Software\Valve\Half-Life\InstallPath")
end function
'-----

'-----This Function puts all commandline arguments into 1 string-----
function readCmdLineArgs ()
    Dim objArgs, argString
    Set objArgs = WScript.Arguments

    argString = ""

    For I = 0 to objArgs.Count - 1
      argString = argString &" "& objArgs(I)
    Next

    readCmdLineArgs = argString

end function
'-----

sub runHL ()
    Dim WshShell, oExec

    Set WshShell = CreateObject("WScript.Shell")

    Set oExec = WshShell.Exec( HLcmdLine )

    WScript.Echo ( "Quit HL" )

    If ( oExec.Status = 0 ) Then
        oExec.Terminate
        'WScript.Echo ( "KILLED" )
    End If
end sub
'-----


'-----Main Program
hlExecPath = readHLInstallPath() & "\hl.exe"
cmdLineArgs = readCmdLineArgs()

HLcmdLine = hlExecPath &" "& cmdLineArgs &" "& staticArgs 

runHL ()

WScript.Quit()
'-----

zoek termen: Half-Life Counter-Strike hl.exe ghost process killer XP compatibility mode