[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