asgz
-
Posts
2 -
Joined
-
Last visited
Posts posted by asgz
-
-
HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\DataArray
HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\High
HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\Low
please delete the HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\DataArray\Elem0 (Elem1, Elem2 ...) keys
and change the HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\DataArray\Count value to 0
delete all values under the HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\High key
delete all values under the HKEY_CURRENT_USER\Software\SpeedBit\Download Accelerator\Improv_DB\Low key
sorry for my bad english
download accelerator plus (dap) 9.4.0.7 recent file list
in CCleaner Suggestions
Posted
thank you very much,
i have written my own script and integrated it to the CCleaner.
------- C:\Program Files\CCleaner\winsys2.ini -------
[Download Accelerator Plus]
Section=My Scripts
ScriptKey1=ccleaner.vbs
------- C:\Program Files\CCleaner\ccleaner.vbs -------
Option Explicit
Const HKEY_CURRENT_USER = &H80000001
Dim oReg
Dim strKeyPath
Dim arrItems
Dim sItem
Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
strKeyPath = "Software\SpeedBit\Download Accelerator\Improv_DB\DataArray"
oReg.EnumKey HKEY_CURRENT_USER, strKeyPath, arrItems
If IsNull(arrItems) = False Then
For Each sItem in arrItems
oReg.DeleteKey HKEY_CURRENT_USER, strKeyPath & "\" & sItem
Next
oReg.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, "Count", 0
End If
strKeyPath = "Software\SpeedBit\Download Accelerator\Improv_DB\High"
oReg.EnumValues HKEY_CURRENT_USER, strKeyPath, arrItems
If IsNull(arrItems) = False Then
For Each sItem in arrItems
oReg.DeleteValue HKEY_CURRENT_USER, strKeyPath, sItem
Next
End If
strKeyPath = "Software\SpeedBit\Download Accelerator\Improv_DB\Low"
oReg.EnumValues HKEY_CURRENT_USER, strKeyPath, arrItems
If IsNull(arrItems) = False Then
For Each sItem in arrItems
oReg.DeleteValue HKEY_CURRENT_USER, strKeyPath, sItem
Next
End If