últimos mensajes de: Eleкtro

Mostrar Mensajes
Páginas: 1 ... 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 [960] 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 ... 1236

9591	Programación / Programación General / Re: ¿Es malo recomendar C/C++ a un principiante?	en: 4 Febrero 2013, 20:03 pm
Cita de: Yidu en 4 Febrero 2013, 19:48 pm Pero estarás de acuerdo conmigo que para aprender de forma auto didacta es más fácil hacerlo en Python que en Ruby. Mas que nada por que las fuentes de información y documentación es mas extensa y actual ¿No? Depende del método en el que quieras estudiar, si quieres estudiar buscando en Google tutoriales/manuales/sources/ejemplos, entonces te doy la razón, obviamente vas a encontrar mucha más información para Python, porque en general se usa más... (pero debo decir que para Ruby hay muchísima información de terceros también, no faltan ejemplos de Ruby en Google) Pero hay otra forma de estudiar un lenguaje, es la forma dificil, y esa forma es leyendo al milímetro la documentación oficial de Python/Ruby y poniendo en práctica cada cosa, ahí lo aprendes TODO acerca de él, y en ese caso se puede decir que existe la misma documentación para los dos lenguajes, porque la documentación oficial es COMPLETA, pero es la forma dificil, porque solo es documentación, sin ejemplos de uso casi. PD: La documentación oficial existe tanto online, como offline en el instalador de dichos lenguajes. un saludo

9592	Programación / Scripting / Re: Hay alguna forma de cambiar la imagen del cursor desde Batch?	en: 4 Febrero 2013, 19:33 pm
Cita de: Seazoux en 4 Febrero 2013, 18:51 pm me suena a que solo se va a cambiar si pasas el cursor por encima de la app xD Confimrado, funciona por todos lados menos por el foro xDDDDD Un saludo, muchas gracias. Bien, como ves funciona fuera del form (Si te pongo un código es por algo.) Para lo del foro, desactiva los cursores en tu navegador... Cita de: Seazoux en 4 Febrero 2013, 18:51 pm Pero no fuerza a todo, solo fuerza el icono del puntero y no el de escrbir esperando y todo eso xD Lee mi postdata: Citar PD: Cada constante equivale a cada imagen del cursor (arrow, hand, busy, etc...) en el ejemplo sólo cambian el cursor principal (arrow). En el código tienes las variables para cambiar el tipo de cursor que quieras... Cita de: Seazoux en 4 Febrero 2013, 18:51 pm La madre del cordero xD se me guardo este cursor voy a ver si un reinicio lo soluciona todo. xD Para devolver el cursor por defecto es tán sencillo como ir al menú de esquemas de cursores de Windows... Panel de control > Mouse Saludos EDITO: Cita de: Seazoux en 4 Febrero 2013, 18:51 pm lo del registro hay alguna forma de cambiarlo sin tener que reiniciar nada? No, o reinicias sesión o reinicias explorer. Quizás usando la API de Windows puedas aplicar el cambio sin tener que reiniciar, Usando el comando "rundll32" sobre el archivo "user32.dll" utilizando la función "systemparametersinfo", pero no se si se podrá usar esa función con rundll32... Este es el código para tu propósito en AutoHotkey, sería así pero convertido a la sintaxis del RunDLL32: Código: DllCall("SystemParametersInfo", "UInt", 0x57, "UInt", 0, "UInt", 0, "UInt", '0') http://www.thebitguru.com/articles/14-Programmatically+Changing+Windows+Mouse+Cursors

9593	Programación / Scripting / Re: Ejecutar archivo batch en segundo plano desde el mismo bat	en: 4 Febrero 2013, 18:29 pm
No se puede ejecutar en segundo plano (oculto), en todo caso lo puedes ejecutar minimizado como indicas (start /MIN), y puedes hacerlo en un único script. Código @echo off If NOT "%~1" EQU "Background" ((Start /MIN "" "%~0" Background) & (Exit)) for /L %%# in (0,1,9000000) do (Echo %%#) EDITO: para ejecutarlo en modo oculto puedes hacer lo mismo pero en lugar de usar START /MIN para abrir de nuevo el script, usa START /B para ejecutar un VBS que ejecute el script en modo oculto: http://foro.elhacker.net/scripting/registry_hack-t382379.0.html;msg1824753#msg1824753 Saludos

