How can I read a Outlook .MSG file with VBScript?
From: news.microsoft.com (someone_at_microsoft.com)
Date: 10/26/04
- Next message: Yuri Weinstein \(HotMail\): "Check for file open handles"
- Previous message: Fan Fan: "call another vbscript"
- Next in thread: Ulf Dornheck Busscher: "Re: How can I read a Outlook .MSG file with VBScript?"
- Reply: Ulf Dornheck Busscher: "Re: How can I read a Outlook .MSG file with VBScript?"
- Reply: Stefan Engelbert: "Re: How can I read a Outlook .MSG file with VBScript?"
- Messages sorted by: [ date ] [ thread ]
Date: Tue, 26 Oct 2004 15:12:15 -0400
Hi all!
How can I read a .MSG file with vbscript? Ideally, I'd like to search for a
string in the text. The following code:
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Documents and
Settings\itpes\Desktop\emails\RE account # 74919D.msg", ForReading)
Do Until objFile.AtEndOfStream
Redim Preserve arrEmailLines(i)
arrEmailLines(i) = objFile.ReadLine
WScript.Echo "Line " & i & " " & arrEmailLines(i)
WScript.Echo InStr( "http", arrEmailLines(i) )
WScript.Echo "-------------------------------------------------"
i = i + 1 'Increase the counter
Loop
'Close the file
objFile.Close
Won't find HTTP in the .MSG file... Any ideas will ge greatly appreicated.
Thanks
Paul
- Next message: Yuri Weinstein \(HotMail\): "Check for file open handles"
- Previous message: Fan Fan: "call another vbscript"
- Next in thread: Ulf Dornheck Busscher: "Re: How can I read a Outlook .MSG file with VBScript?"
- Reply: Ulf Dornheck Busscher: "Re: How can I read a Outlook .MSG file with VBScript?"
- Reply: Stefan Engelbert: "Re: How can I read a Outlook .MSG file with VBScript?"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
