Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: demo666nio en 14 Agosto 2005, 02:42 am



Título: Algo creo que dificil :(
Publicado por: demo666nio en 14 Agosto 2005, 02:42 am
quiero,busco,deseo, anelo NECESITO!!! una forma de hacer lo siguiente: Ejecutar un programa y que ese programa busque un archivo en un directorio ya especificado y que lo mande por mail a una cuenta pero mediante un mail oculto o en segundo plano o como se llame! mi idea es hacer algo en visual basic(soy medio novato pero me las ingenio) sera eso posible??? yo se q tiene q haber un guru por aca q me de una mano.. de antemano GRACIAS!


Título: Re: Algo creo que dificil :(
Publicado por: soplo en 14 Agosto 2005, 03:07 am
No acabo de ver cual es el problema de eso. Solo que tiene trabajo.

¿?


Título: Re: Algo creo que dificil :(
Publicado por: BenRu en 14 Agosto 2005, 03:51 am
Es algo complejo...pero no imposible...
Puedes cojerte codigos de mails anonimos para que te sirvan de guia


Título: Re: Algo creo que dificil :(
Publicado por: Slasher-K en 14 Agosto 2005, 03:58 am
Claro que se puede hacer pero no esperes que te lo hagamos.


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 14 Agosto 2005, 05:20 am
Anhur.. yo no espero q me hagan nada! comentario bastante flojo el tuyo, ya tnego como enviar el mail sin q se den cuenta mediante el winsock (creo), toy teniendo drama en dos cositas, q espero me puedan ayudar (NO QUE ME LO HAGAN! QUERIDO ANHUR! :) ) uno, como pongo un archivo adjunto y dos (y este si es jodido!!) como podria yo comprimir el archivo q quiero llevar ya q es grande. Tirenme una idea no quiero q me lo hagan!! yo toy en el proyecto mas o menos encaminado el mail lo manda joyita :))) pero el archivo es muy grande y comprimido seria ideal si no voy a tener q hacer todo siin comprimir nada.. Ah y gracias por tomarse las molestias de contestar (es la primera vez q ando en un foro siempre leo nunca participo... gracias gente!)


