holas
Me pedido hacer una aplicación q tiene que constantemente tener una lista de los contactos conectados del msn abierto en la pc en la que este abierto.
El problema que el código que conseguí carga mucho el procesador, este hace trabajar a mi app y a el Messenger demasiado en el momento q se realiza la lectura.
Acá les dejo el script que uso:
Private objMsn As Object
Private Sub Form_Load()
Set objMsn = CreateObject("Messenger.UIAutomation")
End Sub
Private Sub Timer1_Timer()
For Each contacto In objMsn.mycontacts
If contacto.Status = 2 And contacto.signinname = strCont Then call play(strCont: Timer1.Enabled = False)
Next
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set objMsn = Nothing
End Sub
LO que ando precisando es un código que pueda hacerlo sin copar tanto el procesador. Graciass#
La parte de for.. es la que vuelve tu procesador mas rapido ya que lo haces trabajar demasiado seguido y rapido, lo que deberias de hacer es algunas pequeñas pausas al menos 100 milisegundos, podrias hacerlo cambiando el Interval del timer, si no tambien podrias hacer pequeñas pausas con Sleep que esta en la API Guide...
Ahora no estoy en mi PC asi que no puedo darte un ejemplo.. :)
SaluDOS!!!
usa la funcion sleep o DoEvents
uu que bolu como no me voy a olvidar eso, jaja gracias = la proxima reviso
lo arregle con WaitMessage y DoEvents gracias jej..