Jump to content

artbio

Member
  • Posts

    67
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    Portugal

About artbio

  • Birthday 07/07/1981

Profile Information

  • OS
    XP Pro x86

artbio's Achievements

0

Reputation

  1. Actually, now I would like to install support for complex script languages. Not that I need those languages. The problem is that adobe pdfMaker doesn't convert equations in Microsoft Word 2007. And installing complex script languages solves this.
  2. Thanks user_hidden Also when integrating KB974417 add this line to what you already mentioned: "Uninstallable"=dword:00000000
  3. juancarlos9 is talking about the Pro version, not the Reader. Answer to question 1: Updates 9.1.1 and 9.1.3 are security updates. Updates 9.1.0, 9.1.2 and 9.2.0 are quarterly updates. Applying quarterly updates over security updates doesn't work. So you must apply only the quarterly ones. Answer to question 2: msiexec /a <path to AIP msi> /update <path to msp>
  4. Hi. It will only work in this order: 9.0 -> 9.1 -> 9.1.2 -> 9.2 So skip 9.1.1 and 9.1.3 and it will slipstream just fine.
  5. I need this program. But I am unable to download it. Is there some place else where I can get it? Thanks.
  6. Hi compstuff. You must run this script at a stage of Windows XP Setup where WMI is already installed and fully functional. Otherwise it will return that kind of error. Run it at GuiRunOnce or RunOnceEx and you will be fine.
  7. I still can't figure it out. Regshot isn't helping! Can anyone tell me the right registry keys? Thanks in advance.
  8. @ Glaedr Well, then it's something else!
  9. @ Glaedr You didn't answer my question. Let me clarify. Are you installing at Cmdlines, SetupParams, RunOnceEx or GuiRunOnce stages of the setup timeline? The second error typically occurs when you are running any AutoIt script at Cmdlines stage. This script in particular is supposed to work at RunOnceEx and GuiRunOnce. Regards.
  10. This is my AutoIt script to set the pagefile. It sets pagefile to a fixed size of twice the system RAM. But it goes a few steps further. It does a more accurate check of the system RAM. And checks if free space on drive is enough. Otherwise it lets the OS manage the pagefile. Dim $iSystemRAM $objWMIService = ObjGet("winmgmts:{ImpersonationLevel=impersonate}!\\localhost\root\CIMV2") $colPhysicalMemory = $objWMIService.ExecQuery("Select * From Win32_PhysicalMemory") For $objPhysicalMemory In $colPhysicalMemory $iSystemRAM += $objPhysicalMemory.Capacity Next $iPageFileSize = 2 * $iSystemRAM / (1024 ^ 2) $colPageFile = $objWMIService.ExecQuery("Select * From Win32_PageFile") For $objPageFile In $colPageFile If DriveSpaceFree($objPageFile.Drive & $objPageFile.Path) > 1.5 * ( $iPageFileSize - $objPageFile.FileSize / (1024 ^ 2) ) Then $sSettingID = $objPageFile.FileName & "." & $objPageFile.Extension & " @ " & $objPageFile.Drive $colPageFileSetting = $objWMIService.ExecQuery('Select * From Win32_PageFileSetting Where SettingID = "' & $sSettingID & '"') For $objPageFileSetting In $colPageFileSetting With $objPageFileSetting .InitialSize = $iPageFileSize .MaximumSize = $iPageFileSize .Put_ EndWith Next EndIf Next Regards.
  11. This is an improved version: #include-once ; #FUNCTION# ==================================================================================================== ================================================================== ; ; Name...........: _Network_SetIcon ; Description ...: Shows or hides the network icon in notification area when connected. ; Syntax.........: _Network_SetIcon($sNetConnectionID [, $iFlag, $sComputerName]) ; Parameters ....: $sNetConnectionID - Name of the network connection. ; $iFlag - [Optional] A flag indicating the behaviour of the network icon: ; 0 - Icon in notification area when connected remains hidden. ; 1 - Icon in notification area when connected is shown. ; Default is "1". ; $sComputerName - [Optional] Computer name. ; The local computer is default. ; Return values .: Success - Returns 1 ; Failure - Returns 0 and sets @error: ; Author ........: artbio ; Modified.......: ; Remarks .......: ; Related .......: ; Link ..........; ; Example .......; ; ; ==================================================================================================== ============================================================================= Func _Network_SetIcon($sNetConnectionID, $iFlag = 1, $sComputerName = @ComputerName) Local Const $sRootKey = "\\" & $sComputerName & "\HKLM\SYSTEM\CurrentControlSet\" Local $objWMIService, $colWAN, $sClassGUID, $colAdapters, $colConfig, $iRet = 0 $objWMIService = ObjGet("winmgmts:{ImpersonationLevel=impersonate}!\\" & $sComputerName & "\root\CIMV2") $colWAN = $objWMIService.ExecQuery('Select * from Win32_NetworkAdapter Where Name = "WAN Miniport (IP)"') For $objWAN In $colWAN $sClassGUID = RegRead($sRootKey & "Enum\" & $objWAN.PNPDeviceID, "ClassGUID") If Not @error Then $colAdapters = $objWMIService.ExecQuery('Select * from Win32_NetworkAdapter Where NetConnectionID = "' & $sNetConnectionID & '"') For $objAdapter In $colAdapters $colConfig = $objWMIService.ExecQuery('Select * from Win32_NetworkAdapterConfiguration Where IPEnabled = True And MACAddress = "' & $objAdapter.MACAddress & '"') For $objConfig In $colConfig $iRet = RegWrite($sRootKey & "Control\Network\" & $sClassGUID & "\" & $objConfig.SettingID & "\Connection", "ShowIcon", "REG_DWORD", $iFlag) Next Next EndIf Next Return SetError($iRet = 0, 0, $iRet) EndFunc;==> _Network_SetIcon
  12. Here is the other AutoIt function I did for the same purpose: #include-once ; #FUNCTION# ==================================================================================================== ================ ; ; Name...........: _Network_SetIcon ; Description ...: Shows or hides the network icon in notification area when connected. ; Syntax.........: _Network_SetIcon($sNetConnectionID [, $iFlag, $sComputerName]) ; Parameters ....: $sNetConnectionID - Name of the network connection. ; $iFlag - [Optional] A flag indicating the behaviour of the network icon: ; 0 - Icon in notification area when connected remains hidden. ; 1 - Icon in notification area when connected is shown. ; Default is "1". ; $sComputerName - [Optional] Computer name. ; The local computer is default. ; Return values .: Success - Returns 1 ; Failure - Returns 0 and sets @error: ; Author ........: artbio ; Modified.......: ; Remarks .......: ; Related .......: ; Link ..........; ; Example .......; ; ; ==================================================================================================== =========================== Func _Network_SetIcon($sNetConnectionID, $iFlag = 1, $sComputerName = @ComputerName) Local Const $sKey = "\\" & $sComputerName & "\HKLM\SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\" Local $objWMIService, $colAdapters, $colAdaptersConfig, $iRet $objWMIService = ObjGet("winmgmts:{ImpersonationLevel=impersonate}!\\" & $sComputerName & "\root\CIMV2") $colAdapters = $objWMIService.ExecQuery('Select * from Win32_NetworkAdapter Where NetConnectionID = "' & $sNetConnectionID & '"') For $objAdapter In $colAdapters $colAdaptersConfig = $objWMIService.ExecQuery('Select * from Win32_NetworkAdapterConfiguration Where IPEnabled = True And MACAddress = "' & $objAdapter.MACAddress & '"') For $objAdapterConfig In $colAdaptersConfig $iRet = RegWrite($sKey & $objAdapterConfig.SettingID & "\Connection", "ShowIcon", "REG_DWORD", $iFlag) Next Next Return SetError($iRet = 0, 0, $iRet) EndFunc;==> _Network_SetIcon Regards.
  13. This is my AutoIt script: #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.12.1 Language: English Platform: Windows XP Author: artbio Script Function: Show icon in notification area when connected. #ce ---------------------------------------------------------------------------- #NoTrayIcon #include <Misc.au3> _Singleton("Network Icon AutoIt v3 Script 1.0", 0); It's already running Dim Const $sKey = "HKLM\SYSTEM\CurrentControlSet\Control\Network" Dim $k While 1 $k += 1 $sSubKey0 = RegEnumKey($sKey, $k) If @error Then ExitLoop $sDefault = RegRead($sKey & "\" & $sSubKey0, "") $sClass = RegRead($sKey & "\" & $sSubKey0, "Class") If $sDefault = "Network Adapters" And $sClass = "Net" Then ExitLoop WEnd $k = 0 While 1 $k += 1 $sSubKey1 = RegEnumKey($sKey & "\" & $sSubKey0, $k) If @error Then ExitLoop If RegRead($sKey & "\" & $sSubKey0 & "\" & $sSubKey1 & "\Connection", "Name") = "Local Area Connection" Then ExitLoop WEnd If Not @error Then RegWrite($sKey & "\" & $sSubKey0 & "\" & $sSubKey1 & "\Connection", "ShowIcon", "REG_DWORD", 1) Exit Regards.
  14. This can be done with a script. I did this AutoIt function. It will detect your sound card and write to the right registry key. #include-once ; #FUNCTION# ==================================================================================================== ================ ; ; Name...........: _SpeakerSetup ; Description ...: Sets speaker setup for all enabled audio devices on a computer. ; Syntax.........: _SpeakerSetup([$iFlag, $sComputerName]) ; Parameters ....: $iFlag - [Optional] A flag that indicates the desired speaker configuration. ; 0 - No speakers ; 1 - Stereo headphones ; 2 - Desktop stereo speakers ; 3 - Laptop mono speakers ; 4 - Laptop stereo speakers ; 5 - Monitor stereo speakers ; 6 - Monitor stand stereo speakers ; 7 - Monitor mounted stereo speakers ; 8 - Keyboard stereo speakers ; 9 - Quadraphonic speakers ; 10 - Surround sound speakers ; 11 - 5.1 surround sound speakers ; 12 - 7.1 wide configuration speakers ; 13 - 7.1 home theater speakers ; Default is "Desktop stereo speakers". ; $sComputerName - [Optional] Computer name. ; The local computer is default. ; Return values .: Success - Returns 1 ; Failure - Returns 0 and sets @error to: ; -1 - Flag is out of range. ; 1 - Either no enabled audio devices were found or failed to write settings. ; Author ........: artbio ; Modified.......: ; Remarks .......: ; Related .......: ; Link ..........; ; Example .......; ; ; ==================================================================================================== =========================== Func _SpeakerSetup($iFlag = 2, $sComputerName = @ComputerName) Local $iConfig, $objSystem, $objItems, $sKey, $iReg1, $iReg2, $iRet Switch $iFlag Case 0, 1, 3, 9, 10, 11, 12, 13 $iConfig = $iFlag - Number($iFlag = 3 Or $iFlag = 9) - 5 * Number($iFlag >= 9) Case 2, 4, 5, 6, 7, 8 $iConfig = 1310724 - 655360 * Number($iFlag <> 2 And $iFlag <> 7) Case Else Return SetError(-1, 0, 0) EndSwitch $objSystem = ObjGet("winmgmts:{ImpersonationLevel=impersonate}!\\" & $sComputerName & "\root\CIMV2") $objItems = $objSystem.ExecQuery("Select * from Win32_SoundDevice Where StatusInfo = 3") For $objDevice In $objItems $sKey = "\\" & $sComputerName & "\HKLM\SYSTEM\CurrentControlSet\Hardware Profiles\Current\System\CurrentControlSet\Enum\" & $objDevice.DeviceID & "\DirectSound\" $iReg1 = RegWrite($sKey & "Speaker Configuration", "Speaker Configuration", "REG_DWORD", $iConfig) $iReg2 = RegWrite($sKey & "Speaker Type", "Speaker Type", "REG_DWORD", $iFlag) Next $iRet = $iReg1 * $iReg2 Return SetError($iRet = 0, 0, $iRet) EndFunc;==> _SpeakerSetup Just copy the code to a text file, save as something with extension ".au3", like "AudioDevices.au3". Write a new script. #include "AudioDevices.au3"; Relative path, for example "..\Include\AudioDevices.au3" _SpeakerSetup(11); 11 is for 5.1 surround sound speakers Exit Save as something with ".au3" extension. Compile this script if you would like. Regards.
  15. @ Glaedr How are you installing Nero? Is it XP Home? Is it unattended? At what stage?
×
×
  • Create New...