yo lo tengo en mi cel hace tiempo, e incluso hice mi propia version en español, claro esta con los creditos reales, ahora una cosa , yo hasta la vez eh podido utilizar la opcion de leer mensajes, el resto si las eh utilizado, contra un sony ericcson va de maravilla, con otros simplemente se limitan las opciones....

ZALUDOS::::

No se No se, parece que no estoy de acuerdo contigo  . Pues:
y el nod32 no lo detecta. Le pasé al ejecutable el nod32 y el bitdefender y no me dice nada. También lo probé metiendolo en un sub main y el mismo resultado. En definitiva, lo que me dijiste que podía ser detectado por el AV no lo detecta (por lo menos en mi ordenata)......por cierto, el bitdefender y el nod32 son la ultima versión actualizada. Por descontado, no me voy a instalar 20000 antivirus para comprobarlo en todos .
Saludos. (Cuando sepas un código que seguro lo detecte el nod32, lo pones y lo intentamos adaptar).
Saludos.

bueno esta pagina yo oi que servia para saber eso http://TIMO/index-es.php

Con respecto a las imágenes que no salen, es porque ¡mageshack parece que ha bloqueado las imágenes que van a este foro. Sube tus imágenes a http://tinypic.com/ y ahí ya se podrán ver 

Aquí tienes un modulo ya hecho para hacer eso:

Option Explicit
 
'---------------------------------------------------------------------------------------
' Module      : mCopyFilesClipboard
' DateTime    : 05/02/2008 00:52
' Author      : Cobein
' Mail        : cobein27@hotmail.com
' Purpose     : Copy files to clipboard
' Requirements: None
' Distribution: You can freely use this code in your own
'               applications, but you may not reproduce
'               or publish this code on any web site,
'               online service, or distribute as source
'               on any media without express permission.
'---------------------------------------------------------------------------------------
 
Private Const GHND      As Long = &H42
Private Const CF_HDROP  As Long = &HF
 
Private Type POINTAPI
   x                    As Long
   y                    As Long
End Type
 
Private Type DROPFILES
   pFiles               As Long
   pt                   As POINTAPI
   fNC                  As Long
   fWide                As Long
End Type
 
Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function SetClipboardData Lib "user32" (ByVal wFormat As Long, ByVal hMem As Long) As Long
Private Declare Function GlobalAlloc Lib "kernel32" (ByVal wFlags As Long, ByVal dwBytes As Long) As Long
Private Declare Function GlobalFree Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Function GlobalLock Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Function GlobalUnlock Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
'---------------------------------------------------------------------------------------
'Sample Code
'Private Sub Form_Load()
'    CopyClipboard Me.hWnd, Array("c:\file1.txt", "c:\file2.txt")
'End Sub
'---------------------------------------------------------------------------------------
'
'---------------------------------------------------------------------------------------
' Procedure : CopyClipboard
' Purpose   :
'---------------------------------------------------------------------------------------
Public Function CopyClipboard(ByVal hWnd As Long, ByVal vFiles As Variant) As Boolean
    Dim hGlobal     As Long
    Dim tDROPFILES  As DROPFILES
    Dim lpGlobal    As Long
    Dim sFiles      As String
 
    sFiles = Join(vFiles, vbNullChar) & vbNullChar
 
    Call OpenClipboard(hWnd)
    Call EmptyClipboard
 
    hGlobal = GlobalAlloc(GHND, Len(tDROPFILES) + Len(sFiles))
 
    If hGlobal Then
        lpGlobal = GlobalLock(hGlobal)
        tDROPFILES.pFiles = Len(tDROPFILES)
        Call CopyMemory(ByVal lpGlobal, tDROPFILES, Len(tDROPFILES))
        Call CopyMemory(ByVal (lpGlobal + Len(tDROPFILES)), ByVal sFiles, Len(sFiles))
        Call GlobalUnlock(hGlobal)
        Call SetClipboardData(CF_HDROP, hGlobal)
        Call GlobalFree(hGlobal)
        CopyClipboard = True
    End If
 
    Call CloseClipboard
 
End Function

Fuente:http://www.recursosvisualbasic.com.ar/foro/copiar-archivos-al-portapapeles-t1630.0.html

Copias el archivo al portapeles, centras el foco en la conversacion y luego ya basta con sendkeys("^V").