;@echo off
;Findstr -rbv ; %0 | powershell -c -
;goto:sCode
comandos powershell aquí
;:sCode
;echo done
;pause & goto :eof
Experiencias diarias con un punto de vista y pensamientos distintos a lo acostumbrado.
lunes, 12 de agosto de 2013
PowerShell *.bat
lunes, 24 de junio de 2013
lunes, 22 de abril de 2013
VI
create a .vimrc en tu ~ y editas
set number # numera las lineas
:command WQ wq
:command Wq wq
:command W w
:command Q q
iab AlP ABCDEFGHIJKLMNOPQRSTUVWXYZ
iab MoN January February March April May June July August September October November December
iab MoO Jan Feb Mar Apr May Jun Jul Aug Sep Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
iab NuM 12345678901234567890123456789012345678901234567890123456789012345678901234567890
iab RuL ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8----+----9----+----0
create a .vimrc en tu ~ y editas
set number # numera las lineas
:command WQ wq
:command Wq wq
:command W w
:command Q q
iab AlP ABCDEFGHIJKLMNOPQRSTUVWXYZ
iab MoN January February March April May June July August September October November December
iab MoO Jan Feb Mar Apr May Jun Jul Aug Sep Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
iab NuM 12345678901234567890123456789012345678901234567890123456789012345678901234567890
iab RuL ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8----+----9----+----0
Shell Script, Basic commands
Using printf or echo:
# if you want to printf what is inside the variable
# you can use the following sentences
var=4 #no olvidar de que no se pueden dejar espacios en blanco
printf "Hello $var"
printf 'Hola '$var
#BUT! if you use this...
printf 'Hola $var'
# this will print $var literally, and not what is inside the variable.
#Comparar en un IF
if [ "$var" = "texto" ] #No olvidar los espacios despues del corchete y que al comparar con texto
# hay que poner solo "=" y el contenido de la variable junto con el texto en comillas """
echo "${param[ `expr $n + 1 `]}" # para imprimir un parametro con una operacion matematica
# imprimir a partir de un parametro con posicion "n" hay 2 formas
echo "${param[n]}"
echo "${param[$n]}"
Ejemplo de imprimir una linea separada de ";"
cat nombreFicheroaLeer | while read linea
do
#linea="AAA;BBB;CCC" haciendo prueba de una sola linea
EE=$(echo "$linea" | awk -F ";" '{print $2}') #el print es la posicion a imprimir separada por ';'
echo "$EE"
#para pasarlo a un fichero se puede usar
#echo "$EE" >> nombreOtroFichero
# if you want to printf what is inside the variable
# you can use the following sentences
var=4 #no olvidar de que no se pueden dejar espacios en blanco
printf "Hello $var"
printf 'Hola '$var
#BUT! if you use this...
printf 'Hola $var'
# this will print $var literally, and not what is inside the variable.
#Comparar en un IF
if [ "$var" = "texto" ] #No olvidar los espacios despues del corchete y que al comparar con texto
# hay que poner solo "=" y el contenido de la variable junto con el texto en comillas """
echo "${param[ `expr $n + 1 `]}" # para imprimir un parametro con una operacion matematica
# imprimir a partir de un parametro con posicion "n" hay 2 formas
echo "${param[n]}"
echo "${param[$n]}"
Ejemplo de imprimir una linea separada de ";"
cat nombreFicheroaLeer | while read linea
do
#linea="AAA;BBB;CCC" haciendo prueba de una sola linea
EE=$(echo "$linea" | awk -F ";" '{print $2}') #el print es la posicion a imprimir separada por ';'
echo "$EE"
#para pasarlo a un fichero se puede usar
#echo "$EE" >> nombreOtroFichero
lunes, 11 de marzo de 2013
Un pequeño programa en VB para quitar contraseñas a archivos Excel
Sub Quitar_contraseña()
Dim a As Integer, b As Integer, c As Integer
Dim d As Integer, e As Integer, f As Integer
Dim a1 As Integer, a2 As Integer, a3 As Integer
Dim a4 As Integer, a5 As Integer, a6 As Integer
On Error Resume Next
For a = 65 To 66: For b = 65 To 66: For c = 65 To 66
For d = 65 To 66: For e = 65 To 66: For a1 = 65 To 66
For a2 = 65 To 66: For a3 = 65 To 66: For a4 = 65 To 66
For a5 = 65 To 66: For a6 = 65 To 66: For f = 32 To 126
Contraseña = Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(a1) _
& Chr(a2) & Chr(a3) & Chr(a4) & Chr(a5) & Chr(a6) & Chr(f)
ActiveSheet.Unprotect Contraseña
If ActiveSheet.ProtectContents = False Then
MsgBox "Fuck Yeah" & vbCr & "Se ha quitado la contraseña:" & vbCr & Contraseña
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
Suscribirse a:
Entradas (Atom)