image o picture...

[vivachapas]

como pongo una imagen en un picture... o en un image... no se q me conviene para hacer (empezar a hacer) una funcion como la del bifrost... para poder hacer clicks en la pantalla de la victima...con screenshot y eso... los screenshot ya los pude hacer con el codigo de EON... tb recibirlos.. pero no se como cargarlos para verlos en un picture y poder hacer clicks...


si me ayudan muchas gracias...

[Jareth]

Buah lo del raton lo tenia pero lo borré,voy a ver si lo encuentro.
Para cargarlo es asi:

Código [Seleccionar] Expandir


Form4.Image1.Picture = LoadPicture("C:\captura1.jpg")


[~~]

Es mejor un picture, ya q tiene muchas mas opciones. Para hacer clicks, calculas las coordenadas en tu Pc y las envias, seguro q esto te vale:

http://foro.elhacker.net/index.php/topic,141712.msg665820.html#msg665820

1S4ludo

[Jareth]

Es mejor un picture, ya q tiene muchas mas opciones. Para hacer clicks, calculas las coordenadas en tu Pc y las envias, seguro q esto te vale:

http://foro.elhacker.net/index.php/topic,141712.msg665820.html#msg665820

1S4ludo

A mi me va bien el image por el stretch que ajusta la imagen auto.
Por cierto lo del raton:

Código [Seleccionar] Expandir


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
SetCursorPos X, Y
End Sub

Asi me envia el raton al quinto pino,no deberia moverlo donde esta?O igual lo mueve en relacion a las coordenadas del form,es decir si esta abajo a la izquierda del form lo mueve abajo a la izquierda de la pantalla,como lo tienes tu?

[~~]

Explicate un poco mejor.. Lo q hay q hacer es calcular las coorenadas respecto del piture y en el pc victima por llamarlo asi moverlo a esas coordenadas respecto de la pantalla..

[vivachapas]

ya lo pruebo!! perodonen xq no conteste nada pero hoy tuve un dia agitado... jeje

[vivachapas]

la parte de hacer click en el image y q el mouse se mueva a ese punto en el server va perfecto pero no puedo hacer q haga click en ese punto
el codigo es:

Private Declare Sub mouse_event Lib "user32.dll" (ByVal dwFlags As Long, ByVal dX As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10
Const MOUSEEVENTF_WHEEL = &H80
Const MOUSEEVENTF_XDOWN = &H100
Const MOUSEEVENTF_XUP = &H200
Const WHEEL_DELTA = 120
Const XBUTTON1 = &H1
Const XBUTTON2 = &H2

Case "Pos"
A = vData(1)
B = vData(2)
x = SetCursorPos(A, B)

q esta mal?? lo tengo todo en el form del server

[~~]

Pues q solo colocas el cursor, no le dices q haga click:

Código [Seleccionar] Expandir

mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
    mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0

[vivachapas]

si... perdonen es q justo habia modificado el codigo y no me di cuenta... el error es q ponia el boton derecho y era el izq...
ahora lo cambie y hace el click pero en otro lugar...
si pongo para q se posicione se posiciona exactamente en el lugar... pero cuando le agrego

mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
    mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0

se posiciona mal... muy a los extremos...

[vivachapas]

  nadie sabe??


q cagadon... me lo posiciona barbaro pero el problema es exactamente cuando pongo q haga click... cambia todo se mueve a cualquier lado... las apis las pude en un modulo... todo bien creeria...