Mensajes

Yo no entiendo muy bien la pregunta "saber los números que faltan dentro del rango".

saludos

[Windows Management Instrumentation]

si alguien me puede explicar mas sobre ese objeto

¿Que es exáctamente lo que no entiendes?, pues hay varias referencias a objetos declarados en ese trozo de código ...aunque todas tienen que ver con WMI.

WMI (Windows Management Instrumentation) es una infraestructura para obtener diversa información del sistema haciendo querys.

Código (vb) [Seleccionar] Expandir

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")

Lo que está entre paréntesis es una expresión para conectar con el namespace del objeto (en este caso .\root\cimv2) donde el punto representa cualquier PC (podría especificarse otro nombre de máquina o dirección), y winmgmts: es un prefijo que nunca cambia.

~> Connecting to WMI Objects
~> Windows Remote Management and WMI

Código (vb) [Seleccionar] Expandir

   Set wmiEvent = objWMIService.ExecNotificationQuery( _
     "Select * From __InstanceCreationEvent Within 1" & _
         " Where TargetInstance ISA 'Win32_PnPEntity'")

Con esa query lo que haces es subscribirte a un evento, pues cuando insertas o extraes un dispositivo sucede un evento en el sistema, y de esta manera se reporta a ti, y la class Win32_PnPEntity representa las propiedades de un dispositivo plug&play.

Por ejemplo, el evento __InstanceCreationEvent ocurre cuando un dispositivo se conecta/crea, __InstanceDeletionEvent cuando un dispositivo de extrae/elimina, y el evento __InstanceModificationEvent cuando un dispositivo se modifica.

~> __InstanceCreationEvent class
~> Win32_PnPEntity class
~> Receiving a WMI Event

Dentro del búcle, el resto de métodos, propiedades del objeto, y querys, creo que són más fáciles de entender sin necesidad de explicaciones, pero si no entiendes algo de ahí entonces requiere más lectura en inglés por tu parte (cosa que ya has dejado clara que no quieres), así que lo dejo aquí.

Saludos!

[EDITO:]

Elektro:

Descargue tu programa pero no me funciona, lo descomprimo y cuando doy doble click en el ejecutable no abre, dentro de la carpeta están 3 archivos CButtonLib.dll Ookii.Dialogs.dll y Reg2Bat.exe

¿así sin más, no se abre, sin mostrar siquiera un error?, que extraño.

¿Usas WinXP?, ¿Tienes el Framework 4.0 instalado?

Pruébalo en un Win7/8 con Framework 4.0 instalado, así debería funcionarte sin problemas.

EDITO: Si quieres postea el script y yo te lo convierto con el programa.

EDITO 2:

El motivo por el cual quiero que no pida confirmación, es porque se trata de una instalación desatendida.

Si estás usando algún installbuilder (InnoSetup, InstallShield, etc...) lo correcto sería que añadieras los valores del registro desde el lenguaje que utilice el propio installbuilder, así no te pediría confirmación.
Si estás usando algo tipo WinRAR-SFX ...olvídalo xD

Saludos!

[REG2BAT Autor: EleKtro]

Tanto en VBS como en Bat, en lugar de ejecutar un archivo, puedes escribir diréctamente las instrucciones necesarias para añadir las claves al registro, ¿Lo has probado?.

Este programa te servirá para traducir el contenido del script de registro a código Batch ~> REG2BAT Autor: EleKtro



Ejemplo:

Código (dos) [Seleccionar] Expandir


@Echo OFF
:: Converted with REG2BAT 2.0 By Elektro
   
REM Windows Registry Editor Version 5.00
   
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Binary"    /T "REG_BINARY"    /D "1234567890"         /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Dword Dec" /T "REG_DWORD"     /D "0x00bc614e"         /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Dword hex" /T "REG_DWORD"     /D "0x12345678"         /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Expand SZ" /T "REG_EXPAND_SZ" /D "%%Temp%%\Hello"     /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Multi SZ"  /T "REG_MULTI_SZ"  /D "Hello\0world!\0"    /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Qword Dec" /T "REG_QWORD"     /D "0x00000000000010e1" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Qword Hex" /T "REG_QWORD"     /D "0x1234567891234567" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test String"    /T "REG_SZ"        /D "By Elektro H@cker"  /F

PD: Como puedes ver en el ejemplo, en Batch tienes que usar el comando REG y añadir el parámetro /F para forzarl a sobreescritura de un valor sin requerir confirmación, óbviamente en VBS (o cualquier otro lenguaje de verdad) esto no es algo necesario.

Saludos.

[Abs]

La pregunta es, ¿que haces para que se lleguen a mostrar esos símbolos?.

Si tienes problemas con números negativos puedes usar el método Abs de la class Math

Código (vbnet) [Seleccionar] Expandir

        Dim i As Integer = -1

        ListBox1.Items.Add(i) ' Result = -1

        i = Math.Abs(i)

        ListBox1.Items.Add(i) ' Result = 1

PD: Lo que quiero decir con esto es que los cambios necesarios házselos al objeto que contenga los números, olvida el ListBox ...no lo modifiques diréctamente.

Saludos

he estado leyendo es que hay muchos fallos de compatibilidad con programas, que dejan de funcionar algunas aplicaciones mientras realizas las tareas, cosas asi...

Claro, eso es lo que pasa si alguien sigue intentando utilizar software de hace décadas en un sistema operativo actual... yo diréctamente omitiría todo ese tipo de comentarios que hayas leido, aunque se tratase de problemas con software actual, sincéramente, el 99,9% de las aplicaciones actuales son compatibles con Windows 8, como dijo @drvy, es cuestión del desarrollador, pero también tiene culpa el que se niega a actualizar un software prehístorico y prefiere rechistar culpando al SO ...hay que tener dos dedos de frente.

Saludos!

[@drvy]

Estaba dudando porque como dicen que después de un buen sistema operativo Microsoft saca otro que es una porqueria por ej después de windows xp, sacó el vista y después del 7 sacó el 8

Eso es una realidad como si misma, pero no es el caso de Windows 8, es algo que depende de gustos y escucharás diversas opiniones entre ellas "es peor que windows 7", pero no se puede decir que Windows 8 sea un sistema operativo peor que los anteriores.

Sobre lo de la actualización del SO, opino lo mismo que el compañero @drvy

Saludos!

[ProcessMonitor]

En caso de que no fuese una especie de virus y el antivirus no te solucionase el problema... ProcessMonitor lo hará monitorizando lo que sucede al crearse la carpeta y quien es el causante, aunqe, si no sabes cuando sucede deberás ser paciente y hacer bastantes filtros y comprobaciones.

~> http://technet.microsoft.com/en-us/sysinternals/bb896645.aspx

Saludos

Genial, viste que orientado y eficaz usando XML

Salu2!

aunque pruebo con lo que me explico Elektro en propiedades de los lisbox colunWich multicolum etc no logro hacer esto.

Es imposible darte una solución de forma remota como unas medidas perfectas, no se te puede ayudar con el diseño de tu Listbox, eres tu quien debe manipular el tamaño del Listbox desde el Designer, así como otras propiedades como por ejemplo 'columndwidth' y la fuente de texto ('font') si fuese necesario. ...todo eso para ajustar el Listbox a un número de columnas e Items por fila.

Respecto a lo de ordenar los elementos de mayor a menor:

Código (vbnet) [Seleccionar] Expandir

Dim Result22 As IEnumerable(Of Integer) =
   (result1.Concat(result2).Concat(result3)).
   Distinct.
   Select(Function(Value As Integer) If(Value < MAX, Value, Rand.Next(0, MAX))).
   OrderByDescending(Function(Value As Integer) Value)

Saludos