elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección


  Mostrar Temas
Páginas: 1 2 3 4 5 6 [7] 8
61  Programación / Scripting / diferencias de dos txt en: 29 Septiembre 2010, 04:14 am
buenas aca les traigo un code que habia hecho para comparar dos txt que tienen esta extructura
el primero ideal2.txt
Citar
4
824
896
920
964
976
1128
1204
1244
1368
1492
1640
1708
1808
412
416
1296
540
636
y el segundo lista2.txt
Citar
4
684
1012
1056
1132
1144
1376
1452
1552
1596
1712
1916
332
440
476
532
556
648
676
792
276
1672
1316
2092
2316
2564
2588
2628
3880
1264
1604
1492
3116
3464  
...bue en definitiva el code utiliza un razonamiento "algo de burbuja"  ;D mas o menos parecido a esto lee del primer txt el primer renglon lo busca en el segundo linea a linea y si es igual lo elimina de los dos txt de esa forma quedarian en el segundo txt (supuesto el 2.txt es mas largo   :silbar:) solo las diferencia de los dos...ud diran pero son numeros...bue es teoria funcionaria para renglones con letras(string) pero recuerden que bat es no recuerdo como es en ingles pero es sensitivo...o sea una coma de mas y es distinto un renglon de otro de alli la importancia de como plantear bien como van a ser los txt....y para no seguir aburriendo aca el code opinen y si a alguien le sirve barbaro
Código:
@echo off
:contador1
  set /a contador=0
for /f "tokens=*" %%_ in (IDEAL2.txt) do (
    set /a contador+=1)
 set /a var=%contador%

:ini
 if %var%==0 (goto fin) else set /A var=%var%-1
 <"IDEAL2.txt" set /p "string="
 set "string"
 for /f "tokens=1 delims=:" %%_ in ('findstr /i /n /r "^%string%" "lista2.txt"') do (set "n_line=%%_")
 (ECHO %n_line%dECHO E) | EDLIN /B lista2.txt > nul 2>&1
 (ECHO 1dECHO E) | EDLIN /B IDEAL2.txt > nul 2>&1
goto ini
62  Programación / Scripting / se puede hacer tunneling?(solucionado) en: 31 Agosto 2010, 15:36 pm
ando buscando una forma de hacer tunneling con un bat...se puede hacer?
que comando necesitaria
63  Programación / Scripting / Activar dll Nero Portable en: 19 Agosto 2010, 16:35 pm
este bue este code lo hice xq me molestaba un nero portable q habia instalado con el tema de la activacion de dll...asi q hice este bat si encuentran algun defecto o correcion avisan
Código:
@echo off
IF EXIST C:\\ (FOR /R "C:\Archivos de programa\Nero 7.10.1.0 Portable" %%x in (*.dll) DO echo %%x >> C:\\list.txt) ELSE echo NO EXISTE

set /a contador=0
for /f "tokens=*" %%_ in (list.txt) do (
set /a contador+=1)
set /a a=%contador%

:sigue
if %a%==0 (goto listo) else set /a a=%a%-1
<"list.txt" set /p "pri="
set "pri"
REGSVR32 /s %pri%
if %errorlevel% == 1 goto error
(
ECHO 1d
ECHO E
) | EDLIN /B list.txt > nul 2>&1
goto sigue

:error
echo algo paso
pause>nul
exit

:listo
del list.txt
del list.bak
echo lo acabamos de terminar ojala funcione
pause>nul
exit
64  Programación / Scripting / con este bat puedo tener cuenta de adm?(solucionado) en: 19 Agosto 2010, 16:26 pm
holis aca molestando de vuelta estaba leyendo en varios foros y en este como modificar la contraseña de administrador....es q en mi trabajo la perdi  :rolleyes:  :¬¬ y es parta un amigo  ;D ;D y no quiero quedar como un tonto si no funciona
bue aca el bat y me dicen si es cierto q con eso funcione
Código:
FOR /F "tokens=*" %%a IN ('net user ^| find /i "Administrador"') DO (
set pa=%%a
)
set adm=%pa:~25,25%
echo te va a pedir que ingreses dos contraseñas
echo  ingresalas si sale bien te pide
echo que reinicies y pongas la nueva nueva contraseña que pusiste
net user %adm%*
if %errorlevel% ==1 goto opc2
:opc2
set time1=%time:~0,2%
set time2=%time:~3,2%
set /a time2=%time2% + 2
at %time1%:%time2% /interactive "cmd.exe"
start taskmgr.exe
echo este bat lo cierra volver a activar el explorer.exe manualmente
pause>nul
taskkill /f /t /im explorer.exe
aclaro estoy bajando tambien el ophcrack por las deudas pero quedaria mas cheto ("soy medio lamer"  ;D) hacerme el que con algo mio le saque la contraseña.... :laugh: :laugh:
65  Programación / Scripting / conectividad internet en: 12 Agosto 2010, 01:18 am
 ;D estaba probando y salio esto es para ver la conectividad a la internet y si no la tiene q haga un ruido la pc ideal cuando estas usando un gestor de descarga y queres seguir estudiando  :silbar:....si a alguien le sirve lo copia y listo  ;)....tambien se aceptan criticas pero constructivas no me manden a leer tutos... ;D  :laugh:
Código:
@echo off
title conectividad internet copyright by flony :)
color 17
mode con: cols=50 lines=3

  :ini
ping -n 2 www.google.com && (set "res=1") || (set "res=0")
if %res%==0 (goto llamada) else goto opc2

  :llamada
echo 
echo 
echo 
echo 
echo 
echo 
echo error de conexion>>res.txt
set hora=%time:~0,5%
echo %hora%>>res.txt

  :opc2
cls
ping -n 45 127.0.0.0>nul
goto ini
66  Programación / Programación C/C++ / piedra papel tijera....en c++ en: 28 Julio 2010, 17:22 pm
hola gente aca les pongo el code que voy haciendo todavia falta que use las sentencias pensaba en switch o en if para que eliga entre las tres opciones y cual gana....pero bue como voy falta algo se aceptan  criticas pero constructivas  :¬¬ ...
Código:
#include <iostream>
#include <stdlib>
#include <stdio.h>

using namespace std;
ResultadoAzar(int piedra, int papel, int tijera, int azar);
IngresarDatos();
GenerarAzar(int);
int IngresoDatos()
{
  cout << " Ingresa 1 para papel \n papel ";
  cin >> papel;
  cout << " Ingresa 2 para piedra \n piedra ";
  cin >> piedra;
  cout << " Ingresa 3 para tijera \n tijera ";
  cin >> tijera;
  return IngresarDatos;
}
int GenerarAzar()
{
int range_max = 3, int range_min = 1;
int i;
   for ( i = 0; i < n; i++ )
   {
      int u = (double)rand() / (RAND_MAX + 1) * (range_max - range_min)
            + range_min;
   }
   return GenerarAzar;
}
67  Programación / Scripting / vectores (solucionado) en: 23 Junio 2010, 05:27 am
a ver gente estos codes que mando todavia estan en veremos a ver paso a explicar el problemita que tengo quiero trabajar con vectores y aunque se que se puede y vi por ahi un code queria hacer el mio y empece con los pid de los procesos es para buscarle alguna utilidad  :rolleyes: despues aplicare los taskkill a esos pid en fin son tres codes los dividi tipo funciones q cada uno haga una parte despues los junto a todos en uno solo...en fin mi objetivo es lograr que al comparar dos listas de numeros me de los que son distintos entre cada uno de los txt borre los iguales y los distintos los ponga en un txt  :¬¬ pero usando estos tipos vectores....aclaro el 3.bat no tienen el clasico
Código:
@echo off
xq asi los voy probando en C:\ a medida que se me surge algo, ejecutarlo me doy cuenta que puedo tener esas variables renglon por renglon pero no le hallo la vuelta para poder usarlos
1.bat
Código:
@echo off
:preparar
tasklist>>lista.txt
:modificar
type lista.txt
for /f "tokens=1-5" %%a in ('type lista.txt') do (
echo %%b >> lista2.txt
)
(
ECHO 1d
ECHO E
) | EDLIN /B lista2.txt > nul 2>&1
(
ECHO 1d
ECHO E
) | EDLIN /B lista2.txt > nul 2>&1
(
ECHO 1d
ECHO E
) | EDLIN /B lista2.txt > nul 2>&1
del /Q lista.txt
del /Q LISTA2.BAK
exit