9594

Programación / Scripting / Re: [Batch] Novato en esto, me echáis una mano?

en: 4 Febrero 2013, 18:20 pm

Pues con esto ya tienes por donde empezar:

Código:

@echo off
Choice /M "quiere cambiar de directorio de trabajo?"

if NOT %errorlevel% EQU 2 (
	set /P "folder=indique el directorio >>"
	Call PUSHD "%%folder%%"
)
Echo Directorio actual: "%CD%"
pause

Código:

dir /n | MORE +4
set /p "file=introduce nombre >>"
if not exist "%file%" (echo error & pause & goto:menu)
type "%file%"

saludos

9595

Programación / Scripting / Re: Hay alguna forma de cambiar la imagen del cursor desde Batch?

en: 4 Febrero 2013, 18:08 pm

Bueno, en Batch puedes hacerlo modificando los valores del cursor actual en el registro, pero para que los cambios tengan efecto deberás reiniciar PC/Sesión.

Primero modificas el valor aquí:

Código:

HKEY_CURRENT_USER\Control Panel\Cursors
Scheme Source

Lo dejas a "1" para indicar que deseas usar un esquema de cursor customizado.

Y luego añades los valores correspondientes a cada cursor, y la dirección del archivo...

Ejemplo:

Código:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Control Panel\Cursors]
@="Glass Maxx"
"Scheme Source"=dword:00000001
"Arrow"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,41,00,72,00,72,00,6f,\
  00,77,00,2e,00,61,00,6e,00,69,00,00,00
"Help"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,48,00,65,00,6c,00,70,\
  00,2e,00,61,00,6e,00,69,00,00,00
"AppStarting"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,\
  00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,\
  6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,41,00,70,00,70,\
  00,53,00,74,00,61,00,72,00,74,00,69,00,6e,00,67,00,2e,00,61,00,6e,00,69,00,\
  00,00
"Wait"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,57,00,61,00,69,00,74,\
  00,2e,00,61,00,6e,00,69,00,00,00
"Crosshair"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,\
  54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,\
  00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,63,00,72,00,6f,00,\
  73,00,73,00,2e,00,61,00,6e,00,69,00,00,00
"IBeam"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,49,00,42,00,65,00,61,\
  00,6d,00,2e,00,61,00,6e,00,69,00,00,00
"NWPen"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,48,00,61,00,6e,00,64,\
  00,77,00,72,00,69,00,74,00,69,00,6e,00,67,00,2e,00,61,00,6e,00,69,00,00,00
"No"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,\
  25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,\
  00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,4e,00,4f,00,2e,00,61,00,\
  6e,00,69,00,00,00
"SizeNS"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,65,\
  00,4e,00,53,00,2e,00,61,00,6e,00,69,00,00,00
"SizeWE"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,65,\
  00,57,00,45,00,2e,00,61,00,6e,00,69,00,00,00
"SizeNWSE"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,\
  54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,\
  00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,\
  65,00,4e,00,57,00,53,00,45,00,2e,00,61,00,6e,00,69,00,00,00
"SizeNESW"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,\
  54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,\
  00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,\
  65,00,4e,00,45,00,53,00,57,00,2e,00,61,00,6e,00,69,00,00,00
"SizeAll"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,\
  54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,\
  00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,\
  65,00,41,00,6c,00,6c,00,2e,00,61,00,6e,00,69,00,00,00
"UpArrow"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,\
  54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,\
  00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,55,00,70,00,41,00,\
  72,00,72,00,6f,00,77,00,2e,00,61,00,6e,00,69,00,00,00
"Hand"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,48,00,61,00,6e,00,64,\
  00,2e,00,61,00,6e,00,69,00,00,00

