by Alex Smoljanovic(aLeX^rS) (8 Submissions)
Category: Complete Applications
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: 
(2 Votes)
Trace Cleaner
Very simple yet scaleable "Trace Cleaner" application.
Uses two built in User Controls (Registry, and Special Shell Folder) handlers.
Cleans: IE Typed URLs, Recent Documents History, URL History IE, Kazaa Search Phrases, MSPaint Recent File List, Temp Internet
Files, History, Cookies. And any other Registry Key, or Special Shell Folder.
This was requested by someone in 2003, I rediscovered this project while organizing some of my older work and decided to post it on VBCode,
after a few minor modification to make it more readable scaleable.
Even though this VB Project should work as it is, please DON'T interpret this as a full
or Purpose Specific type application.
This project may also be useful to you if you are interested in the
following:
Windows Shell, Windows System Registry/Registry Key Enumeration, Re-Usable
Classes/User Controls
Yours sincerely,
Alex Smoljanovic [Salex] 2005.
API DeclarationsDeclare Function RegCloseKey Lib "advapi32.dll" (ByVal HKey As Long) As Long
Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal HKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal HKey As Long, ByVal lpValueName As String) As Long
Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal HKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal HKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal HKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
Declare Function RegEnumValue Lib "advapi32.dll" Alias "RegEnumValueA" (ByVal HKey As Long, ByVal dwIndex As Long, ByVal lpValueName As String, lpcbValueName As Long, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
Download TraceClean (88 KB)
VBcoders