Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub Command1_Click() Dim objMSWord As Word.Application Dim myDOc As Word.Document Set objMSWord = CreateObject("Word.Application") Set myDOc = objMSWord.Documents.Open("C:\Users\Alpesh\Desktop\111114.txt") For Each p In myDOc.Paragraphs If InStr(p.Range.Text, "BlockedIP") > 0 Then 'Skipping - found text Else p.Range.Delete End If Next myDOc.SaveAs ("c:\Users\Me\Desktop\052214_2.txt") myDOc.Close Set myDOc = Nothing objMSWord.Quit End Sub
|Macro which automatically sends attachment to Outlook||14||78|
|bit defender blocks good applications||2||101|
|Sorting multiple rows and columns, and count duplicates in Excel 2013||4||87|
|using web browser with BING||40||131|