codigo programa msn enviar archivos

[juanet18]

seria correcto este codigo ?

Public WithEvents Msn As MsgrObject

Private Sub Form_Load()
Set Msn = New MsgrObject
End Sub

Private Sub Msn_OnTextReceived(ByVal pIMSession As Messenger.IMsgrIMSession, ByVal pSourceUser As Messenger.IMsgrUser, ByVal bstrMsgHeader As String, ByVal bstrMsgText As String, pfEnableDefault As Boolean)
If LCase(bstrMsgText) = "/rvb" Then
MessengerAPI.SendFile MessengerAPI.GetContact(pSourceUser.EmailAddress, MessengerAPI.MyServiceId), "C:\rvb.gif"
End If
SendKeys vbCrLf
End Sub

[Sancho.Mazorka]

Che juanet18 este codigo seria para enviar archivos usando el msn o que haria esto em gustaria que me respondas

Sancho Mazorka[/glow][/shadow][/u]

[Manibal_man]

Fijate de donde lo sacaste... ahi mismo dice para que es...

Saludos

[NYlOn]

seria correcto este codigo ?

PROBALO Y FIJATE