ObjRecordSet.Open “Select DISTINCT * FROM ” & strFile, _ “Extended Properties=””text HDR=NO FMT=Delimited””” “Data Source=” & strPathtoTextFile & “ ” & _ Set objRecordSet = CreateObject(“ADODB.Recordset”) Set objConnection = CreateObject(“ADODB.Connection”) SW, you came to the right place: Const adOpenStatic = 3 You want a script that can weed out all the duplicate lines and provide you with output similar to this: This is one of the lines in the text file. This is yet another line in the text file. This is one of the lines in the text file. It’s unlikely, but maybe your file looks like this: This is one of the lines in the text file.

To begin with, we assume you have a text file where each line represents a separate record. As to whether this is a better/faster/easier solution than the one we offered before, well, we’ll leave that up to you. And now, thanks to your question, we can take another shot at this. The solution we came up with was simple enough, and it worked just fine we just weren’t convinced that it was the best solution. Awhile back we answered a similar question, one about removing duplicate names from a text file. (Or at least that’s what we tell our manager when he asks why we never actually seem to finish anything: “But boss, never-ending quests take time!”) That’s why we were glad to see your question. You know, to be a Scripting Guy means to embark on a never-ending quest to find the ultimate solution to a given problem. Hey, Scripting Guy! How can I remove all duplicate lines from a text file?

Notepad++ remove duplicate lines regex