Imports System
Imports System.IO
Public Module modmain
   Sub Main()
      'KPD-Team 2001
      'URL: http://www.allapi.net/dotnet/
      'E-Mail: KPDTeam@Allapi.net
      Dim srFile as StreamReader = File.OpenText("C:\autoexec.bat")
      Console.WriteLine(srFile.ReadToEnd())
      srFile.Close
   End Sub
End Module

Close this window