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

 

 


Tema destacado: Introducción a Git (Primera Parte)


  Mostrar Mensajes
Páginas: 1 ... 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 [20] 21 22 23 24 25
191  Programación / Scripting / Función Lenght + efecto - by xassiz en: 17 Septiembre 2009, 13:46 pm


Título: Función Lenght + efecto
Temática: Strings
Autor: xassiz
Descripción: Muestra la longitud de una cadena introducida, y la muestra en vertical.
Funcionamiento: Pide una string, y llama a la etiqueta lenght para medirla con un contador. Luego crea una variable para cada caracter y los muestre verticalmente.

Código:
@echo off
title Funcion Lenght + efecto  -  by xassiz!
setlocal enabledelayedexpansion
:main
(set txt=)
set/p "txt=String> "
if not defined txt (goto:main)
set/a cont=0
call :lenght
cls
echo."%txt%" mide %cont%
pause>nul
echo.
for /L %%_ in (1,1,%cont%) do (echo.!let[%%_]!)
echo.
pause>nul
exit
:lenght
set "var=!txt:~%cont%,1!"
if not defined var (goto:eof)
set/a cont+=1
set "let[%cont%]=%var%"
goto:lenght


Salida:
Código:
String> me llamo xassiz

'se borra la pantalla

"me llamo xassiz" mide 15

'hace una pausa

m
e

l
l
a
m
o

x
a
s
s
i
z


Si hay dudas, preguntad ;)
192  Programación / Scripting / Re: [Batch Help!] ayuda con conversion de caracteres.. en: 16 Septiembre 2009, 23:49 pm
A ver, no quiero hacer un cambio de mayusculas a minusculas!! Para eso se haría mas facil asi..

Código:
@echo off
setlocal enabledelayedexpansion
set "texto=hola"
for %%_ in (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) do (set "texto2=!texto:%%_=%%_!")
echo.Antes: %texto%
echo.Despues: %texto2%
pause
exit


Quiero diferenciar los caracteres en mayuscula de minuscula!!
193  Programación / Scripting / Re: Binary Converter By JaAViEr en: 16 Septiembre 2009, 20:58 pm
O también valdría el code del archivo, pero poniendo la string entre comillas.
194  Programación / Scripting / Re: [Batch Help!] ayuda con conversion de caracteres.. en: 16 Septiembre 2009, 20:56 pm
Eso lo sabía hacer hace 5 años.. leed antes de responder!!


Si lees detenidamente el post, te enterarás.  Vuelvo a explicar:

Código:
set "variable=M.texto.m"

Y quiero que la variable quede así:
Código:
set "variable=1.texto.2"

Es decir, set no distingue entre mayúsculas y minúsculas.

Pero yo quiero distinguir, ese es el problema.

La unica solucion, es medir la longitud de la variable, y luego meter cada caracter en una variable.

Luego al tener los caracteres separados podré compararlos con un if.
195  Programación / Scripting / Re: {Resuelto} [vbs] Cerrar proceso sin abrirlo en: 16 Septiembre 2009, 20:33 pm
Y si se omite? sería como True o como False?
196  Programación / Scripting / Re: {Resuelto} [vbs] Cerrar proceso sin abrirlo en: 16 Septiembre 2009, 20:17 pm
Y para que serviría poner el True?
197  Programación / Scripting / Re: [vbs] Ayuda variable descompuesta en: 16 Septiembre 2009, 18:43 pm
Yo sé con batch.. :-(
198  Programación / Scripting / Re: [vbs] Cerrar proceso sin abrirlo en: 16 Septiembre 2009, 18:19 pm
Código:
set objshell = createobject("wscript.shell")
objshell.run "cmd /c taskkill /im cmd.exe /f || tskill cmd", vbhide

Eso serviría no? Vale cualquier cosa que pongas en la cmd :rolleyes:

Gracias xD

Es que cuando leyera lo de cmd.. en el code no me parecia que fuera eso u.u

PD: no abría que poner ,true al final?
199  Programación / Scripting / Re: [Batch Help!] ayuda con conversion de caracteres.. en: 16 Septiembre 2009, 17:58 pm
No es eso lo que busco xDD

Ok, mi problema es que no leo  :rolleyes:

Me refiero a hacer una conversion de caracteres dependiendo de si es mayuscula o minuscula:
Código:
set "variable=%variable:a=1%"
set "variable=%variable:A=2%"

::no funciona porque la cmd lee igual "a" que "A"


EDITO: creo que al final tendré que meter cada letra en una variable u.u
200  Programación / Scripting / Re: [vbs] Cerrar proceso sin abrirlo en: 16 Septiembre 2009, 17:56 pm
A ver, volví a revisar varias veces el tutorial y solo encuentro esto:

Código:
Set objshell = createobject("wscript.shell")
Set bloc = objshell.Exec("notepad")
Wscript.sleep 5000 'Pausa de 5000 milesimas, o 5 segundos
bloc.terminate

Pero el proceso que quiero cerrar ya estaría abierto, o en todo caso comprobar si esta abierto y si lo está cerrarlo.
Páginas: 1 ... 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 [20] 21 22 23 24 25
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines