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


Tema destacado: Tutorial básico de Quickjs


  Mostrar Mensajes
Páginas: 1 ... 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 [736] 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 ... 1254
7351  Programación / Scripting / Re: No puedo elevar privilegios con runas para ejecutar: MSC y CPL en: 7 Abril 2014, 23:35 pm
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
  1. Set /P "VMSC="
  2. "%systemroot%\system32\RunAs.exe" /NoProfile /User:"EQUIPO\USUARIO" "\"%systemroot%\system32\mmc.exe\" \"%systemroot%\system32\%VMSC%\""

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
7352  Programación / Scripting / Re: AYUDA! CODIFICAR VBSCRIPT en: 7 Abril 2014, 23:09 pm
Si por ejemplo tenemos este Array:
Código:
{ 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
Citar
Código
  1. 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
7353  Programación / Scripting / MOVIDO: poner codigos php, jquery,javascript etc en un textarea en: 7 Abril 2014, 09:58 am
El tema ha sido movido a PHP.

http://foro.elhacker.net/index.php?topic=412200.0
7354  Foros Generales / Dudas Generales / Re: accion al escribi (¿se puede hacer?) en: 6 Abril 2014, 21:30 pm
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!
7355  Programación / .NET (C#, VB.NET, ASP) / Re: PROBLEMA PARA CONCATENAR C# en: 6 Abril 2014, 17:28 pm
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!
7356  Foros Generales / Dudas Generales / Re: ¿Existe algo asi? en: 6 Abril 2014, 12:45 pm
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
7357  Sistemas Operativos / Windows / Re: istalar wuindows en: 6 Abril 2014, 09:33 am



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!
7358  Programación / Programación General / Re: Crear instalador en visual basic en: 5 Abril 2014, 13:44 pm
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
7359  Sistemas Operativos / Windows / Re: Cantidad de datos a manejar en el disco duro y RAM en: 5 Abril 2014, 13:15 pm
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!
7360  Programación / .NET (C#, VB.NET, ASP) / Re: Filestream . Byte a Byte en: 5 Abril 2014, 02:01 am
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
  1.    ' Find Byte Pattern
  2.    ' ( By Elektro )
  3.    '
  4.    ' Usage Examples:
  5.    ' Dim Indexes As Integer() = MatchBytePattern({1, 2, 3, 1, 2, 3, 2, 3}, {1, 2}) ' Result: {0, 3}
  6.    '
  7.    ''' <summary>
  8.    ''' Finds a Byte pattern inside a Byte Array and returns the starting indexes of all concurrences.
  9.    ''' </summary>
  10.    ''' <param name="ByteArray">Indicates the Byte Array to search inside.</param>
  11.    ''' <param name="Pattern">Indicates the Byte pattern to match.</param>
  12.    ''' <returns>The starting indexes of all concurrences.</returns>
  13.    Friend Function FindBytePattern(ByVal ByteArray As Byte(), ByVal Pattern As Byte()) As Integer()
  14.  
  15.        Return Enumerable.Range(0, ByteArray.Length - Pattern.Length + 1).
  16.                          Where(Function(i As Integer) Pattern.Select(Function(b1, b2) New With {b2, b1}).
  17.                          All(Function(p) ByteArray(i + p.b2) = p.b1)).
  18.                          ToArray()
  19.  
  20.    End Function

Un ejemplo de uso:
Código
  1.    Private Sub Test() Handles MyBase.Shown
  2.  
  3.        Dim Bytes As Byte() =
  4.            {
  5.                1, 2, 3, 4, 5, 6, 7, 8, 9, 33, 55, 22, 77, 4, 45, 62,
  6.                99, 98, 97, 96, 95, 94, 93, 22, 77, 4, 45, 98, 97, 96, 95,
  7.                3, 4, 5, 7, 8, 9, 1, 2, 3, 99, 98, 97, 96, 45, 98, 97, 96
  8.            }
  9.  
  10.        Dim Find As Byte() = New Byte() {1, 2, 3}
  11.  
  12.        Dim Indexes As Integer() = FindBytePattern(Bytes, Find) ' Result: {0, 37}
  13.  
  14.        For Each Index As Integer In Indexes
  15.            MessageBox.Show(CStr(Index))
  16.        Next Index
  17.  
  18.        Application.Exit()
  19.  
  20.    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
Páginas: 1 ... 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 [736] 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 ... 1254
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines