Dart Support Forum|PowerTCP Mail for ActiveX|How Find Method Works?

Author	Forum: PowerTCP Mail for ActiveX Topic: How Find Method Works?
Vince100719 From: Taxes, TX USA Posts: 6 Member Since: 03/20/05	posted March 27, 2005 1:15 PM Private Function StripOutEncoding() As String Dim s As String Dim p As Part Dim date As String ' Add Headers as Data from main part s = Msg.Content(msgHeader, msgString) + Msg.Text + vbCrLf For Each p In Msg.PartList s = s + p.Header.All + vbCrLf date = p.Header.Find(msgDate) If p.File <> "" Then s = s + vbCrLf + "<< File saved as: " + p.File + " >>" + vbCrLf + vbCrLf filename = p.File Text1.Text = filename Else s = s + vbCrLf + p.Data + vbCrLf End If Next If Len(s) > 20000 Then s = Left(s, 20000) StripOutEncoding = s End Function
Vince100719 From: Taxes, TX USA Posts: 6 Member Since: 03/20/05	posted March 27, 2005 1:20 PM The Above Function is come from POP client, how ever i want to get date, subject, and all information in peices to store into database. The date variable added and I tried to get the msgDate and so on. There is empty value, did I make any mistake on the "Find"?
Tony Priest From: Utica, NY USA Posts: 8466 Member Since: 04/11/00	posted March 28, 2005 7:29 AM I'm sorry, but I don't understand what you are asking. Maybe you can rephrase your question?

This site is powered by PowerTCP WebServer Tool