Here's what you have...
Sub btn_Click
'Parses a raw mail message and returns a Message object
'Mail - The mail raw text
'AttachmentsDir - Attachments will be saved in this folder
'
'Example: <code>
Dim m As Message
m = MailParser.ParseMail("Content-Type: text/plain; charset=" & QUOTE & "utf-8" & QUOTE, File.DirRootExternal)
Log(m)
End Sub
Sub ParseMail(Mail As String,AttachmentDir As String) As message
index = 0
multipart = Flase
boundary =""
Dim msg As message
msg.initialize
msg.Attachments.initialize
End Sub
Hi, you have put the documentation comments inside the btn_click sub. It shouldn't be in any sub. You need to put the documentation comments directly above the Sub declaration you want the documentation for... with no blank lines. You also need to comment ALL lines, including the code.
Finally, you need to put <code> at the beginning of the code example AND </code> at the end of the code example.
'Parses a raw mail message and returns a Message object
'Mail - The mail raw text
'AttachmentsDir - Attachments will be saved in this folder
'
'Example: <code>
'Dim m As Message
'm = MailParser.ParseMail("Content-Type: text/plain; charset=" & QUOTE & "utf-8" & QUOTE, File.DirRootExternal)
'Log(m)</code>
Sub ParseMail(Mail As String,AttachmentDir As String) As message
index = 0
multipart = Flase
boundary =""
Dim msg As message
msg.initialize
msg.Attachments.initialize
End Sub
Hope that clears things up....