13-05-22, 11:49 AM
مرحبا
اقدم لكم طريقة سهله لمعرفة عدد مستخدمي برنامجك
اولا نظيف المكتبة التالية
Imports System.Net.Mail
وبعد ذالك نظيف زر ونضع فية الكود التالي
شرط ان يكون الايميل المرسل منه hotmail
واضفنا الموضوع My.Computer.Name
اسم كمبيوتر العميل وبهذة الطريقة نعرف العدد بدون استخدام socket
PHP كود :
Dim Smtp_Server As New SmtpClient
() Dim e_mail As New MailMessage
Smtp_Server.UseDefaultCredentials = False
Smtp_Server.Credentials = New Net.NetworkCredential("you email", "password email")
Smtp_Server.Port = 587
Smtp_Server.EnableSsl = True
Smtp_Server.Host = "smtp.office365.com"
e_mail = New MailMessage()
e_mail.From = New MailAddress("you email")
e_mail.To.Add("to email")
e_mail.Subject = "Email Sending"
e_mail.IsBodyHtml = False
e_mail.Body = My.Computer.Name
Smtp_Server.Send(e_mail)