Pages

Sunday, January 30, 2011

Write to Text File

Try
           
            File.WriteAllText(POLL_PATH + "\OUT\" + folder + "\832Cross.LOG", "")
            Dim fsStream8 As New FileStream(POLL_PATH + "\OUT\" + folder + "\832Cross.LOG", FileMode.Open, FileAccess.ReadWrite)
            Dim srWriter As New StreamWriter(fsStream8)

            srWriter.WriteLine("write here")
            srWriter.Close()

Catch ex As Exception
    MsgBox(ex.Message)
End Try

No comments:

Post a Comment