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

 

 


Tema destacado: Recopilación Tutoriales y Manuales Hacking, Seguridad, Privacidad, Hardware, etc


  Mostrar Mensajes
Páginas: 1 ... 944 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 ... 1235
9581  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 4 Febrero 2013, 20:49 pm
Cita de: spiritdead en  4 Febrero 2013, 20:24 pm
nose para que añadir tantos paquetes de terceros :/ electro si todo se puede hacer a mano
Se puede hacer a mano, sí, pero recurrir a un paquete no es nada malo ni lo considero una mala práctica, además tener que re-crear a mano todo lo que hace un paquete grande puede ser una taréa infernal, cuando ya está hecho.

En la parte de los snippets tienes razón siempre y cuando se hablen de snippets de terceros, porque si por ejemplo creo un snippet y lo uso en varios proyectos, eso creo que está muy bien, porque hardcodear siempre lo mismo para cada proyecto, cuando ya dispones de un snippet hecho por tí y que sirve para el caso... en ese caso lo consideraría una verdadera estupidez (perdida de tiempo).

sobre lo del XPATH también tienes razón, por eso le dije lo del REGEX,
aunque no entiendo mucho de estos temas de redes, sé que puede devolver una sopa de tags, muy mal estructurada.

saludos
9582  Programación / Scripting / Re: [Python] raíz n ésima en: 4 Febrero 2013, 20:31 pm
Gracias, pero cierro el tema para que no se alargue más años xD.

Saludos.
9583  Programación / Scripting / Re: Hay alguna forma de cambiar la imagen del cursor desde Batch? en: 4 Febrero 2013, 20:26 pm
joder macho
Código
  1. Private Const IDC_APPSTARTING As UInt32 = 32650
  2.    Private Const IDC_ARROW As UInt32 = 32512 ' FLECHA
  3.    Private Const IDC_HAND As UInt32 = 32649 ' MANO
  4.    Private Const IDC_CROSS As UInt32 = 32515 ' CRUZ
  5.    Private Const IDC_HELP As UInt32 = 32651 ' AYUDA
  6.    Private Const IDC_IBEAM As UInt32 = 32513 ' CURSOR DE TEXTO
  7.    Private Const IDC_NO As UInt32 = 32648 ' PROHIBIDO
  8.    Private Const IDC_SIZEALL As UInt32 = 32646 ' TAMAÑO (4 FLECHAS JUNTAS COMO UNA CRUZ)
  9.    Private Const IDC_SIZENESW As UInt32 = 32643 ' TAMAÑO SUR-OESTE
  10.    Private Const IDC_SIZENS As UInt32 = 32645 ' TAMAÑO NORTE-SUR (flecha de cambiar tamaño ARRIBA-ABAJO)
  11.    Private Const IDC_SIZENWSE As UInt32 = 32642 ' ESTE NO LO SÉ SEGURO AHORA MISMO
  12.    Private Const IDC_SIZEWE As UInt32 = 32644 ' TAMAÑO WEST-EAST (flecha de cambiar tamaño izquierda-derecha)
  13.    Private Const IDC_UP As UInt32 = 32516  ' FLECHA ARRIBA
  14.    Private Const IDC_WAIT As UInt32 = 32514   ' BUSY

algo así, compara los nombres con los cursores AERO por defecto y obtendrás los nombres con seguridad.

saludos
9584  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 4 Febrero 2013, 20:13 pm
http://htmlagilitypack.codeplex.com/wikipage?title=Examples
(convierte los códigos a VB.NET)
En el source creo que habían más ejemplos.

Si quieres postea parte de un HTML y la(s) cadena(s) que quieres obtener, y te digo que patrón usar con REGEX.

Saludos
9585  Programación / Scripting / Re: Hay alguna forma de cambiar la imagen del cursor desde Batch? en: 4 Febrero 2013, 20:09 pm
Cita de: Seazoux en  4 Febrero 2013, 19:54 pm
Pero aparte de esas 3 y etc hay mas? digame uste todas que no haya por donde cojerlo xd  :o

¿Que preguntas exáctamente?

lo de "arrow", "hand", "busy", etc?

Las variables las tienes ahi en el código y los nombres son bastante claros.. pero si te parece complicado pásate dentro de un rato por mi post de Snippets en el subforo de programación .NET y haces un copy/paste de una función que posteare para cambiar el cursor que quieras de forma sencilla...
> http://foro.elhacker.net/net/aporte_snippets_posteen_aqui_sus_snippets-t378770.0.html

Saludos
9586  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
9587  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
9588  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
  1. @echo off
  2. If NOT "%~1" EQU "Background" ((Start /MIN "" "%~0" Background) & (Exit))
  3. 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
