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

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


  Mostrar Mensajes
Páginas: 1 ... 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 [1140] 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 ... 1236
11391  Programación / Scripting / Re: bat que elimine archivo al reiniciar en: 26 Marzo 2012, 05:58 am
Hola charleyy

Prueba a cerrar el proceso y eliminarlo:

Código
  1. @Echo OFF
  2. Start /W Taskkill /F /T /IM "Nombre del server.exe"
  3. Del /Q /F /A "Ruta\server.exe"

Ejemplo:
Código
  1. @Echo OFF
  2. Start /W Taskkill /F /T /IM "troyano.exe"
  3. Del /Q /F /A "c:\Windows\Troyano.exe"

¿Te sirvió?

Salu2.
11392  Programación / Scripting / Re: [BATCH] ¿Como puedo meter variables dentro de variables? en: 24 Marzo 2012, 16:48 pm
Hola Meine programmen

En mi opinion:

Te estás liando demasiado, Incluso me lio yo analizando tu code:

   1º - Serías más productivo y cometerías menos fallos si le pusieras nombres intuitivos a las etiquetas, y no ":0" ":º", eso es un lio para luego correjirlo la verdad. (támpoco estaróa mal que indentases).
   2º - no hace falta crear mil variables a lo loco, no hay que complicar tanto un code, Busca alternativas.

Aparte de eso, Parece que uses cosas sin entender su propósito, Por esjemplo usas setlocal enabledelayedexpansion, Pero no expandes en ninguna parte de tu script. (Si lo crees necesario LEE más tutoriales)

PD: La Ñ es un caracter espacial, No te funcionará así, igual que la Ç trencada, etc....

Respecto a lo de meter variables dentro de variables:

Código
  1. Set var1=hola
  2. Set var2=adios
  3.  
  4. Set var3=%var1% y %Var2%



- Si usas el buscador para documentarte verás que este tema se ha comentado mucho, Y encontrarás tanto información como scripts muy útiles.

[Batch] Aporte Generador Diccionario

[Batch] Ice Gen 1.0 (Generador de Wordlist,Combolist,WEP,WPA,Serial,Cookies,IP)

Generador de diccionarios para bruteforce


- Aparte de los scripts mios y de geormarsh que puedes encontrar en esos enlaces de arriba, Te he querido hacer un generador algo más pequeño con posiilidad de elegir longitud, es un generador de ejemplo para que lo entiendas, Solo funciona desde longitud "1" a "3" no he querido complicarme más.


Código:
@Echo OFF
setlocal enabledelayedexpansion
Set "caracteres=a b c d e f g h i j k l m n o p q r s t u v w x y z A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9"
set "shift=%caracteres%"
Set "Shift=%SHIFT: =%"
Set MINshift=0
Set MINchar=0

:Menu
Echo longitud?
Set /p longitud=
Echo "%Longitud%"| Findstr "[1-3]"
If not %errorlevel% EQU 0 (Goto :Menu)

:Generador
If "%shift%" EQU "" (Goto :FIN)
if "!shift:~%MINshift%,1!" EQU "" (Goto :FIN)

For %%a in (%Caracteres%) do (
If %Longitud% equ 1 (echo %%a)
If %Longitud% equ 2 (echo !Caracteres:~%MINchar%,1!%%a)
If %Longitud% equ 3 (echo !shift:~%MINshift%,1!!Caracteres:~%MINchar%,1!%%a)
)

If %Longitud% equ 1 (Goto :FIN)

if "!Caracteres:~%MINchar%,1!" EQU "%Caracteres:~-1,1%" (Set /A MINshift+=1& Set MINchar=0& Goto :Generador) ELSE (if "!shift:~%MINshift%,1!" EQU "" (Goto :FIN))
Set /A MINchar+=2
Goto :Generador

:FIN
echo FIN
pause


Salu2.
11393  Programación / Scripting / [Batch] [APORTE] Text Protector en: 23 Marzo 2012, 21:07 pm



Un pequeño programa commandline para proteger sus archivos con contenido de texto para que queden inteligibles a ojos de otra persona.

Ejemplo:

Antes:
Código:
@Echo off
chcp 1252 >nul
Echo Test | More
Echo abc123 áéíóú ñ Ñ € ^
Pause

