04-03-24, 01:29 AM
(آخر تعديل لهذه المشاركة : 04-03-24, 03:05 AM {2} بواسطة new_programer.)
دة الكود المستخدم
كما حاولت ادراج مرفق مع الرسالة - لم اتكمن من الوصول الى الطريقة
---- محتاج ارسل الرسلة بالشكل دة
كود :
Try
Dim web As New WebBrowser
web.Navigate("whatsapp://send?phone=" & txtmob.Text & "&text=" & txtmessage.Text.Replace(" ", "+") & "")
'web.Navigate("whatsapp://send?phone=" & txtmob.Text & "&text=" & txtmessage.Text = "D:/99.pdf")
Timer1.Start()
Catch ex As Exception
Timer1.Stop()
End Tryكما حاولت ادراج مرفق مع الرسالة - لم اتكمن من الوصول الى الطريقة
---- محتاج ارسل الرسلة بالشكل دة