Guten Morgen,
habe ein dringendes Problem bei dem mir andere Beiträge kaum helfen da ich eine Syntax nicht verstehe.
Ich habe eine Datei (Pfad und name werden mir in einer Variablen übergeben) und möchte in dieser nach dem Wort "From" suchen.
Sieht ca so aus die Datei von innen:
ýÿf €k J €¡‘ µ ç €
V• æ €
`• €— j• €c ¤ € d¥ ! € ~Õ¡W°
€ €+ ¥ € Received: with MailEnable Postoffice Connector; Wed, 3 Aug 2016 11:30:11 +0200
Received: from EHLEN ([217.92.191.12]) by steinau.com with MailEnable ESMTP; Wed, 3 Aug 2016 11:30:09 +0200
From: <absender@absender.com>
To: <empfaenger@empfaenger.com>
Subject: betreff
Date: Wed, 3 Aug 2016 11:29:02 +0200
_______________
Jetzt möchte ich nach From suchen und die Email des Absenders rausfiltern.
Hab das hier mal versucht aber verstehe einfach nicht wie genau das geht.
HILFE!
habe ein dringendes Problem bei dem mir andere Beiträge kaum helfen da ich eine Syntax nicht verstehe.
Ich habe eine Datei (Pfad und name werden mir in einer Variablen übergeben) und möchte in dieser nach dem Wort "From" suchen.
Sieht ca so aus die Datei von innen:
ýÿf €k J €¡‘ µ ç €
V• æ €
`• €— j• €c ¤ € d¥ ! € ~Õ¡W°
€ €+ ¥ € Received: with MailEnable Postoffice Connector; Wed, 3 Aug 2016 11:30:11 +0200
Received: from EHLEN ([217.92.191.12]) by steinau.com with MailEnable ESMTP; Wed, 3 Aug 2016 11:30:09 +0200
From: <absender@absender.com>
To: <empfaenger@empfaenger.com>
Subject: betreff
Date: Wed, 3 Aug 2016 11:29:02 +0200
_______________
Jetzt möchte ich nach From suchen und die Email des Absenders rausfiltern.
VB.NET-Quellcode
- Public Function getsender(ByVal fx$) As String 'Passwort des Benutzers suchen
- If Right("FROM", 1) <> ":" & Space(1) Then fx = fx
- With CreateObject("scripting.filesystemobject").getfile(Fx & "0tx").openastextstream
- On Error Resume Next
- getsender = Split(Split(.readall, fx$)(1), vbCrLf)(0)
- End With
- End Function
Hab das hier mal versucht aber verstehe einfach nicht wie genau das geht.
HILFE!
~Wir leben zwar alle unter dem gleichen Himmel, aber es haben nicht alle den gleichen Horizont~