Change this row from
 strDir = "C:\Users\mpiet\Documents\Logs"
to
 strDir = "C:\Users\mpiet\Documents\Logs\"