Sign in to follow this  
Followers 0
AntiVirusGuy

search entire registry

2 posts in this topic

I have a bunch of AVG 7 installs gone bad. I am trying to scan the entire registry for "avg7" and delete them can someone help. I am still learning and beyond my experience

Dim $SupportedKeys = "avg7"  

Dim $SupportedKeys = StringSplit($SupportedKeys, ",")
Dim $SupportedKeyCount = 1
Dim $Found = 0

TrayTip("Scanning...", "Scanning for Keys.", 5)

While 1
   
    $SubKey = RegEnumKey("\", $SupportedKeyCount)
    
    If @error Then ExitLoop
    
    
    For $i = 1 To $SupportedKeys[0]
       
        If StringInStr($Subkey, $SupportedKeys[$i]) Then
           
            $Found += 1
            RegDelete($SubKey)
            
           
        EndIf
       
    Next
   
    $SupportedKeyCount += 1
   
WEnd

If Not $Found Then
    MsgBox(64, "Not Found", "No existing Anti Virus found", 3)
Else
    MsgBox(64, "Found", "Found " & $Found & " installed antivirus.")
EndIf

Share this post


Link to post
Share on other sites



I have a bunch of AVG 7 installs gone bad. I am trying to scan the entire registry for "avg7" and delete them can someone help. I am still learning and beyond my experience

Hi,

first thing to learn: Forum search engine !! http://www.autoitscript.com/forum/index.ph...t=Search&f= Search for "+registry +recursive" in "Sample Scripts" and you will find a UDF for your problem....


__________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf *

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0