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