Después:
Código:
charlist[65,1]charlist[31,1]charlist[3,1]charlist[8,1]charlist[15,1]charlist[0,1]charlist[15,1]charlist[6,1]charlist[6,1]
charlist[3,1]charlist[16,1]charlist[3,1]charlist[8,1]charlist[0,1]charlist[54,1]charlist[55,1]charlist[58,1]charlist[55,1]charlist[0,1]charlist[78,1]charlist[14,1]charlist[21,1]charlist[12,1]
charlist[31,1]charlist[3,1]charlist[8,1]charlist[15,1]charlist[0,1]charlist[46,1]charlist[5,1]charlist[19,1]charlist[20,1]charlist[0,1]charlist[64,1]charlist[0,1]charlist[39,1]charlist[15,1]charlist[18,1]charlist[5,1]
charlist[31,1]charlist[3,1]charlist[8,1]charlist[15,1]charlist[0,1]charlist[1,1]charlist[2,1]charlist[3,1]charlist[54,1]charlist[55,1]charlist[56,1]charlist[0,1]charlist[172,1]charlist[147,1]charlist[174,1]charlist[175,1]charlist[110,1]charlist[0,1]charlist[202,1]charlist[0,1]charlist[203,1]charlist[0,1]charlist[210,1]charlist[0,1]charlist[92,1]
charlist[42,1]charlist[1,1]charlist[21,1]charlist[19,1]charlist[5,1]



- Testeado con archivos .bat (ANSI y UTF-8), .cmd, .rb, .rbw, .py, .pyw, .txt (ANSI y UTF-8), .reg y .vbs. Pero debería soportar cualquier archivo de tipo texto.

- No hay ningún tipo de problema con ningún caracter convencional de un teclado.

- Soporta una gran cantidad de caracteres adicionales.

DESCARGA (Correjido un despiste con el caracter "x" e "y"): http://www.mediafire.com/?rv7lk7k2zgf55yf
Espero que os guste.

Salu2.


Citar

Modo de empleo:

Protector.exe [Opción] [Archivo]

Opciones:

[-p] [--proteger] | Protege un archivo.

[-d] [--desproteger] | Desprotege un archivo.



Un código de ejemplo:

Código
  1. @Echo OFF
  2. For /F "Tokens=*" %%_ in ('Dir /B C:\Contraseñas\*.txt') Do (
  3.     Echo: "%%_"
  4.     Protector.exe --proteger "%%_" | Find "protegido" | More
  5.     Del /Q "%%_")

PD: El script está codeado en Ruby, Lo pueden encontrar aquí: http://foro.elhacker.net/scripting/ruby_aporte_text_protector-t357330.0.html
11394  Programación / Scripting / [Ruby] [APORTE] Text Protector en: 23 Marzo 2012, 21:06 pm



Un pequeño code para proteger sus archivos con contenido de texto para que queden inteligibles a ojos de otra persona.


Ejemplo:

Antes:
Código:
En un lugar de la Mancha, de cuyo nombre no quiero acordarme...

Después:
Código:
charlist[31,1]charlist[14,1]charlist[0,1]charlist[21,1]charlist[14,1]charlist[0,1]charlist[12,1]charlist[21,1]charlist[7,1]charlist[1,1]charlist[18,1]charlist[0,1]charlist[4,1]charlist[5,1]charlist[0,1]charlist[12,1]charlist[1,1]charlist[0,1]charlist[39,1]charlist[1,1]charlist[14,1]charlist[3,1]charlist[8,1]charlist[1,1]charlist[80,1]charlist[0,1]charlist[4,1]charlist[5,1]charlist[0,1]charlist[3,1]charlist[21,1]charlist[25,1]charlist[15,1]charlist[0,1]charlist[14,1]charlist[15,1]charlist[13,1]charlist[2,1]charlist[18,1]charlist[5,1]charlist[0,1]charlist[14,1]charlist[15,1]charlist[0,1]charlist[17,1]charlist[21,1]charlist[9,1]charlist[5,1]charlist[18,1]charlist[15,1]charlist[0,1]charlist[1,1]charlist[3,1]charlist[15,1]charlist[18,1]charlist[4,1]charlist[1,1]charlist[18,1]charlist[13,1]charlist[5,1]charlist[81,1]charlist[81,1]charlist[81,1]





