This is a simple utility to update the last write time on a file.
Kind of like the 'touch' command on Unix.
Imports System.Runtime.InteropServices
Module touch
Sub Main()
If Command.Trim.Length = 0 Then
Console.WriteLine("wintouch: Updates last modified time on selected file.")
Console.WriteLine("Usage: wintouch ")
Console.WriteLine()
Else
Try
If System.IO.File.Exists(Command) Then
System.IO.File.SetLastWriteTime(Command, Now)
Console.WriteLine("wintouch: File touched successfully.")
Console.WriteLine()
System.Threading.Thread.Sleep(1000)
Else
Console.WriteLine("wintouch: File does not exist: " & Command())
Console.WriteLine()
End If
Catch ex As Exception
Console.WriteLine("wintouch: There was an error touching the selected file.")
Console.WriteLine("Usage: wintouch ")
Console.WriteLine("Error: " & ex.Message)
Console.WriteLine()
End Try
End If
End Sub
End Module