[HKEY_CURRENT_USER\Control Panel\Cursors\Schemes]
"Glass Maxx"=hex(2):25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,\
  00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,\
  6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,41,00,72,00,72,\
  00,6f,00,77,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,54,00,\
  45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,\
  00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,\
  78,00,5c,00,48,00,65,00,6c,00,70,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,\
  00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,\
  75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,\
  00,4d,00,61,00,78,00,78,00,5c,00,41,00,70,00,70,00,53,00,74,00,61,00,72,00,\
  74,00,69,00,6e,00,67,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,\
  00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,\
  73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,\
  00,78,00,78,00,5c,00,57,00,61,00,69,00,74,00,2e,00,61,00,6e,00,69,00,2c,00,\
  25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,\
  00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,\
  73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,63,00,72,00,6f,00,73,00,73,00,2e,\
  00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,\
  4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,\
  00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,49,00,\
  42,00,65,00,61,00,6d,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,\
  00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,\
  73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,\
  00,78,00,78,00,5c,00,48,00,61,00,6e,00,64,00,77,00,72,00,69,00,74,00,69,00,\
  6e,00,67,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,54,00,45,\
  00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,\
  72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,\
  00,5c,00,4e,00,4f,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,\
  54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,\
  00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,\
  78,00,78,00,5c,00,53,00,69,00,7a,00,65,00,4e,00,53,00,2e,00,61,00,6e,00,69,\
  00,2c,00,25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,\
  25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,\
  00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,65,00,\
  57,00,45,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,54,00,45,\
  00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,\
  72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,\
  00,5c,00,53,00,69,00,7a,00,65,00,4e,00,57,00,53,00,45,00,2e,00,61,00,6e,00,\
  69,00,2c,00,25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,\
  00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,\
  61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,65,\
  00,4e,00,45,00,53,00,57,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,00,\
  53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,72,\
  00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,00,\
  61,00,78,00,78,00,5c,00,53,00,69,00,7a,00,65,00,41,00,6c,00,6c,00,2e,00,61,\
  00,6e,00,69,00,2c,00,25,00,53,00,59,00,53,00,54,00,45,00,4d,00,52,00,4f,00,\
  4f,00,54,00,25,00,5c,00,43,00,75,00,72,00,73,00,6f,00,72,00,73,00,5c,00,47,\
  00,6c,00,61,00,73,00,73,00,20,00,4d,00,61,00,78,00,78,00,5c,00,55,00,70,00,\
  41,00,72,00,72,00,6f,00,77,00,2e,00,61,00,6e,00,69,00,2c,00,25,00,53,00,59,\
  00,53,00,54,00,45,00,4d,00,52,00,4f,00,4f,00,54,00,25,00,5c,00,43,00,75,00,\
  72,00,73,00,6f,00,72,00,73,00,5c,00,47,00,6c,00,61,00,73,00,73,00,20,00,4d,\
  00,61,00,78,00,78,00,5c,00,48,00,61,00,6e,00,64,00,2e,00,61,00,6e,00,69,00,\
  00,00

(Esto es el código de arriba convertido)

Código

:: Archivo de registro convertido con REG2BAT by Elektro H@cker
::
:: REG2BAT - Convierte archivos REG a BAT
:: http://foro.elhacker.net/empty-t357848.0.html
 
REG ADD "HKCU\Control Panel\Cursors" /V  "" /D "Glass Maxx" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Scheme Source" /T "REG_DWORD" /D 0x00000001 /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Arrow" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Arrow.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Help" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Help.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "AppStarting" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\AppStarting.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Wait" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Wait.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Crosshair" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\cross.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "IBeam" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\IBeam.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "NWPen" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Handwriting.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "No" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\NO.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "SizeNS" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNS.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "SizeWE" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeWE.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "SizeNWSE" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNWSE.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "SizeNESW" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNESW.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "SizeAll" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeAll.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "UpArrow" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\UpArrow.ani" /F 
REG ADD "HKCU\Control Panel\Cursors" /V "Hand" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Hand.ani" /F 
REG ADD "HKCU\Control Panel\Cursors\Schemes" /V "Glass Maxx" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Arrow.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\Help.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\AppStarting.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\Wait.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\cross.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\IBeam.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\Handwriting.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\NO.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNS.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeWE.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNWSE.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNESW.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeAll.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\UpArrow.ani,%%SYSTEMROOT%%\Cursors\Glass Maxx\Hand.ani" /F

¿Pero tu no te habias iniciado en VB.NET? si aún lo sigues usando puedes desarrollar en pocas líneas un programa commandline que modifique la imagen del cursor y ejecutarlo desde Batch xD.

Aquí tienes el ejemplo, más tarde haré un snippet de esto y lo colgaré en el post de snippets:

Código

'Dan Dombrowski
'July 2008
 
