Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - pachoduran

#1
Hola, muy interesante este tema, hice la prueba y me ha funcionado muy bien, he tratado de enviar un mensaje con una foto y no he podido, podrian ayudarme?

Modifique la funcion SendWA del ejemplo para poder enviar imagenes:

    Public Function SendWA(ByVal MSG As String, ByVal Num As String) As Boolean
        Dim usrMan As New WhatsUserManager()
        Dim imgSegnature As Image

        Dim tmpUser = usrMan.CreateUser(Num, "User")
        imgSegnature = Image.FromFile("p.jpg")
        Dim ms = New MemoryStream()
        You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login(ms, System.Drawing.Imaging.ImageFormat.Jpeg) ' Use appropriate format here
        Dim bytes = ms.ToArray()

        wa.SendMessageImage(Num, bytes, ApiBase.ImageType.JPEG)

        Return True
    End Function

Siempre se bloquea y nunca envia la imagen.

Muchas gracias. Dios los bendiga