denn die wollen sich bei mir nie vertragen ;-)
Und zwar folgender Code:
===========================================================================
Sub Application_NewMail()
Dim itm as Outlook.MailItem, MailText As String
Dim Dateiname As String, Ordner As String, Zeile As String
Ordner = "D:\Mailsttest\"
With Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)
For Each itm In .Items
If Instr(itm.Body, "=== Customer", vbTextCompare) = True Then
MsgBox "Neu Trafficdaten sind da!"
End IF
Next
End With
End Sub
===========================================================================
In dieser Zeile meint er das die Typen unvertr�glich sind...
If Instr(itm.Body, "=== Customer", vbTextCompare) = True Then
Can anybody help me?
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