Título: Re: Algo creo que dificil :(
Publicado por: Slasher-K en 14 Agosto 2005, 05:41 am
Para comprimirlo existe la librería gzip.dll. Para enviarlo como archivo adjunto debes usar MIME (Multipurpose Internet Mail Extensions (http://www.ietf.org/rfc/rfc2045.txt)).

Leete ese RFC que te explica bien como enviar los datos, y destaco que el archivo debe estar cifrado en base64.

Saludos.


Título: Re: Algo creo que dificil :(
Publicado por: programatrix en 14 Agosto 2005, 13:46 pm
Para comprimir creo que había un comando en el MS-DOS pones:
shell "elcomandoquesquenolese"
Y se tendría que comprimir, seguro que Anhur sabe el comando  :)


Título: Re: Algo creo que dificil :(
Publicado por: sorcerer en 14 Agosto 2005, 21:25 pm
lokos que se la agarran con anhur viene un pendejo/tipo y dice que quiere un programa asi y asa, no nos da ni un codigo que empezo ni nada que ya iso, lo primero que pense es que kiere que se lo hagan


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 14 Agosto 2005, 23:54 pm
okey okey.. me exprese mal.. mi idea no era esa! ahora voy a probar con lo que me dijeron... y una vez q lo tenga casi listo ahi si les voy aponer el codigo y toodo asi no me RETAN! y me dan una manito con lo q me falta!!! voy a ver como hago ... dios proveera.. :) GRACIAS A TODOS!


Título: Re: Algo creo que dificil :(
Publicado por: sorcerer en 15 Agosto 2005, 06:29 am
la verdad te daria una mano pero mientras leia tu post no se me curria ningun cogido. esto te da el codigo de un mail sender: http://foro.elhacker.net/index.php/board,50.0.html seguro que ya lo viste pero po las dudas


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 15 Agosto 2005, 19:22 pm
Si lo lei sorcerer, con eso empece gracias igual... ahora voy a ver como hago para comprimir el archivo q quiero y enviarmelo en forma oculta adjuntado.. ja, cuando se me complique les aviso.


Título: Re: Algo creo que dificil :(
Publicado por: .pUnÏsHEr. en 15 Agosto 2005, 23:08 pm
Es algo muy complejo lo primero que se tiene que hacer es crear un codigo que nos busque determinado archivo, si el archivo es encontrado que envie este "archivo por e mail" es algo complejo pero puedo hacerlo claro siempre acambio de algo ¿Que ofreces?  ;D


Título: Re: Algo creo que dificil :(
Publicado por: Slasher-K en 15 Agosto 2005, 23:24 pm
En el DOS no existe un comando para comprimir, al menos que yo sepa. Existía en win9x un programa (no comando) que era extract que extraía archivos de un contenedor (CAB), pero en el XP ya no existe creo.

Saludos.


Título: Re: Algo creo que dificil :(
Publicado por: .pUnÏsHEr. en 15 Agosto 2005, 23:33 pm
Lo que planearia seria lo siguiente:
Que el programa se ejecute pero en modo invisible (el programa que crearemos) despues que busque determinado archivo claro para esto debemos saber en donde se encuentra el archivo, Que haga una carpeta nueva y copie el archivo y lo mande a esta carpeta, seguido que mande la copia del archivo via e-mail pero creo que esto ultimo no pasaria desapercivido (claro programarlo para que lo mande a cierto correo) el unico detalle seria hacer que mande el archivo sin ser descubierto y bueno creo que eso seria todo como lo dije es muy complejo pero de que se puede hacer se puede  :P


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 16 Agosto 2005, 01:23 am
.pUnÏsHEr. jaja te ofreceria a mi hermana pero no te conozco! ;D Hablando de enserio... yo se la carpeta donde esta ese archivo y se el nombre.(un problemita menos! :) tambien se como hacer para q se ejecute en esa makina (otro problema menos). Ahora te cuento algo, yo estuve mirando un codigo q pusieron en este foro para enviar mail a partir del comando winsock y lo envie (digamos "oculto") ya que hice un botoncito q se apreto y ZAS me llego el mail a mi cuenta sin que alla prueba alguna! ahora tenog el problema de q no se como carajo adjuntarle el archivo y enviarlo.. me temo q con el winsock no voy a poder..(kizas si.. soy novato con el control este)... Habiendo logrado q se envie un adjunto en esta forma ya tendria una gran paso hecho! Ahora me keda zipear ese archivo porque es medio pesadito...
Como dato se que en la makina q se va a ejecutar corre bajo win98, y no tiene firewall y tiene el nod.. (yo tamiben pero no me jodio enviar mail con winsock)...


Título: Re: Algo creo que dificil :(
Publicado por: ..::[ thekingkid ]::.. en 16 Agosto 2005, 01:51 am
tu quieres que se adjunte pero que sea como oculto algo asi como que este en una imagen o algo por el estilo
o quieres que no aparezca adjunto ????
 tal vez lo puedas poner en base 64 no recuerdo bien  o podras adjuntar el archivo pasalo a binario o 64  y luego lo adjuntas como un txt funciona si no tiene parchado el internet explorer si es lo que te entendi


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 16 Agosto 2005, 02:05 am
Te explico: yo quiero que me lo envie adjuntado en el mail hecho con el codigo que dan en esta pagina (con el winsock). O sea la idea es que nadie se entere que se esta enviando un mail... y obviamente que en ese mail esta el archivo que yo quiero! Se entiende=?


Título: Re: Algo creo que dificil :(
Publicado por: .pUnÏsHEr. en 16 Agosto 2005, 23:14 pm
Haber te dare una pequeña ayudadita ya que me ha quedado la espina y anteriormente realice un programa que te permitia adjuntar archivos es algo muy simple no se si soporte todos los tamaños yo solo ponia trabajos de worpad pero vb no lo posee como una funcion sino que hay que abrir el otro archivo cargarlo a una variable y luego cargarlo dentro del .exe de la misma aplicacion luego al final se almacena una tabla con los limites del archivo luego se cortan usando estos datos con mid y luego guardas cada parte como archivo independiente haber me puse a trabajar en mi ordenador para sacarlo haber pasemos pues a lo que he generado:



Project: AddFiles.VB6
Option Explicit

Private Sub Form_Load()
Dim sFilesAdded As String
Dim outputFile As String

outputFile = App.Path & "\setup.exe"
Open outputFile For Binary As #1

Call appendFile("client.exe")
Call appendFile("admutil.dll")
Call appendFile("sample.dat")

Close #1
End Sub

Private Sub appendFile(filename As String)
Dim fileBuf As String
Dim filenameLen As Integer
Dim filesize As Long
Dim filePosition As Long
Dim footerIdent As String
Dim footerPosition As Long

footerIdent = "PUNI-FOOTER-IDENT"
filenameLen = Len(filename)
filePosition = LOF(1) + 1

'read in file to append, slurp into a String
Open App.Path & "\" & filename For Binary As #2
filesize = LOF(2)
fileBuf = String(filesize, Chr(0))
Get #2, 1, fileBuf
Close #2

' append the file
Put #1, filePosition, fileBuf

' write the footer record
footerPosition = filePosition + filesize
Put #1, , filenameLen
Put #1, , filename
Put #1, , filesize
Put #1, , filePosition
Put #1, , footerIdent
Put #1, , footerPosition
End Sub
 :P


Título: Re: Algo creo que dificil :(
Publicado por: Manibal_man en 17 Agosto 2005, 02:35 am
El "comando de dos" para comprimir... es verdad no existe ninguno... salvo el extract de win como dijo slasher-k para los DL_ o EX_, etc...  Pero creo que reydelmundo se referia al PKZIP y al PKUNZIP que en realidad son 2 programas completamente desligados de MS, que de hecho si no me equivoco son los creadores del .zip, o bien los que hicieron popular el formato de compresion.

igualmente es mucho mas correcto y prolijo usar el .dll para mi.

Saludos


Título: Re: Algo creo que dificil :(
Publicado por: demo666nio en 17 Agosto 2005, 03:26 am
a ver... punisher.. por lo q entendi al ejecutar y leer el programita rapidamente (xq recien llego de trabajar y tengo ya los ojos cruzados) el programa éste seria para.. esconder mis archivos en un exe y luego, cuando se ejecuta, largarlos en la makina victima?..es asi?
(loco, de paso te agradezco x la mano q me estas dando y al resto tambien ;) )


Título: Re: Algo creo que dificil :(
Publicado por: .pUnÏsHEr. en 17 Agosto 2005, 22:24 pm
 :-\ Abre un archivo, lo carga a una variable, luego lo carga dentro de un .exe, despues lo almacena en una tabla, luego lo corta usando datos con mid y luego guarda cada parte como archivo independiete ¿Me he explicado?  :P