Public feed #2090687

Anonymous

public text v1 · immutable
Raw Edit
·published 2011-10-17 05:55 UTC
rendered paste body
        'Pull system names
        test = System.IO.Directory.GetCurrentDirectory
        fileName = "\config\stars.txt"
        myCSVReader = My.Computer.FileSystem.OpenTextFileReader(fileName)
        lineCount = -1
        Do While Not myCSVReader.EndOfStream
            lineCount = lineCount + 1
            myFieldInput = myCSVReader.ReadLine
            starNames(lineCount) = myFieldInput
        Loop