My application runs fine 3-4 days a week out of the 6 it runs. Occasionally I never see the next step that comes after this sub so I think this is where the hang is. Today when I checked it after the hang, this file was sitting at 0Kb which indicates that it did not complete this part, and was just sitting there.

Code:
  dim LROut As New System.IO.StreamWriter(LastRunFile, False)
            Me.bLoadFile = True
            LastRun = Date.Now
            LastHash = ComputeFileHash(AppendImaged.cBackupPath + Date.Now.ToString("MMdd") + ".txt")
            LROut.WriteLine(Date.Now.Date.ToString)
            LROut.WriteLine(ComputeFileHash(AppendImaged.cBackupPath + Date.Now.ToString("MMdd") + ".txt"))
            LROut.Close()
I'm switching this to a Using LROut clause to see if it helps, any other ideas?