Sub GetALLEmailAddresses()

Dim objFolder As MAPIFolder
Dim strEmail As String
Dim strEmails As String
Dim objDic As Object
Dim objItem As Object
Dim objFSO As Object
Dim objTF As Object
Set objDic = CreateObject("scripting.dictionary")
Set objFSO = CreateObject("scripting.filesystemobject")
Set objTF = objFSO.createtextfile("C:\users\leon\emails.csv", 2)
Set objFolder = Application.ActiveExplorer.CurrentFolder

For Each objItem In objFolder.Items
If objItem.Class = olMail Then
strEmail = objItem.SenderEmailAddress
If Not objDic.Exists(strEmail) Then
objTF.writeline strEmail
objDic.Add strEmail, ""
End If
End If
Next
objTF.Close
End Sub

1. In a Commant Prompt type systeminfo | find "System Boot Time"
2. Open Task Manager / select performance tab / select CPU / Bottom of screen

What is slow, the whole computer, a certain program, or while surfing the web?

Open Task Manager and keep it minimized when using the computer. When the computer is slow, un-minimize Task Manager to see what is maxed out on the Performance tab.

Install HD Sentinel to see health of hard drive, it could be failing.

• Computer Name Brand & Model number(Dell service tag)
• Processor Model Number
• Amount of RAM installed
• Hard drive size
• Free hard drive space
• Hard drive name brand and model number
• What programs do you have open at the same time
• How many tabs do you have open in a browser
• How much do you want to spend on the new computer

Run maintenance

Audacity was bought in April 2021 and the new owner is now tracking your IP address, and collecting your system information as well as other data, which they can share with their main office in Russia. Because of this, people have made an Audacity Fork.

Visit TenacityAudio.org