This what i tried achieve,
as a part of a project, i created a small VB.NET program to read through outlook mail Inbox and
extract the body of certain emails and create a text file. following is very simplified version of the text file.
eg:---------------------------------------------------
Hi Don,
Name: Don
Last name: Dodempegama
Capital: 1500
Sent: Becky
Kind Regards,
Becky Wang Accounts
-----------------------------------------------------------
from above file I want to extract the values of Name,Last name,Capital and Sent ,
first i open the file to Read,
Dim oFile As System.IO.File
Dim oRead As System.IO.StreamReader
Dim intSingleChar As Integer
Dim cSingleChar As String
Dim s As String
oRead = File.OpenText("C:\test\c.txt")
then read the file one character at at time until the end. during the read I check for ":" in the text file. if I Detect ":" then I extract rest of the line.
While oRead.Peek <> -1
intSingleChar = oRead.Read()
' Convert the integer value into a character
cSingleChar = Chr(intSingleChar)
If cSingleChar = ":" Then
s = oRead.ReadLine.ToString
MsgBox(s)
End If
End While
simple yet effective.
Open Sourcing DOS 4
3 weeks ago