2.bat
Código:
@echo off
:llamar
copy /v E:\Flony\ideal.txt
:cambiar
type ideal.txt
for /f "tokens=1-5" %%a in ('type ideal.txt') do (
echo %%b >> ideal2.txt
)
(
ECHO 1d
ECHO E
) | EDLIN /B ideal2.txt > nul 2>&1
(
ECHO 1d
ECHO E
) | EDLIN /B ideal2.txt > nul 2>&1
(
ECHO 1d
ECHO E
) | EDLIN /B ideal2.txt > nul 2>&1
del /Q ideal.txt
del /Q IDEAL2.BAK
exit

y por ultimo el interesante
Código:
:variables
set /a contador=0
for /f "tokens=*" %%_ in (IDEAL2.txt) do (
set /a contador+=1)
set /a a=%contador%

set /a contador=0
for /f "tokens=*" %%_ in (LISTA2.txt) do (
set /a contador+=1)
set/a  b=%contador%

REM ACA EMPIEZA LA PRIMERA MATRIZ
set var=%a%
set numerovariable=0
pause
:bucle1
set /a numerovariable=%numerovariable%+1
if %var%==0 (goto matriz2) else set /A var=%var%-1
<"IDEAL2.txt" set /p "linea%numerovariable%="
set "linea%numerovariable%"

(
ECHO 1d
ECHO E
) | EDLIN /B IDEAL2.txt > nul 2>&1
goto bucle1

:matriz2
REM ACA EMPIEZA LA SEGUNDA MATRIZ
set vari=%b%
set numerovaria=0
pause
:bucle2
set /a numerovaria=%numerovaria%+1
if %vari%==0 (goto calcular) else set /A vari=%vari%-1
<"LISTA2.txt" set /p "linea%numerovaria%="
set "linea%numerovaria%"

(
ECHO 1d
ECHO E
) | EDLIN /B LISTA2.txt > nul 2>&1
goto bucle2

:calcular
del /Q lista2.txt
del /Q LISTA2.BAK
del /Q ideal2.txt
del /Q IDEAL2.BAK
echo %%linea%numerovariable%%

como ven si las pongo desde el bat funciona


editado
encontre la solucion en un tuto de smart sobre polimetria y porque bolivianito me lo dijo q leyera sobre ese tema
Código:
set /a numerovariable=5
call set pid=%%linea%numerovariable%%%
echo %pid%
ahora a hacer un bucle para que crezca numerovariable total ese dato la tengo
68  Programación / Scripting / caracteres especiales en: 1 Junio 2010, 03:27 am
hola gente aca molestando de vuelta yo como siempre :rolleyes: bue al grano me interesa saber sobre los caracteres especiales  ;D le puse ese nombre porque no se como denominarlo son
Citar
" ' doble %% ^  !
o sea son 5 los caracteres.
si se para que funcionan & |...pero los otros se me complican un tanto el uso de las mismas
se que "" es para textos con espacio pero mezlados se me confunde su uso ejemplo " ' y cosas parecidas
encontre algo pero se me hace chino basico a mi  :¬¬
http://ss64.com/nt/syntax-esc.html
hasta me baje el babilon asi los tradusco  :laugh:
si no es mucho pedir algun ejemplo  :silbar: no viene mal  :rolleyes:
69  Foros Generales / Foro Libre / feliz cumple argentina en: 25 Mayo 2010, 05:58 am
 ;D ya se no tiene nada que ver  :silbar: pero bue feliz cumple argentina 2 siglos no se cumple todos los dias  :rolleyes:....y vamos por el regalo...el mundial para nosotros  ;-)...situacion final con brasil quedan 15 minutos metemos una con la mano  :o una en posicion adelantada  :P y por ultimo una genialidad de messi  ;-) y terminamos el cuarto en el ultimo segundo tevez  :rolleyes:
70  Comunicaciones / Chats; IRC y Messengers / recuperar mis email borrados de la bandeja y papelera del hotmail en: 21 Mayo 2010, 14:15 pm
hay alguna forma de recuperar mis email borrados de la bandeja y papelera del hotmail xq los necesito hay informacion muy importante
Páginas: 1 2 3 4 5 6 [7] 8
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines