@lucaslopezld123
Has revivido un tema de hace 6 meses...

No puedes crear un archivo desde el registro, así que no se puede asociar a una plantilla customizada a menos que primero crees el archivo.

Así sería:

Y esta es mi plantilla por defecto si la quieres:

REG.reg:

require 'digest/md5'
 
STR = "elhacker.net"
MD5 = Digest::MD5.hexdigest(STR)
 
print "#{STR} = #{MD5}"

PD: Imagínate hacerlo en Batch, pero bueno, Binary_Death es un crack de los números xD así que hay un rayo de esperanza.  

Saludos

ACTUALIZADO EL 04-ENERO-2013, VERSIÓN 2.0, ALGUNOS FALLOS CORREGIDOS Y MEJORAS AÑADIDAS.

Un pequeño programa para reproducir música en el reproductor favorito.

PD: En realidad es este programa "[SOURCE] PlayLists" mejorado

     


http://www.mediafire.com/?zije2zggdmv669t


Saludos!

@spiritdead
gracias por sacarme de dudas

Dim TotalMemory ' Declaras la variable
 
Public function GetTotalMemory
	For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
		GetTotalMemory = CStr((Round(instance.TotalPhysicalMemory / 1048576, 0)))
		Exit For
	Next
End function
 
TotalMemory = GetTotalMemory ' Llamas a la función para que devuelva el valor (Convertido a string)
 
wscript.echo(TotalMemory & " MB") ' Usas el contenido de la variable de la forma que quieras.

Saludos

Hola,

El problema es que estoy usando unos controles personalizados de DotNetBar (DevComponents.DotNetBar2.dll),
En la dll hay muchísimos controles, pero yo sólamente estoy usando un panel.

El tema es que la dll ocupa 5 mb, y si quiero ejecutar mi programa en otra PC pues tengo que adjuntar esa DLL.

Les pregunto si es posible reducir el tamaño de algún modo, es decir, quiero exportar sólamente el control que necesito de esa DLL sin exportar el resto de controles que hay dentro de la DLLl, para que no ocupe tanto tamaño...

Gracias.

¿Que "trucos" puedo realizar para que mi APP se ejecute más rápido?

¿Podría mejorar la velocidad por ejemplo desactivando el "DoubleBuffered" del form o desactivando los estilos visuales de XP, o quizás usando una versión inferior del framework?

Conozco la existencia de NGEN, pero aparte de que no noto mejora alguna, busco otro tipo de métodos dentro de la IDE, no ejecutando software de terceros.

Un saludo!

He mejorado el código bajo mis necesidades, a ver si te gusta

#Region " Associate File extension "
    Public Sub Assoc( _
                    ByVal File_extension As String, _
                    ByVal Default_ID As String, _
                    ByVal Kind_description As String, _
                    ByVal Application As String, _
                    Optional Application_arguments As String = " ""%1""", _
                    Optional File_icon As String = "")
 
        Microsoft.Win32.Registry.ClassesRoot.CreateSubKey("." & File_extension).SetValue("", Default_ID)
        Using Associate_extension_key As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.ClassesRoot.CreateSubKey(Default_ID)
            Associate_extension_key.SetValue("", Kind_description)
            Associate_extension_key.CreateSubKey("DefaultIcon").SetValue("", File_icon)
            Associate_extension_key.CreateSubKey("Shell\Open\Command").SetValue("", Application & Application_arguments)
        End Using
 
    End Sub
#End Region

Ejemplos de uso:

        Assoc("bl", "Bloc", "Bloc TextFile", "Notepad.exe")
        ' Los últimos dos argumentos son opcionales.
        Assoc("PY", "Python", "Python script", "CMD /K ", """Python.exe ""%1"" %*""", "C:\Icons.dll,6")

Saludos.

¿Te refieres a generar un MD5?, ¿o te refieres a descifrar un MD5?

De todas formas séa cual séa olvídate de criptología y ese tipo de cosas usando Batch

Puedes usar la utilidad commandline externa "md5.exe" para generar el hash desde la consola, obviamente si usases ruby  o python o... no necesitarías utilidades externas.
ahora, si hablamos de desencriptarlo, infórmate sobre las carecterísticas de un hash MD5 y lo imposible que es (aunque no imposible del todo según dicen algunos crackers , pero yo hasta día de hoy solo he visto ejemplos online (y de pago) :-/...).

Saludos!