Mensajes

[Error:]

Error:
No sale ningún error visible, simplemente después de elegir la opción del menú msc o cpl y escribir usuario y contraseña al pulsar Enter no sale nada, salta a la siguiente linea y se queda ahí sin ninguna acción.

¿Sin error de ningín tipo?

Mejora la sintaxis del código encerrando las cadenas con comillas dobles y especificando la ruta absoluta, y añádele un Pause después de la instrucción para ver si muestra algún mensaje de error antes de la pausa:

Código (DOS) [Seleccionar] Expandir


Set /P "VMSC="
"%systemroot%\system32\RunAs.exe" /NoProfile /User:"EQUIPO\USUARIO" "\"%systemroot%\system32\mmc.exe\" \"%systemroot%\system32\%VMSC%\""
Pause

PD: La verdad es que el comando en tu código debería funcionar, pero como alternativa podrías usar la aplicación PSExec.

Saludos

[1773]

Si por ejemplo tenemos este Array:

Código [Seleccionar] Expandir

{ 1773, 1774, 1775 }

El primer elemento (índice 0) es 1773, el segundo elemento (índice 1) es 1774, y el tercer elemento (índice 2) es 1775 , supongo que esto está más que claro, pero por si acaso lo comento igual.

En esta instrucción

Código (vb) [Seleccionar] Expandir

Wscript.Echo ... Values(Cint(Mid(File.name, 5, 3)))

Con el método Mid(File.name, 5, 3) hago un Substring a la cadena de texto y obtengo el String 001 (o 002, o 003, etc... según el nombre del archivo)

Después, con el método Cint(001) indico que el 001 se debe tratar como un valor numérico (Int32), esto le quita los ceros de la izquierda quedando un 1

Y por último con Values(1) llamo al índice 1 del Array, que es el valor 1773

El índice del Array del código está adaptado para que coincida de forma exacta con el String que obtienes al usar la función Mid, por eso el primer elemento del Array es Null.

Saludos

El tema ha sido movido a PHP.

http://foro.elhacker.net/index.php?topic=412200.0

[Breevy]

Existe un programa para hacer eso?

Si sigues buscando un Software profesional puedes utilizar Breevy, hace exáctamente lo que precisas (realizar una acción al escribir cualquier cosa en cualquier parte), puedes indicar una de las acciones predefinidas o ejecutar un Script/Proceso, es muy customizable ...lo tiene "todo".

· Text expander for Windows - Breevy

Saludos!

[básico]

Hola

1. Está prohibido ABUSAR DE LAS MAYÚSCULAS en el foro, se considera gritar.

2. Los códigos deben ir en su respectivo formato, usando las etiquetas GeShi.

3. Sugerencia: Cuando tnegas un error, como mínimo describe el error a ser posible mostrando la excepción, en el código todo es correcto.

Haz el favor de leer las normas del foro, y un tutotial básico de C#, porfavor, que estamos hablando de como usar el operador para concatenar...
· http://www.dotnetperls.com/string-concat

Saludos!

[Marxio Timer]

Existen cientos de Software destinados a esa función... yo utilizo por un lado Marxio Timer para especificar "cuentas atrás" puntuales, es una aplicación simple y sencilla de usar, luego uso VueMinder para una organización más profesional.

· http://download.cnet.com/Marxio-Timer/3000-2350_4-10911239.html

PD: El icono se debe usar para temas resueltos, no para hacer preguntas... si tu tema queda resuelto entonces úsalo, antes no, a menos que quieras que nadie se interese por leer tu post (puesto que se supone que está resuelto).

Saludos

[istalar wuindos]

Para "istalar wuindos" necesitas reiniciar el PC para proseguir la instalación desde un dispositivo extraible, con la herramienta EasyBCD puedes intentar modificar el bootloader por NeoGrub para utilizar una imagen ISO de un DVD de Windows como punto de montaje Bootable, y de esta manera poder instalar Windows sin necesidad de un dispositivo DVD/USB físico.



( Aquí está explicado el procedimiento: http://superuser.com/questions/558959/can-i-install-windows-using-a-virtual-disk-drive )

Saludos!

[clickonce]

Bueno, vamos a ver

1. ¿Hablas de vb6, o vb.net?

2. ¿A que te refieres con instalador? no somos magos, ¿te refieres a auna aplicación clickonce, a un instalador VSIX de Miscorosft, o a que?

PD: Cuanta falta hacen las plantillas para formular dudas de programación... !!

En cualquier caso, siempre puedes usar un installbuilder de terceros y que no sea de Microsoft (VSIX, MSI), como por ejemplo InnoSetup o NSIS.

Saludos

hola

no me refiero a si tus discos son NTFS, me refiero a que si tienes la compresión NTFS activada, ya que esto engañaría mucho al comprobar el tamaño real de los archivos copiados:



Y otra cosa, ¿has comprobado manualmente si todos los archivos se llegan a copiar o faltan archivos?

saludos!

[byte[] array pattern search]

Puedes hacer lo que dijo El Benjo, con un For, aquí tienes infinidad de ejemplos en C#: byte[] array pattern search Puedes convertir el código en http://converter.telerik.com/

Lo que yo hice fue tomar y estudiar varios ejemplos de arriba para escribir en VB.NET un método de uso generico usando LINQ, aunque no soy un experto en bytes, espero que no se me haya pasado nada por alto:

Código (vbnet) [Seleccionar] Expandir

   ' Find Byte Pattern
   ' ( By Elektro )
   '
   ' Usage Examples:
   ' Dim Indexes As Integer() = MatchBytePattern({1, 2, 3, 1, 2, 3, 2, 3}, {1, 2}) ' Result: {0, 3}
   '
   ''' <summary>
   ''' Finds a Byte pattern inside a Byte Array and returns the starting indexes of all concurrences.
   ''' </summary>
   ''' <param name="ByteArray">Indicates the Byte Array to search inside.</param>
   ''' <param name="Pattern">Indicates the Byte pattern to match.</param>
   ''' <returns>The starting indexes of all concurrences.</returns>
   Friend Function FindBytePattern(ByVal ByteArray As Byte(), ByVal Pattern As Byte()) As Integer()

        Return Enumerable.Range(0, ByteArray.Length - Pattern.Length + 1).
                          Where(Function(i As Integer) Pattern.Select(Function(b1, b2) New With {b2, b1}).
                          All(Function(p) ByteArray(i + p.b2) = p.b1)).
                          ToArray()

   End Function

Un ejemplo de uso:

Código (vbnet) [Seleccionar] Expandir

   Private Sub Test() Handles MyBase.Shown

       Dim Bytes As Byte() =
           {
               1, 2, 3, 4, 5, 6, 7, 8, 9, 33, 55, 22, 77, 4, 45, 62,
               99, 98, 97, 96, 95, 94, 93, 22, 77, 4, 45, 98, 97, 96, 95,
               3, 4, 5, 7, 8, 9, 1, 2, 3, 99, 98, 97, 96, 45, 98, 97, 96
           }

       Dim Find As Byte() = New Byte() {1, 2, 3}

       Dim Indexes As Integer() = FindBytePattern(Bytes, Find) ' Result: {0, 37}

       For Each Index As Integer In Indexes
           MessageBox.Show(CStr(Index))
       Next Index

       Application.Exit()

   End Sub

Conociendo la cantidad de bytes que quieres buscar y obteniendo los índices de cada coincidencia creo que el resto ya es cosa tuya, muy simple...

Saludos