[علي بنيان]

PHP كود :

Imports System.Net.Mail 


PHP كود :

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
    Friend WithEvents SmtpServer As New SmtpClient()
    Dim Mail As New MailMessage()
    Dim f As New OpenFileDialog 


PHP كود :

Mail.Attachments.Add(New Attachment(f.FileName))