April 27, 2001

Another Way to Delete Files or Filetypes

This routine uses all the good stuff that FileSystemObject offers. Here it is: Public Sub DeleteFiles(ByVal strPath As String, ByVal strExtension As String) Dim fsoMain As Scripting.FileSystemObject Dim folToDeleteFrom As Scripting.Folder Dim fleToDelete As Scripting.File On Error GoTo ErrorHandler ‘ Init Set fsoMain = New FileSystemObject ‘ Check if folder

Delete Duplicate Rows From an Oracle Table

It’s easy to introduce duplicate rows of data into Oracle tables by running a data load twice without the primary key or unique indexes created or enabled.Here’s how you remove the duplicate rows before the primary key or unique indexes can be created: DELETE FROM our_tableWHERE rowid not in(SELECT MIN(rowid)FROM