> >but this time depend of the server, no ?
>
> (a) this code don't works good, progress bar move all to the end of the
> process:
>
> private errore as integer
> private endprocess as boolean
>
> public sub SendMail()
> Dim n As Integer
> Dim x As Integer
>
> If txtTitle.text = "" Or EDITOR_MAIL.TextEdit1.RichText = "" Then
> errore = 1
> Message("Impossible to send data, data not complete")
> Else
> SmtpClient1.To.Add(toemail.text)
> SmtpClient1.Subject = txtTitle.text
> SmtpClient1.Add(EDITOR_MAIL.TextEdit1.RichText, "text/html")
> Timer1.Enabled = True
> ProgressBar1.Value = 0
> endprocess = False
> SmtpClient1.Send
> endprocess = True
> Message("Email sent.")
> Endif
> End
>
> Public Sub Timer1_Timer()
> ProgressBar1.Value = ProgressBar1.Value + 0.05
> If endprocess=true Then
> Timer1.Enabled = False
> End If
> End
>
> (b) I must have the possibility to send these mime types:
> Libre Office (Calc, Write, Impress)
> Office (Excel, Word, Powerpoint)
> Acrobat (Pdf)
> Images and video
> Can me explein the right code to add these file to the mail?
>
> Thx
>
> Andrea Bertini
>
The gb.net.smtp is not asynchronous at all. In other words, sending a mail
will block the event loop.
--
Benoît Minisini
------------------------------------------------------------------------------
BlackBerry® DevCon Americas, Oct. 18-20, San Francisco, CA
The must-attend event for mobile developers. Connect with experts.
Get tools for creating Super Apps. See the latest technologies.
Sessions, hands-on labs, demos & much more. Register early & save!
http://p.sf.net/sfu/rim-blackberry-1
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user