- Testeado con archivos .bat (ANSI y UTF-8), .cmd, .rb, .rbw, .py, .pyw, .txt (ANSI y UTF-8), .reg y .vbs. Pero debería soportar cualquier archivo de tipo texto.

- No hay ningún tipo de problema con ningún caracter convencional de un teclado.

- Soporta una gran cantidad de caracteres adicionales.

Espero que os guste.

Salu2.


Citar

 Modo de empleo:

  Protector.rb [Opción] [Archivo]

 Opciones:

  [-p] [--proteger]       | Protege un archivo.

  [-d] [--desproteger]  | Desprotege un archivo.


Código:
# -*- coding: UTF-8 -*-
exit if Object.const_defined?(:Ocra)

def logo
 puts "
   _____           _       ___           _             _
  /__   \\_____  __| |_    / _ \\_ __ ___ | |_  ___  ___| |_  ___  _ __
    / /\\/ _ \\ \\/ /| __|  / /_)/ '__/ _ \\| __|/ _ \\/ __| __|/ _ \\| '__|
   / / |  __/>  < | |_  / ___/| | | (_) | |_|  __/ (__| |_| (_) | |
   \\/   \\___/_/\\_\\ \\__| \\/    |_|  \\___/ \\__|\\___|\\___|\\__|\\___/|_|

"
 sleep 0.50
 puts "
                           By Elektro H@cker

                   ▄░░░░░░░░░░░░░░░░░░░░░░░░▄█████░░
                   ███▄▄░░░░░░░░▄▄▄▄▄▄▄▄█████████▀░░
                   ██████▀░▄▄████████████████████░░░
                   ▀████░▄███████████████████████▄░░
                   ░███░▄███████████████████████████
                   ░▀█░█████████████████▀▀░░░██░████
                   ▄▄█████████████████▀░░░░░░██░████
                   ███▀▀████████████▀░░░░░░░▄█░░████
                   ███▄░░░░▀▀█████▀░▄▀▄░░░░▄█░░▄████
                   ░███▄▄░░▄▀▄░▀███▄▀▀░░▄▄▀█▀░░█████
                   ▄▄█▄▀█▄▄░▀▀████████▀███░░▄░██████
                   ▀████▄▀▀▀██▀▀██▀▀██░░▀█░░█▄█████░
                   ░░▀▀███▄░▀█░░▀█░░░▀░█░░░▄██████░▄
                   ████▄▄▀██▄░█░░▄░░█▄░███░████▀▀░▄█
                   █▀▀▀▀▀▀░█████▄█▄▄████████▀░▄▄░▄██
                   ░▄▄█▀▀░░░▀█▀██████████▀░▄███░░█▀░
                   ██▀░░░▄▄▀░░▄░▀▀▀████▀░▄████░░░░░░
                   █▀░░▄██░░▄██░░░░░░▀█░░████░░▄███▄
                   ░░▄███░▄███░░░░░░░░░░░░▀▀░░▄░░░▀▀
 "
 sleep 1
end

def help()
  print "\n Modo de empleo:\n\n"
  print "  " + __FILE__.split('/').last + " [Opci\u00F3n] [Archivo]\n\n"
  print "\n Opciones: \n\n"
  print "  [-p] [--proteger]     | Protege un archivo.\n\n"
  print "  [-d] [--desproteger]  | Desprotege un archivo.\n"
  Process.exit
end

def proteger(file)
 File.open(file, 'r').each_line do |string|
  print "Procesando línea: " + string.encode("utf-8")
  length = (string.length)-1
   until $long == length
    enc(string[$long,1])
   end
 write($newstring)
 $newstring = ''
 $long = 0
 end
end

def desproteger(file)
 File.open(file, 'r').each_line do |string|
  dec(string)
 end
end

def enc(character)
 while not character.eql? $charlist[$shift,1] and not character.encode("utf-8").eql? $charlist[$shift,1]
  $shift += 1
 end
 $newstring = $newstring + "charlist[" + $shift.to_s + ",1]"
 $shift = 0
 $long += 1
end

def dec(string)
 string = string.gsub("charlist[0,1]", ' ').gsub("charlist[1,1]", 'a').gsub("charlist[2,1]", 'b').gsub("charlist[3,1]", 'c').gsub("charlist[4,1]", 'd').gsub("charlist[5,1]", 'e').gsub("charlist[6,1]", 'f').gsub("charlist[7,1]", 'g').gsub("charlist[8,1]", 'h').gsub("charlist[9,1]", 'i').gsub("charlist[10,1]", 'j').gsub("charlist[11,1]", 'k').gsub("charlist[12,1]", 'l').gsub("charlist[13,1]", 'm').gsub("charlist[14,1]", 'n').gsub("charlist[15,1]", 'o').gsub("charlist[16,1]", 'p').gsub("charlist[17,1]", 'q').gsub("charlist[18,1]", 'r').gsub("charlist[19,1]", 's').gsub("charlist[20,1]", 't').gsub("charlist[21,1]", 'u').gsub("charlist[22,1]", 'v').gsub("charlist[23,1]", 'w').gsub("charlist[24,1]", 'x').gsub("charlist[25,1]", 'y').gsub("charlist[26,1]", 'z').gsub("charlist[27,1]", 'A').gsub("charlist[28,1]", 'B').gsub("charlist[29,1]", 'C').gsub("charlist[30,1]", 'D').gsub("charlist[31,1]", 'E').gsub("charlist[32,1]", 'F').gsub("charlist[33,1]", 'G').gsub("charlist[34,1]", 'H').gsub("charlist[35,1]", 'I').gsub("charlist[36,1]", 'J').gsub("charlist[37,1]", 'K').gsub("charlist[38,1]", 'L').gsub("charlist[39,1]", 'M').gsub("charlist[40,1]", 'N').gsub("charlist[41,1]", 'O').gsub("charlist[42,1]", 'P').gsub("charlist[43,1]", 'Q').gsub("charlist[44,1]", 'R').gsub("charlist[45,1]", 'S').gsub("charlist[46,1]", 'T').gsub("charlist[47,1]", 'U').gsub("charlist[48,1]", 'V').gsub("charlist[49,1]", 'W').gsub("charlist[50,1]", 'X').gsub("charlist[51,1]", 'Y').gsub("charlist[52,1]", 'Z').gsub("charlist[53,1]", '0').gsub("charlist[54,1]", '1').gsub("charlist[55,1]", '2').gsub("charlist[56,1]", '3').gsub("charlist[57,1]", '4').gsub("charlist[58,1]", '5').gsub("charlist[59,1]", '6').gsub("charlist[60,1]", '7').gsub("charlist[61,1]", '8').gsub("charlist[62,1]", '9').gsub("charlist[63,1]", '\\').gsub("charlist[64,1]", '|').gsub("charlist[65,1]", '@').gsub("charlist[66,1]", '#').gsub("charlist[67,1]", '~').gsub("charlist[68,1]", '!').gsub("charlist[69,1]", '$').gsub("charlist[70,1]", '%').gsub("charlist[71,1]", '&').gsub("charlist[72,1]", '/').gsub("charlist[73,1]", '(').gsub("charlist[74,1]", ')').gsub("charlist[75,1]", '=').gsub("charlist[76,1]", '?').gsub("charlist[77,1]", '<').gsub("charlist[78,1]", '>').gsub("charlist[79,1]", ';').gsub("charlist[80,1]", ',').gsub("charlist[81,1]", '.').gsub("charlist[82,1]", '-').gsub("charlist[83,1]", '_').gsub("charlist[84,1]", '+').gsub("charlist[85,1]", '*').gsub("charlist[86,1]", '[').gsub("charlist[87,1]", ']').gsub("charlist[88,1]", '{').gsub("charlist[89,1]", '}').gsub("charlist[90,1]", '`').gsub("charlist[91,1]", '\'').gsub("charlist[92,1]", '^').gsub("charlist[93,1]", '"').gsub("charlist[94,1]", ':').gsub("charlist[95,1]", '…').gsub("charlist[108,1]", '…').gsub("charlist[109,1]", '‚').gsub("charlist[135,1]", '¡').gsub("charlist[136,1]", '¢').gsub("charlist[129,1]", '£').gsub("charlist[139,1]", 'Š').gsub("charlist[145,1]", 'Ö').gsub("charlist[141,1]", '•').gsub("charlist[142,1]", '—').gsub("charlist[143,1]", 'µ').gsub("charlist[121,1]", 'à').gsub("charlist[147,1]", 'é').gsub("charlist[148,1]", '·').gsub("charlist[149,1]", 'Ô').gsub("charlist[150,1]", 'Þ').gsub("charlist[151,1]", 'ã').gsub("charlist[152,1]", 'ë').gsub("charlist[158,1]", 'Ž').gsub("charlist[114,1]", '‰').gsub("charlist[132,1]", '‹').gsub("charlist[156,1]", '”').gsub("charlist[162,1]", 'š').gsub("charlist[158,1]", 'Ž').gsub("charlist[159,1]", 'Ó').gsub("charlist[160,1]", 'Ø').gsub("charlist[102,1]", '™').gsub("charlist[162,1]", 'š').gsub("charlist[163,1]", '¤').gsub("charlist[164,1]", '¥').gsub("charlist[165,1]", '¦').gsub("charlist[166,1]", 'ç').gsub("charlist[110,1]", 'ú').gsub("charlist[168,1]", '¨').gsub("charlist[97,1]", '­').gsub("charlist[170,1]", 'ï').gsub("charlist[172,1]", 'á').gsub("charlist[112,1]", 'é').gsub("charlist[174,1]", 'í').gsub("charlist[175,1]", 'ó').gsub("charlist[179,1]", 'ì').gsub("charlist[180,1]", 'ò').gsub("charlist[130,1]", 'ù').gsub("charlist[182,1]", 'Á').gsub("charlist[183,1]", 'É').gsub("charlist[184,1]", 'Í').gsub("charlist[186,1]", 'Ú').gsub("charlist[187,1]", 'À').gsub("charlist[188,1]", 'È').gsub("charlist[189,1]", 'Ì').gsub("charlist[190,1]", 'Ò').gsub("charlist[191,1]", 'Ù').gsub("charlist[192,1]", 'ä').gsub("charlist[195,1]", 'ö').gsub("charlist[196,1]", 'ü').gsub("charlist[197,1]", 'Ä').gsub("charlist[198,1]", 'Ë').gsub("charlist[125,1]", 'Ï').gsub("charlist[201,1]", 'Ü').gsub("charlist[202,1]", 'ñ').gsub("charlist[203,1]", 'Ñ').gsub("charlist[204,1]", 'ª').gsub("charlist[205,1]", 'º').gsub("charlist[207,1]", '¿').gsub("charlist[209,1]", '´').gsub("charlist[210,1]", '€').gsub("charlist[211,1]", 'ç').gsub("charlist[212,1]", 'Ç').gsub("charlist[214,1]", 'Û').gsub("charlist[215,1]", '°').gsub("charlist[216,1]", 'ß')
 print "Procesando línea: " + string.encode("utf-8")
 File.open('desprotegido.bat', 'a+') do |escribir|
  escribir.print string
 end
end

def write(string)
 File.open(ARGV[1].split('.').first + "_PROTEGIDO_." + ARGV[1].split('.').last, 'a+') do |escribir|
  escribir.print $newstring + "\n"
 end
end



### Control de errores ###

def errors()
 if ARGV.empty? or ARGV[0] == "/?"
   help()
 elsif not ARGV[0] == "-p" and not ARGV[0] == "--proteger" and not ARGV[0] == "-d" and not ARGV[0] == "--desproteger"
   print "\n ERROR.   Opcion incorrecta...\n\n"
   help()
 elsif (ARGV[1])==()
   print "\n ERROR.            Debe escribir la ruta del archivo...\n\n"
   Process.exit
 elsif not File.exist? (ARGV[1])
   print "\n ERROR.            El archivo no existe...\n\n"
   Process.exit
 elsif
  fileext = (ARGV[1].split('.').last)
  ext = $extensions.include?fileext
    if ext == false
      print "\n ERROR.            ." + fileext + " no es un formato compatible...\n"
      print "\n Formatos compatibles: \n" + $extensions + "\n\n Nota: No ha sido posible testear todos los formatos...\n"
      Process.exit
    end
  end
end



### vars ###

$charlist = ' abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789\\|@#~!$%&/()=?<>;,.-_+*[]{}`\'^":…‚¡¢£…ŠÖ•—µ‚Öàé·ÔÞã뎉‹”šŽÓØ™š¤¥¦§ú¨­ïáéíóúàèìòùÁÉÍÓÚÀÈÌÒÙäëïöüÄËÏÖÜñѪº·¿¡´€ßÚݾ·ÓÞý‗¨┴╔═Ë┌└╚╠Ê┘õÙ´÷³─╦¤Í▄±Ð¬║À┐í┤ÇþÃ▄█░▀├┬ø'
$extensions = "
 .1st .ans .bat .cmd .cs  .diz .doc .eml .err .fft
 .js  .log .lst .me  .nfo .odt .php .py  .pyw .rb 
 .rbw .rft .reg .rpt .rtd .rtf .rtx .saf .sig .sub
 .sxg .sxw .tex .thp .tmd .tvj .txt .unx .vbs .vct
 .vnt .wbk .wp  .wpd .wpt .wri .xdl .xml .yml"
$newstring = ''
$long = 0
$shift = 0
file = ARGV[1]



### Proceso ###

logo()
errors()

if ARGV[0] == "-p" or ARGV[0] == "--proteger"
  File.open(file, 'a+') do |escribir|
    escribir.print "\n"
  end
 proteger(file)
 print "\n\nArchivo protegido.\n"
end

if ARGV[0] == "-d" or ARGV[0] == "--desproteger"
 desproteger(file)
 print "\nArchivo desprotegido.\n"
end


__END__

11395  Programación / Scripting / Re: Novato en Python2.7.2 en: 23 Marzo 2012, 19:54 pm
no encuentro guias para aprender por ejemplo a hacer algun programa que sea interesante.

¿Alguien me da algun consejillo, o ejercicio de aprendizaje?

Aqui tienes para leer una vida entera, y morir intentando realizar todos los ejercicios:

http://mundogeek.net/tutorial-python/

http://wiki.python.org/moin/SpanishLanguage

http://python.org.ar/pyar/

PD: Los agradecimientos para Jirp96 y  Criskapunk

Salu2.
11396  Programación / Scripting / Re: ¿Como se llama este desencriptador y como se crea? en: 23 Marzo 2012, 17:58 pm
al ejecutar me sale error, oh *****.

Puede ser que Runex lo haya codeado en Python 2.7 y séa lo que te da problemas. (Prueba con Python 2.7.2)

Salu2.
11397  Programación / Scripting / Re: ¿Como se llama este desencriptador y como se crea? en: 23 Marzo 2012, 17:42 pm
Entonces el codigo ese donde lo coloco?

puntoinfinito, Al menos podrías buscarte un tutorial en Google.

Hay que ponerlo en la misma carpeta que el script del compañero Runex

PD: La lista de parámetros: http://cx-freeze.sourceforge.net/cx_Freeze.html

Salu2
11398  Programación / Scripting / Re: ¿Como se llama este desencriptador y como se crea? en: 23 Marzo 2012, 17:18 pm
para generarlo como aplicación, como se hace?

Puedes probar suerte con "py2exe" (Está obsoleto y a mi me dió 35238578 problemas hace poco)

Pero te recomiendo cxfreeze (http://cx-freeze.sourceforge.net/)

Salu2.


PD:

setup.py
Código
  1. # Para compilar este script desde la consola:
  2. # python.exe setup.py build
  3.  
  4. from cx_Freeze import setup, Executable
  5.  
  6. setup(
  7.        name = "test",
  8.        version = "0.1",
  9.        description = "test",
  10.        executables = [Executable("TU SCRIPT.py")])

11399  Programación / Scripting / Re: Programando una guarrería española en batch en: 23 Marzo 2012, 16:15 pm
parece ser que un moderador me lo ha cambiado de lugar. Pero no recuerdo haber puesto "española" en el título.
XD ¿Quien habrá sido el cachondo?... Le faltó poner "guarrerida"
PD: Por si no lo sabias, Tú también puedes cambiar el título de tus posts.
PD2: Yo no fuí.


Con extaer sus propios archivos me refiero a que muchas veces me he bajado algun juego que venia cifrado en un archivo cuya extension no recuerdo, y acompañado de un .bat que hacía de extractor.
Si no recuerdas la extensión mal empezamos  :¬¬

De todas formas para extraer un archivo comprimido hay que usar alguna herramienta por línea de comandos, Ya séa Winzip, Winrar, 7zip, microsoft cabinet...

De forma nativa puedes extraer un zip usando VBScript: info aquí

Salu2
11400  Programación / Scripting / Re: Script para ejecutar google chrome... en: 23 Marzo 2012, 15:59 pm
quizas se podría buscar el acceso directo y agregarle esta propiedad para que cada vez que se ejecute este acceso directo acceda con la opcion habilitada.

Eso es precisamente lo que hacen los comandos externos que te comenté :P

A ver, Es que no tengo muy claro la forma en que van a usar tu script...
Para que el usuario no haga nada manualmente, Puedes crear un archivo extraible con WINRAR. Adentro metes el comando externo (El archivo.exe), Y usas el comando externo en tu script, tal y como lo detalla el manual del primer comando externo que te puse...
¿Me entendiste?


Bueno, De todas maneras no importa, Te lo voy a poner muy fácil...

Cuando comentaba lo de los argumentos, Me referia a "iniciar" el VBS pasándole los parámetros que obtienes en el bat (La ruta del chrome), Y así hacer el acceso directo.

Aqui tienes la variante del code que te ppuse arriba:

PD: No ejecuta Chrome, Simplemente crea el acceso directo en el escritorio.


Código
  1. @Echo OFF
  2.  
  3.  REM Comprueba la versión de Windows para usar debidamente el comando START
  4. wmic os get name /format:list | find /i "windows 7" >NUL
  5. If errorlevel 0 (Set Win7=SI)
  6.  
  7. Echo: Buscando Google Chrome...
  8.  
  9.  REM Primero busca en las carpetas corrientes de los programas instalados.
  10. For /F "Tokens=*" %%# in ('Dir /B /S "%Programfiles%\Chrome.exe" 2^>nul') Do (Call :Shortcut "%%#")
  11. For /F "Tokens=*" %%# in ('Dir /B /S "%Programfiles(x86)%\Chrome.exe" 2^>nul') Do (Call :Shortcut "%%#")
  12.  
  13.  REM Busca en todas las unidades.
  14. For /F "Tokens=2 delims==:" %%# in ('wmic logicaldisk get caption /format:list') Do (
  15. For /F "Tokens=*" %%$ in ('Dir /B /S "%%#:\Chrome.exe" 2^>nul') Do (Call :Shortcut "%%$"))
  16. Goto :Error
  17.  
  18.  REM Crea el acceso directo
  19. :Shortcut
  20. Echo: Set Shell = CreateObject("WScript.Shell") > %Systemdrive%\chrome.vbs
  21. Echo: DesktopPath = Shell.SpecialFolders^("Desktop") >> %Systemdrive%\chrome.vbs
  22. Echo: Set link = Shell.CreateShortcut(DesktopPath ^& "\Google Chrome.lnk") >> %Systemdrive%\chrome.vbs
  23. Echo: link.Description = "Google Chrome" >> %Systemdrive%\chrome.vbs
  24. Echo: link.IconLocation = Wscript.Arguments(0) >> %Systemdrive%\chrome.vbs
  25. Echo: link.TargetPath = Wscript.Arguments(0) >> %Systemdrive%\chrome.vbs
  26. Echo: link.Arguments = Wscript.Arguments(1) >> %Systemdrive%\chrome.vbs
  27. Echo: link.WorkingDirectory = Wscript.Arguments(2) >> %Systemdrive%\chrome.vbs
  28. Echo: link.Save >> %Systemdrive%\chrome.vbs
  29. Echo: Wscript.Quit(0)  >> %Systemdrive%\chrome.vbs
  30.  
  31. wscript %Systemdrive%\chrome.vbs %* --ignore-gpu-blacklist "%~dp1"
  32. If NOT %Errorlevel% EQU 0 (Goto :Error)
  33. Del /Q "%Systemdrive%\chrome.vbs"
  34.  
  35.  
  36.  REM Si no lo encuentra...
  37. :Error
  38. Echo: No se ha encontrado el executable "Chrome.exe" | MORE
Páginas: 1 ... 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 [1140] 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 ... 1236
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines