Windows XP Service Pack 3 'ün (SP3) Yeniden Başlama Problemi ve Çözümü

'Windows XP' forumunda UquR tarafından 22 Mart 2009 tarihinde açılan konu

  1. UquR

    UquR Üye

    Sponsorlu Bağlantılar
    Windows XP Service Pack 3 'ün (SP3) Yeniden Başlama Problemi ve Çözümü konusu Bu problem AMD işlemcili bilgisayarlarda boy gösteriyor.Nedeni ise Intel'in PPM sürücülerinin açılışta çalışacak şekilde ayarlanması.Aşağıdaki script'i kullanarak Intel'in PPM sürücülerini devredışı bırakabilirsiniz.

    Aşağıdaki kodları eksiksiz olarak not defterine yapıştırın ve uzantısını .vbs yaparak kaydedin.Ardından güvenli mod'a geçerek çalıştırın.



    Kod:
    ' GetOSData.vbs
    ' -------------------------------------------------------'
    'Option Explicit

    Dim objWMIService, objItem, colItems, strComputer, item
    ReDim aComputers(0) 'Remember, this doesn't declare the size. It declares the maximum subcript.

    if WScript.Arguments.Count > 0 then
    ReDim aComputers(WScript.Arguments.Count-1)
    For i = 0 to (WScript.Arguments.Count-1)
    aComputers(i) = WScript.Arguments(i)
    Next
    else
    ' aComputers(0) = InputBox("Please type the name of the computer you wish to retrieve the updates from. For the local computer, type a '.'",_
    ' "Target computer",_
    ' ".")
    aComputers(0) = "."
    end if


    if aComputers(0) = "" then
    WScript.echo "You must enter a computer to retrieve updates from. Exiting"
    WScript.quit
    end if

    For i = 0 To UBound(aComputers)
    MsgBox "Checking the computer " & aComputers(i)
    'Run the query
    Set objWMIService = GetObject("winmgmts://" & aComputers(i) & "/root/cimv2")
    Set colItems = objWMIService.ExecQuery ("Select * from Win32_Processor")

    'dim strValues
    For Each objItem in colItems
    For Each item in objItem.Properties_
    if item.name = "Name" then
    if(InStr(item.value,"AMD")) then
    MsgBox "The computer " & aComputers(i) & " appears to have an AMD processor."
    removeIntelppm(aComputers(i))
    else
    MsgBox "The computer " & aComputers(i) & " appears to have an Intel processor. No need to do anything else."
    end if
    end if
    Next
    Next
    Next

    function removeIntelppm (computer)
    ' This is the function that actually does the work. It checks whether
    ' the intelppm registry key exists, and if it does, asks the user whether
    ' to delete it.

    dim message

    ' Turn on error handling for this function. It has some sensitive operations
    on error resume next
    Err.Clear

    ' We have to read the registry using WMI because WSH does not provide the functionality we need
    Dim bKey, sKey, retVal, objReg, arrValueNames, arrValueTypes
    const HKLM = &H80000002
    Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
    & computer & "\root\default:StdRegProv")

    sKey = "SYSTEM\CurrentControlSet\Services\IntelPPM"


    retVal = objReg.EnumValues(HKLM, sKey, arrValueNames, arrValueTypes)

    ' Now we need to check the return values. Here are the possibilities
    'Key doesn't exist: retVal = 2
    'Key exists with one or more named values: retval = 0, arrValueNames = nonNull
    'Key exists with only a default value that is empty: retval = 0, arrValueNames = null

    if retval = 2 then
    MsgBox "The intelppm key does not exist on this computer. You should be ready to install Windows XP Service Pack 3"
    removeIntelPPM = false
    exit function
    end if

    ' If we are here we have the registry key open. Read the value:
    Dim flagValue, sCompatFlags, newFlag
    retVal = objReg.GetDWORDValue(HKLM, sKey, "Start", startValue)

    if retVal <> 0 then
    ' Error - This probably means the Start value does not exist. Bail.
    MsgBox "The intelppm key exists, but has no Start value. This is an error condition. You should manually " &_
    "investigate the value of the Start value of ""HKLM\SYSTEM\CurrentControlSet\Services\IntelPPM""" &_
    "If it is set to anything other than 4, and you have an AMD-based computer, set it to 4 before " &_
    "attempting to install Service Pack 3."
    removeIntelPPM = false
    exit function
    end if

    ' If we are here, we have the start value. Read it

    if(startValue <> 4) then
    ' It's set to start. Ask if we should disable it
    if MsgBox("The IntelPPM driver is enabled on this computer. Would you like me to disable it?", vbYesNo,"Question") = 6 then
    retVal = objReg.SetDWORDValue(HKLM, sKey, "Start", 4)
    else
    MsgBox "Warning, you should not attempt to install Windows XP Service Pack 3 on this AMD-based computer without first disabling " &_
    "the IntelPPM driver."
    removeIntelPPM = false
    exit function
    end if
    if retVal <> 0 then
    'This time we have a real error to trap
    if bLog then
    message = "Unable to write the the new start value to the registry " & vbCrLf & _
    " The error returned from the system was: " & vbCrLf & _
    retVal & vbCrLf
    end if
    removeIntelPPM = false
    exit function
    else
    MsgBox "Successfully disabled the IntelPPM driver. Please reboot before you install Windows XP Service Pack 3."
    end if
    else
    MsgBox "The IntelPPM driver is already set to disabled on this computer. You should be ready to install Windows XP Service Pack 3."
    end if
    ' It all looks good.
    removeIntelppm = true
    end function


    WScript.Quit
    '' SIG '' Begin signature block
    '' SIG '' MIIR+QYJKoZIhvcNAQcCoIIR6jCCEeYCAQExCzAJBgUr
    '' SIG '' DgMCGgUAMGcGCisGAQQBgjcCAQSgWTBXMDIGCisGAQQB
    '' SIG '' gjcCAR4wJAIBAQQQTvApFpkntU2P5azhDxfrqwIBAAIB
    '' SIG '' AAIBAAIBAAIBADAhMAkGBSsOAwIaBQAEFNgvadQLmwP5
    '' SIG '' Qu8B3CEyTMxpWdLVoIIO3TCCA0AwggIooAMCAQICCwEA
    '' SIG '' AAAAARbPF4ykMA0GCSqGSIb3DQEBBQUAMGMxCzAJBgNV
    '' SIG '' BAYTAkJFMRkwFwYDVQQKExBHbG9iYWxTaWduIG52LXNh
    '' SIG '' MRYwFAYDVQQLEw1PYmplY3RTaWduIENBMSEwHwYDVQQD
    '' SIG '' ExhHbG9iYWxTaWduIE9iamVjdFNpZ24gQ0EwHhcNMDcx
    '' SIG '' MjEyMTYwMjE1WhcNMDgxMjEyMTYwMjE1WjBaMQswCQYD
    '' SIG '' VQQGEwJVUzEcMBoGA1UEAxMTSmVzcGVyIE0uIEpvaGFu
    '' SIG '' c3NvbjEtMCsGCSqGSIb3DQEJARYeamVzcGVyX21fam9o
    '' SIG '' YW5zc29uQGhvdG1haWwuY29tMIGfMA0GCSqGSIb3DQEB
    '' SIG '' AQUAA4GNADCBiQKBgQDFIJapVPJBUvE8IRPN6Ptgpc+F
    '' SIG '' 638UXyr6WPoyWEg/JHQPUBonhScx/NbgK/7aoMGJbNVc
    '' SIG '' sl7h6GPl2nLXeMg+/6Bx9OGLgwXiMGec3Ke7bIyTPhwh
    '' SIG '' soRl8AtAy8B9YvGU5C6XIu9BkdDrQNTcy9aDmb9BguYp
    '' SIG '' 9OIJfmxxzB9AxQIDAQABo4GBMH8wEQYJYIZIAYb4QgEB
    '' SIG '' BAQDAgQQMA4GA1UdDwEB/wQEAwIE8DAfBgNVHSMEGDAW
    '' SIG '' gBTSW/NLJkulsOdd/VZ/9vEuOE5ToDA5BgNVHR8EMjAw
    '' SIG '' MC6gLKAqhihodHRwOi8vY3JsLmdsb2JhbHNpZ24ubmV0
    '' SIG '' L09iamVjdFNpZ24uY3JsMA0GCSqGSIb3DQEBBQUAA4IB
    '' SIG '' AQBEYcc6uII6As+g/5vYaCoiliE+7vqNdnajdXc4Jibw
    '' SIG '' O1PPIoyYxZvnmzuFiWR1WnBuz3rStTHTk/Qpxz6PR0n5
    '' SIG '' eXGMtMvf/IWIPtwFemBNWpLbfB2pro1nqxPGlH0mhonR
    '' SIG '' 4GcEV7EyYYjpihZYfRwYoZE4QpR967k9rWW7H55z/DTF
    '' SIG '' fH/XFGpDEEAslQqbz439+gw6c2xfJ3+05yU4RVhrlKi1
    '' SIG '' re6oUUsAn5RoJt5EZVNqANYcKFRhhVcUJni7ijdn7PpG
    '' SIG '' VBFxCzrd0zQxeMieVRFQqGqi6wXWeHjf51I53RCqI4QL
    '' SIG '' z4ZAIbSZhVQelJZkQn95dCr1J7Vv+GOZqWGRMIIDdTCC
    '' SIG '' Al2gAwIBAgILAgAAAAAA1ni3lAUwDQYJKoZIhvcNAQEE
    '' SIG '' BQAwVzELMAkGA1UEBhMCQkUxGTAXBgNVBAoTEEdsb2Jh
    '' SIG '' bFNpZ24gbnYtc2ExEDAOBgNVBAsTB1Jvb3QgQ0ExGzAZ
    '' SIG '' BgNVBAMTEkdsb2JhbFNpZ24gUm9vdCBDQTAeFw05ODA5
    '' SIG '' MDExMjAwMDBaFw0xNDAxMjgxMjAwMDBaMFcxCzAJBgNV
    '' SIG '' BAYTAkJFMRkwFwYDVQQKExBHbG9iYWxTaWduIG52LXNh
    '' SIG '' MRAwDgYDVQQLEwdSb290IENBMRswGQYDVQQDExJHbG9i
    '' SIG '' YWxTaWduIFJvb3QgQ0EwggEiMA0GCSqGSIb3DQEBAQUA
    '' SIG '' A4IBDwAwggEKAoIBAQDaDuaZjc6j40+Kfvvxi4Mla+pI
    '' SIG '' H/EqsLmVEQS98GPR4mdmzxzdzxtIK+6NiY6arymAZavp
    '' SIG '' xy0Sy6scTHAHoT0KMM0VjU/43dSMUBUc71DuxC73/OlS
    '' SIG '' 8pF94G3VNTCOXkNz8kHp1Wrjsok6Vjk4bwY8iGlbKk3F
    '' SIG '' p1S4bInMm/k8yuX9ifUSPJJ4ltbcdG6TRGHRjcdGsnUO
    '' SIG '' hugZitVtbNV4FpWi6cgKOOvyJBNPc1STE4U6G7weNLWL
    '' SIG '' BYy5d4ux2x8gkasJU26Qzns3dLlwR5EiUWMWea6xrkEm
    '' SIG '' CMgZK9FGqkjWZCrXgzT/LCrBbBlDSgeF59N89iFo7+ry
    '' SIG '' Up9/k5DPAgMBAAGjQjBAMA4GA1UdDwEB/wQEAwIABjAd
    '' SIG '' BgNVHQ4EFgQUYHtmGkUNl8qJUC99BM00qP/8/UswDwYD
    '' SIG '' VR0TAQH/BAUwAwEB/zANBgkqhkiG9w0BAQQFAAOCAQEA
    '' SIG '' rqqf/LfSyx9fOSkoGJ40yWxPbxrwZKJwSk8ThptgKJ7o
    '' SIG '' gUmYfQq75bCdPTbbjwVR/wkxKh/diXeeDy5slQTthsu0
    '' SIG '' AD+EAk2AaioteAuubyuig0SDH81Qgkwkr733pbTIWg/0
    '' SIG '' 50deSY43lv6aiAU62cDbKYfmGZZHpzqmjIs8d/5GY6dT
    '' SIG '' 2iHRrH5Jokvmw2dZL7OKDrssvamqQnw1wdh/1acxOk5j
    '' SIG '' QzmvCLBhNIzTmKlDNPYPhyk7ncJWWJh3w/cbrPad+D6q
    '' SIG '' p1RF8PX51TFl/mtYnHGzHtdS6jIX/EBgHcl5JLL2bP2o
    '' SIG '' Zg6C3ZjL2sJETy6ge/L3ayx2EYRGinij4zCCA/gwggLg
    '' SIG '' oAMCAQICCwQAAAAAAQjZYRzWMA0GCSqGSIb3DQEBBQUA
    '' SIG '' MFcxCzAJBgNVBAYTAkJFMRkwFwYDVQQKExBHbG9iYWxT
    '' SIG '' aWduIG52LXNhMRAwDgYDVQQLEwdSb290IENBMRswGQYD
    '' SIG '' VQQDExJHbG9iYWxTaWduIFJvb3QgQ0EwHhcNOTkwMTI4
    '' SIG '' MTIwMDAwWhcNMTQwMTI3MTEwMDAwWjCBgTELMAkGA1UE
    '' SIG '' BhMCQkUxGTAXBgNVBAoTEEdsb2JhbFNpZ24gbnYtc2Ex
    '' SIG '' JTAjBgNVBAsTHFByaW1hcnkgT2JqZWN0IFB1Ymxpc2hp
    '' SIG '' bmcgQ0ExMDAuBgNVBAMTJ0dsb2JhbFNpZ24gUHJpbWFy
    '' SIG '' eSBPYmplY3QgUHVibGlzaGluZyBDQTCCASIwDQYJKoZI
    '' SIG '' hvcNAQEBBQADggEPADCCAQoCggEBAKKbdSqnE7oJcSQY
    '' SIG '' 36EGYikSntyedXPo31ZXaZYTVk/yyLwBWO0mhnILYPUZ
    '' SIG '' xVUDV5u5EMmh1HRA/2wA6OZTN/632nk+uFI46YEsnw4z
    '' SIG '' UqbNcM5KXWL00WdevJdKB8q83Y1Hsc3xZVuFAbBLa97N
    '' SIG '' ji71UOijnJ0mmGs2Y0EDcETwX+IldXlQfV+hBqJGDFWV
    '' SIG '' RxTTkUaGaJnnJ/SU7JpBUfeW1HqM4USXaHED2FhvvbQQ
    '' SIG '' Qu4NZnVGi0SW0jAAEgdj90SbAXDKVm+cWJcqJxeLLnFS
    '' SIG '' bUarpysPfxZIZMhS+gYXAAd010WzDPV4lXPoCu7E4HKM
    '' SIG '' HhGqHrtezvm0AO5zvc0CAwEAAaOBmTCBljAOBgNVHQ8B
    '' SIG '' Af8EBAMCAQYwDwYDVR0TAQH/BAUwAwEB/zAdBgNVHQ4E
    '' SIG '' FgQUFVF5GnwMWfnazdjEOhOayXgtf00wMwYDVR0fBCww
    '' SIG '' KjAooCagJIYiaHR0cDovL2NybC5nbG9iYWxzaWduLm5l
    '' SIG '' dC9Sb290LmNybDAfBgNVHSMEGDAWgBRge2YaRQ2XyolQ
    '' SIG '' L30EzTSo//z9SzANBgkqhkiG9w0BAQUFAAOCAQEAoEIu
    '' SIG '' uHanQnGGQE1GTVsmsLB0+T+JqHt8t/HGl+CCOZmdQ/5g
    '' SIG '' gjZCtVuHjfVd9Lv/qRBEqHHTx/EiQfKapKXsY/rl62VK
    '' SIG '' GTCdi8e2/dw/4Wz91VIUB/xtJMyzzIGiwFLzJ7ltngY9
    '' SIG '' 2KhJAjJpxwVClNC747upCMOTUBvbhG3Auh5SmGWcE3a9
    '' SIG '' s9VnKS8fe6osUaD9hU8mPEijgSem/u5/eJnCRc+dH1J+
    '' SIG '' 15WL/eHQIMOvflGiL2Y7qy3PLY6MTX0YOSEo+9yubWWB
    '' SIG '' 0ODXGEvntfd014TmUiqsO2j9O0q4AVSEkTK7ldKOYzCm
    '' SIG '' ns4jlv6rLrhqi3Tc3iGhFML7v1OvEDCCBCAwggMIoAMC
    '' SIG '' AQICCwQAAAAAAQjZYSRIMA0GCSqGSIb3DQEBBQUAMIGB
    '' SIG '' MQswCQYDVQQGEwJCRTEZMBcGA1UEChMQR2xvYmFsU2ln
    '' SIG '' biBudi1zYTElMCMGA1UECxMcUHJpbWFyeSBPYmplY3Qg
    '' SIG '' UHVibGlzaGluZyBDQTEwMC4GA1UEAxMnR2xvYmFsU2ln
    '' SIG '' biBQcmltYXJ5IE9iamVjdCBQdWJsaXNoaW5nIENBMB4X
    '' SIG '' DTA0MDEyMjA5MDAwMFoXDTE0MDEyNzEwMDAwMFowYzEL
    '' SIG '' MAkGA1UEBhMCQkUxGTAXBgNVBAoTEEdsb2JhbFNpZ24g
    '' SIG '' bnYtc2ExFjAUBgNVBAsTDU9iamVjdFNpZ24gQ0ExITAf
    '' SIG '' BgNVBAMTGEdsb2JhbFNpZ24gT2JqZWN0U2lnbiBDQTCC
    '' SIG '' ASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBALCx
    '' SIG '' 8oAAcM7sw4y0l+3GCYwmb4nfZ1mBz94UE0zCsUXiU3VB
    '' SIG '' +gc2b7oRcCiUfG1yvQcVJWU6Cf+F3Pp7XjeHOOTHSwiA
    '' SIG '' mJ6KzVgJAsDDAUmWWIiJJln1bca5wfsYJe3YYk7KCmxd
    '' SIG '' cO/O05spCwnG9u62FtQ8VI7MXeCv290jCTJ7MoEWYgoG
    '' SIG '' y3rPNCG2bza2sc7Lmik1QD6dWHz/rYKY+rjVico13cvN
    '' SIG '' VwbLm+S/lKiAmF93lvC256t0eUAhpmPp0AeRvYU4tK6W
    '' SIG '' rKH/FHPapUW4TYbOKjzv1N8oDnWpqIgTwuR8YJPyJcwD
    '' SIG '' hJfmTrafLda1izQ8q9U4Osg9xLH5lM0CAwEAAaOBtTCB
    '' SIG '' sjAOBgNVHQ8BAf8EBAMCAQYwEgYDVR0TAQH/BAgwBgEB
    '' SIG '' /wIBADAdBgNVHQ4EFgQU0lvzSyZLpbDnXf1Wf/bxLjhO
    '' SIG '' U6AwOQYDVR0fBDIwMDAuoCygKoYoaHR0cDovL2NybC5n
    '' SIG '' bG9iYWxzaWduLm5ldC9wcmltb2JqZWN0LmNybDARBglg
    '' SIG '' hkgBhvhCAQEEBAMCAAEwHwYDVR0jBBgwFoAUFVF5GnwM
    '' SIG '' WfnazdjEOhOayXgtf00wDQYJKoZIhvcNAQEFBQADggEB
    '' SIG '' ABHUXYr0PQ2dfk+nAHFhC1azTKpw4bLR3seIbR2JfCup
    '' SIG '' RuWLH45MwmaVkR/jTTlK4xtwt0Ru3AaKTW0l6JgS3Lyg
    '' SIG '' 3YZOro+BEwVAkFpUJSmUSsrxZbTvBnna58uG8ATJGNzu
    '' SIG '' crMgAVdI3+Mz4SzNnAd/lEcnjYiNNAymfFwgwX0Hs3Nr
    '' SIG '' ZIwm0pvX6HllpqiRoXSGKgUCgsGEfPJ5zTwqKw+ZKR7q
    '' SIG '' jIoasWrqomY4DmXhrdjGyR+IjTl27heCxBONl85jQed6
    '' SIG '' 9bS2bBXDOBOzkwtiBojd4UR/EKlQJItg3AX3W6UUsntW
    '' SIG '' cguW6r/8BXCQZZ4FHKTdB69LV97GOWc7xXQxggKIMIIC
    '' SIG '' hAIBATByMGMxCzAJBgNVBAYTAkJFMRkwFwYDVQQKExBH
    '' SIG '' bG9iYWxTaWduIG52LXNhMRYwFAYDVQQLEw1PYmplY3RT
    '' SIG '' aWduIENBMSEwHwYDVQQDExhHbG9iYWxTaWduIE9iamVj
    '' SIG '' dFNpZ24gQ0ECCwEAAAAAARbPF4ykMAkGBSsOAwIaBQCg
    '' SIG '' ggFsMBkGCSqGSIb3DQEJAzEMBgorBgEEAYI3AgEEMCMG
    '' SIG '' CSqGSIb3DQEJBDEWBBRXHRrlPmld2YvC1OUcR5N3H28M
    '' SIG '' gzCCASgGCisGAQQBgjcCAQwxggEYMIIBFKCB5YCB4gBT
    '' SIG '' AGMAcgBpAHAAdABzACAAdABvACAAbQBpAHQAaQBnAGEA
    '' SIG '' dABlACAAdABoAGUAIABJAG4AdABlAGwAUABQAE0AIABw
    '' SIG '' AHIAbwBiAGwAZQBtACAAdwBpAHQAaAAgAFcAaQBuAGQA
    '' SIG '' bwB3AHMAIABYAFAAIABTAGUAcgB2AGkAYwBlACAAUABh
    '' SIG '' AGMAawAgADMAIAB3AGgAZQBuACAAcgB1AG4AIABpAG4A
    '' SIG '' cwB0AGEAbABsAGUAZAAgAG8AbgAgAEEATQBEAC0AYgBh
    '' SIG '' AHMAZQBkACAAYwBvAG0AcAB1AHQAZQByAHOhKoAoaHR0
    '' SIG '' cHM6Ly9tc2luZmx1ZW50aWFscy5jb20vYmxvZ3MvamVz
    '' SIG '' cGVyIDANBgkqhkiG9w0BAQEFAASBgGVVgjLW+tk6Ben6
    '' SIG '' MWBW+fMH/peZyEocukrjcI0u9E3eBliTnFyU0yF7TKsz
    '' SIG '' /SDdl4E+Bt73BhMSKc54JENmd8ReUzq3DP5qWA1o81Nh
    '' SIG '' wpftAuvtw5yfD0HnoX4PQ41YbpODroWmhQj3WSk4+4wq
    '' SIG '' j7Sl9KZhFVP0o1zMlBCd+1Sk
    '' SIG '' End signature block
    __________________
     

Bu Sayfayı Paylaş