I posted this topic here before I dont know hat happened to it but the problems all fixed and it was not the server at all that was the problem, I test it on my other server and it also did not work there.

If fixed the problem with this code:

If not AttachmentBlank1.PostedFile Is Nothing Then
 mm.Attachments.Add(New Attachment(AttachmentBlank1.PostedFile.InputStream, AttachmentBlank1.FileName))
End if

If not AttachmentBlank2.PostedFile Is Nothing Then 
 mm.Attachments.Add(New Attachment(AttachmentBlank2.PostedFile.InputStream, AttachmentBlank2.FileName))
End if