| Dart Home | PowerTCP Mail for ActiveX | Custom Development | Reply | PowerTCP Mail for ActiveX Topics | Forums |
| Author | Forum: PowerTCP Mail for ActiveX Topic: Problem with Attachment |
| User169 Posts: 2 Member Since: 03/21/02 |
posted March 21, 2002 7:52 AM Hi I send Attachtment with the SMTP-OCX under Access XP. Because the Attachment become the extension EMF.Thats my VBA Code. Whats wrong? Private Sub Befehl6_Click() On Error GoTo ErrorHandler Dim Msg As New Message Dim OldMsg As New Message OldMsg.Load "C:\WarezListe.doc" Msg.To.Add "kontakt@thomaswendt.de" Msg.Header.Add msgSubject, "Merger Information" Msg.AddText "Including two messages from Bill related to the issue." Msg.AddText "Scheiß Software ÄÖÜ äöü ßßß" Msg.AddMessage "C:\Fehler.txt" Msg.AddMessage OldMsg.Content Smtp1.Login "smtp.test.de", , "myusername", "mypassword" ' start the mail session Smtp1.Message = Msg ' set message Smtp1.Send ' send message Smtp1.Logout ' end session MsgBox "Message Sent!" ' no errors generated gets us here Exit Sub ErrorHandler: If Err.Number = 12014 Then Smtp1.Logout Beep Else MsgBox Err.Description, vbOKOnly Or vbCritical, "Error: " & Err.Number End If End Sub |
K M Drake![]() From: Utica, NY USA Posts: 3406 Member Since: 07/14/00 |
posted March 21, 2002 6:27 PM Hi, I'm sorry, I do not understand what you are asking. What problem are you seeing or what error is raised? Thanks, -ken K M Drake Dart Tech Support |
| User169 Posts: 2 Member Since: 03/21/02 |
posted March 21, 2002 10:41 PM Hi I will send attachments with extension EXE, DOC, XLS, ore anything. But when i send the attachment with name word.doc to the email adress and the user open the attachment, than have the attachment the name ATT00085.eml and not WORD.DOC Thomas Sorry. My english writing is not so good. |
K M Drake![]() From: Utica, NY USA Posts: 3406 Member Since: 07/14/00 |
posted March 22, 2002 12:11 PM Hi, I just created a message with 2 attachments: 1) a doc 2) a message with a doc attachment The resulting message was fine. Please get the latest update: http://www.dart.com/downloads/update.exe and see if the code below works for you. Thanks, -ken Smtp1.Message.To.Add toAddress Smtp1.Message.From = fromAddress Smtp1.Message.Subject = "Test Message" Smtp1.Message.AddText "Test Message" Smtp1.Message.AddMessage "messageWithAttach.eml" Smtp1.Message.AddAttachment "test.doc" K M Drake Dart Tech Support |
| Reply | PowerTCP Mail for ActiveX Topics | Forums |
This site is powered by
PowerTCP WebServer for ActiveX
|