Open "C:\test.eng" For Input As #1 Input #1 , Datum Close #1
FileOpen(1, "C:\test.eng", OpenMode.Input) Input(1, Datum) FileClose(1)