Public Class Form1
 
    'API declarations
    Private Declare Function SetSystemCursor Lib "user32.dll" (ByVal hCursor As IntPtr, ByVal id As Integer) As Boolean
    Private Declare Function LoadCursorFromFile Lib "user32.dll" Alias "LoadCursorFromFileA" (ByVal lpFileName As String) As IntPtr
 
    'Cursor constants
    Private Const IDC_APPSTARTING As UInt32 = 32650
    Private Const IDC_ARROW As UInt32 = 32512
    Private Const IDC_HAND As UInt32 = 32649
    Private Const IDC_CROSS As UInt32 = 32515
    Private Const IDC_HELP As UInt32 = 32651
    Private Const IDC_IBEAM As UInt32 = 32513
    Private Const IDC_NO As UInt32 = 32648
    Private Const IDC_SIZEALL As UInt32 = 32646
    Private Const IDC_SIZENESW As UInt32 = 32643
    Private Const IDC_SIZENS As UInt32 = 32645
    Private Const IDC_SIZENWSE As UInt32 = 32642
    Private Const IDC_SIZEWE As UInt32 = 32644
    Private Const IDC_UP As UInt32 = 32516
    Private Const IDC_WAIT As UInt32 = 32514
 
    'Variable to save current cursor
    Dim SavedCursor As Icon
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Save cursor
        SavedCursor = Icon.FromHandle(Cursors.Arrow.CopyHandle)
 
        'Change arrow cursor to mine
        Dim NewCursor As IntPtr = LoadCursorFromFile(Application.StartupPath & "\MyCross.ani")
 
        'Check
        If NewCursor = IntPtr.Zero Then
            'Error loading cursor from file
            Debug.WriteLine("Error loading cursor from file.")
            Return
        End If
 
        'Set the system cursor
        If SetSystemCursor(NewCursor, IDC_ARROW) = 0 Then
            'Error setting system cursor
            Debug.WriteLine("Error setting system cursor.")
            Return
        End If
 
        'Disable/enable buttons
        Button1.Enabled = False
        Button2.Enabled = True
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        'Get old cursor
        Dim OldCursor As IntPtr = SavedCursor.Handle
 
        'Set the system cursor
        SetSystemCursor(OldCursor, IDC_ARROW)
 
        'Disable/enable buttons
        Button1.Enabled = True
        Button2.Enabled = False
    End Sub
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
    End Sub

PD: Cada constante equivale a cada imagen del cursor (arrow, hand, busy, etc...) en el ejemplo sólo cambian el cursor principal (arrow).

9596	Programación / Scripting / Re: problema con un .bat	en: 4 Febrero 2013, 17:30 pm
Cita de: pedro1212 en 4 Febrero 2013, 16:57 pm 1. Hay algun comando que haga esperar al .bat antes de ir a por la siguiente accion? que se pudiera modificar el tiempo que se quiera En Windows 7 puedes usar el comando TIMEOUT Código :: Para esperar 5 segundos Timeout /T 5 Si quieres hacerlo de otra forma para que funcione también en Vista/XP, puedes usar Ping: Código :: Para esperar 5 segundos Ping -n 5 localhost >NUL Cita de: pedro1212 en 4 Febrero 2013, 16:57 pm 2. Alguna forma de "simular la busqueda" es decir, que mande la informacion de que visito la url pero en realidad no se abra el navegador No, no es posible en Batch, Batch necesita abrir el navegador porque no dispone de otro medio. En otros lenguajes como Ruby y Python si que puedes "simular" esas cosas usando methods o extensiones. Saludos

9597	Programación / Scripting / Re: problema con un .bat	en: 4 Febrero 2013, 16:33 pm
He leido tu mp, te contesto por aquí. (Te pedí que dieras una URL que exista, pero bueno...) Como yo suponía, es un error de sintaxis, no estás escribiendo bien la página. El caracter "&" es un operador de Batch, y cuando lo usas sin entrecomillar/escapar el string, todo se va a la m*erda. En resumen, tienes que escapar el caracter en la URL: Código: Start http://www.juegoejemplo.net/game.php?sección=mapa^&vuelta=5534601 O usar la URL entre comillas: Código: Start /B "" "http://www.juegoejemplo.net/game.php?sección=mapa&vuelta=5534601" Y para lo otro que me pediste: Código @Echo OFF For /L %%N in (0,1,100) Do ( Echo http://www.juegoejemplo.net/game.php?sección=mapa^&vuelta=553460%%N REM Start /B "" "http://www.juegoejemplo.net/game.php?sección=mapa&vuelta=553460%%N" ) Saludos

