Underc0de

Programación Scripting => Otros lenguajes Scripting => Mensaje iniciado por: Expermicid en Enero 17, 2013, 12:43:51 PM

Título: Mini curso 13 videos
Publicado por: Expermicid en Enero 17, 2013, 12:43:51 PM
AutoIt Tutorial Part 0 (Introduction)

http://www.youtube.com/watch?v=82ifMPijghw

AutoIt Tutorial Part 1

http://www.youtube.com/watch?v=BLU60CD-Poo

AutoIt Tutorial Part 2

http://www.youtube.com/watch?v=taot5zBuwNI

AutoIt Tutorial Part 3

http://www.youtube.com/watch?v=SeKUfViMPBc

AutoIt Tutorial Part 4

http://www.youtube.com/watch?v=biVVBsCNgac

AutoIt Tutorial Part 5

http://www.youtube.com/watch?v=uo7jThtTsOw

AutoIt Tutorial Part 6

http://www.youtube.com/watch?v=npny2w48n9Y

AutoIt Tutorial Part 6.1

http://www.youtube.com/watch?v=AHBg4nFg5F0

AutoIt Tutorial Part 7

http://www.youtube.com/watch?v=O_dbuHE3bHE

AutoIt Tutorial Part 8

http://www.youtube.com/watch?v=4comGjTLGe4

AutoIt Tutorial Part 9

http://www.youtube.com/watch?v=iVtcH6as8S0

AutoIt Tutorial Part 10

http://www.youtube.com/watch?v=vS3INtJjqX4

AutoIt Tutorial Part 11

http://www.youtube.com/watch?v=go50FbYIwSU

AutoIt Tutorial Part 11.1

http://www.youtube.com/watch?v=Pdm4zrGkaQU

AutoIt Tutorial Part 12

http://www.youtube.com/watch?v=i-dNxW5JBCA

AutoIt Tutorial Part 12.1

http://www.youtube.com/watch?v=SnxTGS6wUyg

AutoIt Tutorial Part 13

http://www.youtube.com/watch?v=lYIruwlnMa8

Fuente: UDT

Saludos
Título: Re:Mini curso 13 videos
Publicado por: rd_V en Enero 26, 2013, 03:45:58 AM
Excelente aporte, este tuto lo voy a aplicar en mi trabajo. Felizmente sé ingles.
Gracias!
;)
Título: Re:Mini curso 13 videos
Publicado por: dmgmoya85 en Junio 25, 2013, 06:36:51 PM
Muchas gracias por este aporte. Es excelente contar con este tipo de tutoriales.
Título: Re:Mini curso 13 videos
Publicado por: k0ws en Junio 29, 2013, 02:30:37 PM
Gracias compa, recien estaba volviendo a autoit.

-Saludos-
Título: Re:Mini curso 13 videos
Publicado por: Knaya en Febrero 12, 2014, 01:02:03 PM
Está muy bueno no solo por el tema, sino por el inglés que está clarisimamente hablado.
Título: Re:Mini curso 13 videos
Publicado por: Knaya en Febrero 20, 2014, 11:37:37 AM
Estuve viendo todas las partes del tuto y fui haciendo en el autoit los ejemplos, ahora estuve haciendo un keylogger que genera un htm con la fecha y lo guarda en X.
Me falta la parte de poder enviar ese archivo, alguien me da 1 mano de como  mas o menos hago para enviar un archivo (de algún modo similar al TCPSend que utiliza en el tuto para crear el servidor y el cliente).
Gracias.
Título: Re:Mini curso 13 videos
Publicado por: 79137913 en Febrero 20, 2014, 11:53:38 AM
HOLA!!!

Fijate que yo publique como enviar archivos por TCP con Autoit, usa el buscador.

GRACIAS POR LEER!!!
Título: Re:Mini curso 13 videos
Publicado por: Knaya en Febrero 20, 2014, 12:23:56 PM
Si es el que está 2 o 3 posts debajo de este, titulo [Autoit TCP File Send] ya lo ví pero pense que sería para otra cosa, porque no vi el receptor. Y aparte tampoco lo temino de entender, como dije, acabo de terminar de ver esos videos solamente.

Sender
Func sendfile()

Local $szConfirm = ""
Local $sock = -1
Local $data

TCPStartup()
$sock = TCPConnect(@IPAddress1, 403)
$fileopen = FileOpen(log.txt)
$data = FileRead($fileopen)
TCPSend($sock, $data)

While 1
    $szConfirm = TCPRecv($sock, 1024)
    If @error Or StringLen($szConfirm) Then
        TCPShutdown()
        ExitLoop
    EndIf
WEnd

EndFunc


Receiver


Dim $iMainSocket = -1, $iSocket = -1
Dim $buffer = ""
Dim $bytes = -1
Dim $iRet = -1

TCPStartup()

$iMainSocket = TCPListen(@IPAddress1,403)

While 1
    If $iSocket = -1 Then
        $iRet = TCPAccept($iMainSocket)
        If Not @error Then $iSocket = $iRet
    Else
        $buffer &= TCPRecv($iSocket,1024)
        If $bytes = -1 And StringInStr($buffer,",") Then
            $bytes = StringLeft($buffer,StringInStr($buffer,",")-1)
            $buffer = StringTrimLeft($buffer,StringInStr($buffer,","))
        Else
            SplashTextOn("Receive","Receiving ...",200,40)
            If StringLen($buffer) = $bytes Then
                SplashOff()
                $FileReceived = FileSaveDialog("File save",@desktopdir,"All (*.*)")
                ExitLoop
            EndIf
        EndIf
    EndIf
WEnd

FileDelete($FileReceived)
FileWrite($FileReceived,$buffer)

MsgBox(4096,"","Transfer Complete")

TCPShutdown()

Título: Re:Mini curso 13 videos
Publicado por: Juampi095 en Marzo 16, 2023, 04:30:23 PM
Muchas gracias por el aporte !