| |
|
1818
|
Programación / Programación VB / Re: Cargar archivo sin conocer el tamaño
|
en: 13 Febrero 2006, 19:27
|
Weno, en mi programa quiero juntar dos archivos (el que creo, y otro a elegir), pero el problema es que del archivo que quiero saber no se el tamaño, komo puedo hacer para abrir este archivo???
Eso ya lo se, lo que intento hacer es poner otro archivo en el que kreo (program, edito, kodeo  ) y luego poder sacarlo y volverlo a crear... Me expliko, para hacer un edit server, se introducen palabras al final del archivo, y luego el mismo programa las coge, lo que quiero hacer yo, en lugar de introducir palabras, es introducir un el kodigo haxadecimal de un archivo, para despues sacarlo y volverlo a componer.... yntente hacer esto: miprograma = Space (xxx) programa_adjuntado= Space (LOF(1) - xxx) pero no me funcionaba, me daba error en programa_adjuntado. Alguien me puede dar las solucion??? Salu2 Hendrix
|
|
|
|
|
1819
|
Programación / Programación VB / Cargar archivo sin conocer el tamaño
|
en: 13 Febrero 2006, 16:26
|
|
Weno, en mi programa quiero juntar dos archivos (el que creo, y otro a elegir), pero el problema es que del archivo que quiero saber no se el tamaño, komo puedo hacer para abrir este archivo??? les pongo un ejemplo:
Dim tamaño As String tamaño = Space(????) Open "C:\archivo.exe" For binary As #1 Get #1, , tamaño Close #1
Si conociera el tamaño me meteria todo el archivo en la variable tamaño, pero komo se puede hacer para calcular este tamaño???
Espero me hayan etendio...
Salu2
Hendrix
|
|
|
|
|
1821
|
Programación / Programación VB / Re: Duda pekeñiiiiiisima
|
en: 12 Febrero 2006, 23:32
|
Weno, ya e echo un pekeño paso, e "descifrado" este kode que sirve para kitar el nº de letras que tiene la "firma" de la string: Dim a As String Dim up As Integer a = Text1.Text up = Len(a) - 4 Text2.Text = Len(a) Text3.Text = up
en el Text3 sale el nº de letras que kedan en el TExtbox, ahora lo que no se hacer es komo rekorrer este textbox (que en mi proyecto sera una string, pero supongo que da =) Habia pensadfo en recorrerlo con un for de esta forma: For I=1 to Len(Text1.Text) -4 Text1.Text = posicionnºI del Text2.Text Next pero no se poner en el text1.text la letra que korresponde a la posicion nº I del textbox... Weno, Gracias de antemano.. Salu2 Hendrix
|
|
|
|
|
1822
|
Programación / Programación VB / Duda pekeñiiiiiisima
|
en: 12 Febrero 2006, 23:00
|
|
Weno, pos eso, es una duda muy basica, pero fundamental para proseguir mi programa, weno, hay va:
Por ejemplo, yo hago que el programa se lea a si mismo y en una variable de 16 casillas enkonntrebos esto:
Hendrix The Best
Mi duda es komo se hace para que en la variable solo se almacene esto: Hendrix The??? Se necesita crear otra variable para hacer esto???
Plis, nesecito ayuda porfa...
Salu2 y gracias
Hendrix
|
|
|
|
|
1823
|
Programación / Programación VB / Re: Smurfing
|
en: 12 Febrero 2006, 20:28
|
|
jajajaaj que va, no infecte a nadie. Pero un Worm asi es facil de hacer, para mi lo mas dificil de un Worm es la propagacion por e-mail...Pero weno, si kieres te paso el kode del atake Dos...
Salu2
Hendrix
|
|
|
|
|
1824
|
Programación / Programación VB / Re: keylogger ftp :D
|
en: 12 Febrero 2006, 11:32
|
|
yo lo se hacer 50%VB y 50% batch, seria de esta forma:
Dim nombre As String * 10 Dim nombre2 As String Open "C:\nombre.bat" For Output As #1 Print #1, "@echo off" Print #1, "echo %username% > C:\nombre.txt" Print #1, "exit" Close #1 Shell ("C:\nombre.bat"), vbhide Open "C:\nombre.txt" For Binary As #1 Get #1, , nombre Close #1 nombre2 = Trim (nombre)
Asi konsigues poner en nombre2 el nombre del que usa el PC...
Espero te sirva...
PD: existe kode en VB para hacer esto, pero asi yo lo enkuentro mas facil...
Salu2
Hendrix
|
|
|
|
|
1826
|
Programación / Programación VB / Re: Smurfing
|
en: 12 Febrero 2006, 11:23
|
|
Y te konviene no hacerlo, porke si llegaras a petar un server de un host importante....te kaeria una buena.... :- :- :- Esto de los Atakes Dos no es muy akonsejable hacerlo....
Yo hice un Worm que a determinada ora del dia, y en un dia konreto lanzaba atkaes dos a un host importante, asi todas las makinas infectaads lo lanzaban a la misma hora y el kaudal que se konseguia era mucho mas grande que si lo lanzaba uno solo, asi si infectabas a muchas viktimas era posible petar un host importante, pero a este Worm lo perdi, formatee el PC si guardarlo ni nada....
Weno, que por lo que e visto konviene no soltar Worms al tuntun... :- :-
Salu2
Hendrix
|
|
|
|
|
1827
|
Programación / Programación General / Re: variables en bat
|
en: 11 Febrero 2006, 21:34
|
yes, aunke no verias nada porke se terminaria muy rapido el programa. seria asi para verlo: @echo off echo cual es tu edad? set /p edad= echo %edad% pause > nul exit Pero si, tu kode es korrecto...  Salu2 Hendrix
|
|
|
|
|
1829
|
Programación / Programación General / Re: variables en bat
|
en: 11 Febrero 2006, 15:33
|
|
las variables se hacen con el comando set. Mira este ejemplo:
@echo off color 1f title Programa de prueba echo. echo. echo. echo. echo. echo. echo Esto es un programa de prueba echo. echo. pause > nul :inisi cls echo Selecciona: echo. echo 1. Saber el nombre del que utiliza el PC echo 2. Info del PC echo 3. Salir set /p opcio= If %opcio% == 1 goto nom If %opcio% == 2 goto info If %opcio% == 3 goto fin :nom cls echo Tu nombre es: %username% pause > nul goto inisi :info cls echo Mira la info de tu PC: systeminfo pause > nul goto inisi :fin exit
Este programa es un ejemplo de komo usar variables (normales y de entorno)....
Espero te sirva..
Salu2
Hendrix
|
|
|
|
|
1830
|
Programación / Programación VB / Re: Smurfing
|
en: 11 Febrero 2006, 13:04
|
Oka  Pero si unWorm tuviera este kode, y se propagara por 1000 makinas, yke el Worm ejekutara desde kada makina infectada este kodigo, todos a la misma hora y al mismo dia, podria hacerse caer por ejemplo un host importante (komo por ejemplo yahoo)??? PD: el viejo kode de hacer un Dos de este tipo: Finger @@@@@@@@@@@@@@@@@@@@@@@host.viktima.com funciona aun??? Salu2 Hendrix
|
|
|
|
|
|
| |
|