9598	Programación / Scripting / Re: Registry Hack	en: 4 Febrero 2013, 16:21 pm
1. Puedes usar el parámetro QUERY del comando REG: Código: Reg.exe QUERY "HKLM\Clave" 2. Puedes usar el comando "Exportar" del Regedit: Código: Regedit.exe /e "C:\Temp.reg" "HKEY_CURRENT_USER\Clave" Para enviar, puedes usar el comando FTP.exe, pero obviamente debes disponer de una FTP casera. Para lo del modo oculto, no puedes hacerlo natívamente usando Batch, puedes usar algún ""compilador"" (Convertir .BAT a .EXE) o puedes ejecutar el archivo .Bat en modo oculto usando VisualBasicScript: Código CreateObject("Wscript.Shell").Run """" & "C:\Archivo.bat" & """", 0, False O puedes crear un SFX del bat usando WinRAR, o puedes ejecutar el BAT mediante una taréa programada NO-INTERACTIVA, o puedes usar utilidades externas como CMDOW o NIRCMD, en fín, hay infinidad de posibilidades. Saludos.

9599	Programación / Scripting / Re: [BATCH][DUDA] Algún equivalente de EDLINE para sistemas de 64bits?	en: 4 Febrero 2013, 01:00 am
Mi primera pregunta es: ¿Porque crees necesitar almacenar el contenido del archivo de texto en una variable?, pienso que podrías cifrar línea a línea el contenido del texto, es decir: obtienes la primera línea la cifras la guardas en un archivo temporal obtienes la siguiente línea la cifras la añades al archivo temporal etc... De todas formas si para tí no es viable, voy a mostrarte como hacerlo de la forma que has planteado. Puedes hacerlo recurriendo a nefastos trucos para añadir nuevas líneas en la variable y adjuntar el texto, esto es el limitado Batch, no hay otra forma de hacerlo, sería así: Código: @Echo OFF setlocal EnableDelayedExpansion set NewLine=^ Set /P "File=Escriba el nombre del archivo >> " Echo "%File%" \| FIND /I ".txt" \|\| (Set "File=%File%.txt") For /F "usebackq tokens=" %%# in ("%File%") do (Set "FileContent=!FileContent!!NewLine!%%#") Echo: !FileContent! Pause&Exit Eso es para hacer lo que pides, pero yo te propongo esto: Código @Echo OFF Set /P "File=Escriba el nombre del archivo >> " Echo "%File%" \| FIND /I ".txt" \|\| (Set "File=%File%.txt") For /F "usebackq tokens=" %%# in ("%File%") do (Call :Cifrar "%%#") Pause&Exit :Cifrar Echo "%~1" Rem Esta subrutina procesa una a una cada línea del archivo... Rem aquí debes hacer las operaciones en el string recibido, es decir, lo cifras... Rem y almacenas la línea cifrada en un archivo temporal... Echo "%VARIABLE%" >> "%TEMP%\Temp.bat" GOTO:EOF Saludos

9600	Programación / Scripting / Re: problema con un .bat	en: 4 Febrero 2013, 01:00 am
El comando "start" solo se encarga de mandarle la orden al programa asociado, en tu caso es el navegador "Google chrome", a simple vista pienso que símplemente estás cometiendo algún fallo al escribir la URL, pero si la estubieras escribiendo corréctamente y la página no se abre debe haber algún tipo de conflicto en el Chrome, y en ese caso una posible solución sería que actualizases o esperar a alguna nueva actualización del programa. El modo correcto de escribir una URL es "http://www.web.com", pero puedes hacerlo igualmente como te han indicado porque el navegador resolverá el protocolo y demás de la URL. Intenta esto: Código: "C:\carpeta del chrome\Chrome.exe" "http://www.página-web.com" De todas formas como la página "www.google.es/12345" obviamente no existe, ¿Puedes dar un ejemplo más claro de alguna página que exista y que no se te abre?. Un saludo.

Páginas: 1 ... 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 [960] 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 ... 1236