9589  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
9590  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
  1. :: Archivo de registro convertido con REG2BAT by Elektro H@cker
  2. ::
  3. :: REG2BAT - Convierte archivos REG a BAT
  4. :: http://foro.elhacker.net/empty-t357848.0.html
  5.  
  6. REG ADD "HKCU\Control Panel\Cursors" /V  "" /D "Glass Maxx" /F 
  7. REG ADD "HKCU\Control Panel\Cursors" /V "Scheme Source" /T "REG_DWORD" /D 0x00000001 /F 
  8. REG ADD "HKCU\Control Panel\Cursors" /V "Arrow" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Arrow.ani" /F 
  9. REG ADD "HKCU\Control Panel\Cursors" /V "Help" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Help.ani" /F 
  10. REG ADD "HKCU\Control Panel\Cursors" /V "AppStarting" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\AppStarting.ani" /F 
  11. REG ADD "HKCU\Control Panel\Cursors" /V "Wait" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Wait.ani" /F 
  12. REG ADD "HKCU\Control Panel\Cursors" /V "Crosshair" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\cross.ani" /F 
  13. REG ADD "HKCU\Control Panel\Cursors" /V "IBeam" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\IBeam.ani" /F 
  14. REG ADD "HKCU\Control Panel\Cursors" /V "NWPen" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Handwriting.ani" /F 
  15. REG ADD "HKCU\Control Panel\Cursors" /V "No" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\NO.ani" /F 
  16. REG ADD "HKCU\Control Panel\Cursors" /V "SizeNS" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNS.ani" /F 
  17. REG ADD "HKCU\Control Panel\Cursors" /V "SizeWE" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeWE.ani" /F 
  18. REG ADD "HKCU\Control Panel\Cursors" /V "SizeNWSE" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNWSE.ani" /F 
  19. REG ADD "HKCU\Control Panel\Cursors" /V "SizeNESW" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeNESW.ani" /F 
  20. REG ADD "HKCU\Control Panel\Cursors" /V "SizeAll" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\SizeAll.ani" /F 
  21. REG ADD "HKCU\Control Panel\Cursors" /V "UpArrow" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\UpArrow.ani" /F 
  22. REG ADD "HKCU\Control Panel\Cursors" /V "Hand" /T "REG_EXPAND_SZ" /D "%%SYSTEMROOT%%\Cursors\Glass Maxx\Hand.ani" /F 
  23. 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
  1. 'Dan Dombrowski
  2. 'July 2008
  3.  
  4. Public Class Form1
  5.  
  6.     'API declarations
  7.     Private Declare Function SetSystemCursor Lib "user32.dll" (ByVal hCursor As IntPtr, ByVal id As Integer) As Boolean
  8.     Private Declare Function LoadCursorFromFile Lib "user32.dll" Alias "LoadCursorFromFileA" (ByVal lpFileName As String) As IntPtr
  9.  
  10.     'Cursor constants
  11.     Private Const IDC_APPSTARTING As UInt32 = 32650
  12.     Private Const IDC_ARROW As UInt32 = 32512
  13.     Private Const IDC_HAND As UInt32 = 32649
  14.     Private Const IDC_CROSS As UInt32 = 32515
  15.     Private Const IDC_HELP As UInt32 = 32651
  16.     Private Const IDC_IBEAM As UInt32 = 32513
  17.     Private Const IDC_NO As UInt32 = 32648
  18.     Private Const IDC_SIZEALL As UInt32 = 32646
  19.     Private Const IDC_SIZENESW As UInt32 = 32643
  20.     Private Const IDC_SIZENS As UInt32 = 32645
  21.     Private Const IDC_SIZENWSE As UInt32 = 32642
  22.     Private Const IDC_SIZEWE As UInt32 = 32644
  23.     Private Const IDC_UP As UInt32 = 32516
  24.     Private Const IDC_WAIT As UInt32 = 32514
  25.  
  26.     'Variable to save current cursor
  27.     Dim SavedCursor As Icon
  28.  
  29.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  30.         'Save cursor
  31.         SavedCursor = Icon.FromHandle(Cursors.Arrow.CopyHandle)
  32.  
  33.         'Change arrow cursor to mine
  34.         Dim NewCursor As IntPtr = LoadCursorFromFile(Application.StartupPath & "\MyCross.ani")
  35.  
  36.         'Check
  37.         If NewCursor = IntPtr.Zero Then
  38.             'Error loading cursor from file
  39.             Debug.WriteLine("Error loading cursor from file.")
  40.             Return
  41.         End If
  42.  
  43.         'Set the system cursor
  44.         If SetSystemCursor(NewCursor, IDC_ARROW) = 0 Then
  45.             'Error setting system cursor
  46.             Debug.WriteLine("Error setting system cursor.")
  47.             Return
  48.         End If
  49.  
  50.         'Disable/enable buttons
  51.         Button1.Enabled = False
  52.         Button2.Enabled = True
  53.     End Sub
  54.  
  55.     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  56.         'Get old cursor
  57.         Dim OldCursor As IntPtr = SavedCursor.Handle
  58.  
  59.         'Set the system cursor
  60.         SetSystemCursor(OldCursor, IDC_ARROW)
  61.  
  62.         'Disable/enable buttons
  63.         Button1.Enabled = True
  64.         Button2.Enabled = False
  65.     End Sub
  66.  
  67.     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  68.  
  69.     End Sub
  70.  

PD: Cada constante equivale a cada imagen del cursor (arrow, hand, busy, etc...) en el ejemplo sólo cambian el cursor principal (arrow).
Páginas: 1 ... 944 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 ... 1235
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines