Mensajes

[i]

No quiero que un usuario novato venga y le altere todo el comando

Gracias por avisar del error de escritura, sin querer me comí la i

Saludos!

[Mocosoft .Bat Framework]

de que sirve este foro si no se puede subir ninguna herramienta pirateada ni se puede hacer o decir nada que provoque daño a los demás, de que sirve foro elhacker

¿De que sirven las pistolas si no puedo pegarte un tiro por las tonterias que dices?, ah ...ya recuerdo, por que aparte de para matar también existen para algo positivo cómo defender la vida de un inocente.

Pues aunque te vaya a costar mucho creerlo, las herramientas también se crean y se comparten con fines educativos, y los temas en este foro (la mayoría) se publican con el mismo fín, para enseñar cómo defenderte del malware, penetraciones de hackers, etc, no solo para facilitarle la vida a aspirantes de delincuentes cómo tú a "jakear quentas del feisbuk".

solo digo que al creador se le podria llamar hipocrita

Mejor ser hipócrita que tonto, por que si este fuese el típico foro donde se publica cualquier mierd@ de hacking sin supervisar el contenido entonces nuestro querido y todo poderoso Admin no ganaría los mismos beneficios a largo plazo ya que el contenido derivaría en otros problemas legales (o al menos eso supongo, no se mucho sobre la administración de webs), hay que llevar un control sobre la ética y calidad del contenido por temas legales también, para evitar a gente indeseada.

El Admin tiene sus razones para llevar el rumbo que él quiera llevar en la web, ¿antes de criticar te has molestado en preguntarle?, ¿no, verdad?, pues entonces para que criticas?.

Te recuerdo que esta es una página respetable, de calidad para todos los públicos.

en que momento el bat a dejado de ser un mal lenguaje para crear un rootkit o un gusano? obiamente el c++ es mucho mas simple y estable y encima tiene muchas de las caracteristicas del ASM, pero e pues el ejemplo de bat porque es el mas conocido y el mas facil

Creo que ya todos hemos quedado alucinados con tus avanzados conocimientos de programación de malware y hacking en ""bat"", nos dejas en calzoncillos a los demás.

No se por que la gente se mete contigo y te llaman lammer... pf, no tienen ni idea estos "programadores" de pacotilla,
ese ""bat"" es un lenguaje multiparadigma, que se basa en un framework muy potente, Mocosoft .Bat Framework, compuesta por una extensa y bella librería de classes que, entre otras utilidades, proporciona un fluido manejo de sockets orientado a batobjetos, bat es muy bueno para hacer Botnets también, aparte del diseño de todo tipo de virus, y para el desarrollo de Rootkits cómo ya se ha comentado, claro está.
De hecho, cómo dato curioso, la interfáz de usuario de los bat-móviles de las películas de Batman lo desarrollaron con "bat", de ahí el nombre.

Pero maestro, me han quedado dudas cuando primero dijiste que C++ es más simple que ""bat"" y luego dices que ""bat"" es el más fácil, ¿en que quedamos?.

.
..
...Lo mejor de todo es que te metes con los usuarios del foro alegando que "son casi todo crios sin pelos en los huevos", pero deberías fijarte y preocuparte primero por lo que a ti te falta, por que aparte de la ausencia de educación y madurez, tienes una completa ignorancia típica del que cree saber demasiado e intenta presumir de ello sin saber realmente nada de lo que está diciendo, deberías aprender lo que es la humildad y mucho más cuando no sabes nada, tu prepotencia denota que todavía estás en la edad del pavo, seguramente sin pelos en los huevos también xD.

Todo el mundo yo incluido somos ignorantes de muchos temas ...cómo también lo eres tú, pero a diferencia de ti, nosotros somos consciente de ello y si nos equivocamos y metemos la gamba al afirmar algo sabemos reectificar, por ese motivo no hacemos el ridículo que te sigues haciendo a ti mismo.

...Lo siento pero es que a este tipo de crios que vienen a montar follón dándoselas de gurú sin tener ni pajolera idea de lo que hablan me pone enfermo y en plan satírico.

no es muy dificil encontrar foros de hacking solo tienes que buscar en la hidden wiki

¿Qué haces aquí pues?.

Si te quieres quedar pues bienvenido seas y deja de insultar a los demás sin motivo y de hacer "críticas" absurdas, sino pues adiós, ya sabes donde está la puerta "trasera".

PD: Puedes leer las normas del foro en mi firma.

Saludos!

[David Parcerisa]

Ese "yonki" cómo tú dices, tiene un parecido razonable a David Parcerisa, un conspiranoico de poca monta (del que no me creo nah) que he visto muchas veces colaborando en la web de JoseLuis Camacho (del que algo si que me creo),
bueno, pues se parecen no solo por que se dan un aire en la cara sino por que los gestos, el acento, la voz, y la forma de hablar es practicamente igual,
¿quizás el "yonki" es su hijo o algo? (lo pregunto en serio), y en ese caso, ¿eso de ver fantasmas, aliens, y hablar de los muertos entonces viene de familia o que? xD, ¿el hijo aprendiendo el "oficio" del padre?, que panda de oportunistas sin verguenzas...



Saludos...

[Pont Aeri]

Pues claro que el libro es real, yo lo vi por primera vez en una de mis películas favoritas, Evil Dead 3 (o "El ejército de las tinieblas"), aunque en las anteriores películas ya utilizaron el libro.

[youtube=640,360]https://www.youtube.com/watch?v=dn7hbghmd44[/youtube]     [youtube=640,360]https://www.youtube.com/watch?v=1pVkVUJtBoQ[/youtube]


Además, en un mítico tema del Pont Aeri sale una persona anónima relatando que ha descubierto el libro, en el minuto 1:25 y minuto 4:00:

[youtube=640,360]https://www.youtube.com/watch?v=iAypQUGQZ24[/youtube]


No creo que haga falta más pruebas para demostrar su existencia.

Saludos

Ah, me tengo que fiar de gente que no tiene idea de física (ojo, que yo de física............) y hace teorías conspirativas y destructivas, en vez de los científicos del CERN.

Yo de física también poco (menos que poco), pero simplemente no deberías fiarte de ninguno de los dos bandos, por que ninguno tiene ni idea.

A mi realmente me parece una tontería debatir sobre algo que desconocemos por completo (toda la humanidad), que los científicos especulen lo que quieran sobre agujeros negros o perros de 3 cabezas, yo ya lo dejo estar.

saludos

Y aunque se desarrollaran micro-agujeros negros, estos se destruirían teóricamente casi al momento. Tener miedo al LHC... O intentar buscar sentidos paranormales a lo que hacen... en fin.

Ahá, así que a ti te parece absurdo "tener miedo" a las posibles consecuencias catastróficas del LHC, pero en cambio te parece normal basar toda tu confianza en algo que sus científicos ni siquiera pueden demostrar?.
por que la teoría de los posibles micro-agujeros negros inofensivos es el arte de hablar sin tener ni pu** idea, científicos cómo Hawkings que le buscan el significado a los agujeros negros sin saber ni lo que es en realidad un agujero negro.

En serio, piensa lo que te voy a decir, ya no es por dramatizar, pero en serio... ¿que crees más probable que sucedería si se crease un micro-agujeero negro en el LHC, teniendo en cuenta que damos por hecho que un agujero negro es un "cuerpo celeste" que supuestamente "absorbe" sin límite e inevitablemente toda la matería a su alrededor?:

1. Que nos acabe absorbiendo a toda la humanidad.
2. Que se evapore sin ningún tipo de consecuencias, cómo dice la teoría (por no decir conjetura) que jamás a sido demostrada.

En realidad ambas respuestas creo que dan exactamente igual, por que no podemos demostrar ninguna, pero si confiamos en lo que creen saber los científicos entonces ya todos sabemos que hay muchos indicios o "pruebas" de lo que es un agujero negro y de su insaciable apetito, así que en mi opinión lo lógico es pensar que sucedería lo de la opción nº1.

Saludos.

[personal]

Si quiero acceder a Mis Documentos, y pincho directamente en la carpeta Mis Documentos, no me abre dicha carpeta.

¿Qué directorio se abre entonces?, no somos magos .

Alguien sabe como puedo solucionar esto para que no tenga que hacer todo el rollo, y solamente pinchando en el Menu Inicio y Documents, ya me abra dicha carpeta?

En caso de que realmente sea un problema de redireccionamiento, puedes verificar y personalizar la ruta del valor "personal" en la clave de registro donde se encuentran las rutas por defecto de las shell folders del sistema:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders

Los datos del valor "personal" deberían ser:
%USERPROFILE%\Documents

EDITO: Se me olvidaba comentar que, cualquier cambio que hagas en los valores de esa clave necesitará un reinicio de sesión para que hagan efecto.

En caso de que eso no resuelva el problema, realiza una búsqueda en el registro de la ruta del directorio que se te abre en lugar de "Mis documentos" para intentar hallar la clave que esté causando esa alteración, ten en cuenta las posibles variables de entorno al buscar.

Saludos!

gracias oblivion

El siguiente snippet sirve para "redondear" una cantidad de bytes a la unidad de tamaño más apróximada, con soporte para precisión decimal y formato personalizado.

Ejemplo de uso:

Código (vbnet) [Seleccionar] Expandir

       For Each unit As RoundByteInfo.SizeUnit In [Enum].GetValues(GetType(RoundByteInfo.SizeUnit))

           Dim rByteInfo As New RoundByteInfo(unit)
            Dim stringFormat As String = String.Format("{0} Bytes rounded to {1} {2}.",
                                                       rByteInfo.ByteValue(CultureInfo.CurrentCulture.NumberFormat),
                                                       rByteInfo.RoundedValue(decimalPrecision:=2, numberFormatInfo:=Nothing),
                                                       rByteInfo.UnitLongName)

           Debug.WriteLine(stringFormat)

       Next unit

Output:

Código [Seleccionar] Expandir

1 Bytes rounded to 1,00 Bytes.
1.024 Bytes rounded to 1,00 KiloBytes.
1.048.576 Bytes rounded to 1,00 MegaBytes.
1.073.741.824 Bytes rounded to 1,00 GigaBytes.
1.099.511.627.776 Bytes rounded to 1,00 TeraBytes.
1.125.899.906.842.620 Bytes rounded to 1,00 PetaBytes.

Source:

Código (vbnet) [Seleccionar] Expandir

' ***********************************************************************
' Author   : Elektro
' Modified : 07-April-2015
' ***********************************************************************
' <copyright file="RoundByteInfo.vb" company="Elektro Studios">
'     Copyright (c) Elektro Studios. All rights reserved.
' </copyright>
' ***********************************************************************

#Region " Usage Examples "

'For Each unit As RoundByteInfo.SizeUnit In [Enum].GetValues(GetType(RoundByteInfo.SizeUnit))
'
'    Dim rByteInfo As New RoundByteInfo(unit)
'    Dim stringFormat As String = String.Format("{0} Bytes rounded to {1} {2}.",
'                                               rByteInfo.ByteValue,
'                                               rByteInfo.RoundedValue(decimalPrecision:=2),
'                                               rByteInfo.UnitLongName)
'    Debug.WriteLine(stringFormat)
'
'Next unit

#End Region

#Region " Option Statements "

Option Explicit On
Option Strict On
Option Infer Off

#End Region

#Region " Imports "

Imports System.Globalization

#End Region

#Region " RoundByteInfo "

''' <summary>
''' Rounds the specified byte value to its most approximated size unit.
''' </summary>
Public NotInheritable Class RoundByteInfo

#Region " Properties "

   ''' <summary>
   ''' Gets the byte value.
   ''' </summary>
   ''' <value>The byte value.</value>
   Public ReadOnly Property ByteValue As Double
       Get
           Return Me.byteValue1
       End Get
   End Property

   ''' <summary>
   ''' Gets the byte value.
   ''' </summary>
   ''' <param name="numberFormatInfo">A custom <see cref="NumberFormatInfo"/> format provider.</param>
   ''' <value>The byte value.</value>
   Public ReadOnly Property ByteValue(ByVal numberFormatInfo As NumberFormatInfo) As String
       Get
           If numberFormatInfo Is Nothing Then
               numberFormatInfo = CultureInfo.CurrentCulture.NumberFormat
           End If
           Return Me.byteValue1.ToString("N0", numberFormatInfo)
       End Get
   End Property

   ''' <summary>
   ''' Gets the rounded byte value.
   ''' </summary>
   ''' <value>The rounded byte value.</value>
   Public ReadOnly Property RoundedValue As Double
       Get
           Return Me.roundedValue1
       End Get
   End Property

   ''' <summary>
   ''' Gets the rounded value with the specified decimal precision.
   ''' </summary>
   ''' <param name="decimalPrecision">The numeric decimal precision.</param>
   ''' <param name="numberFormatInfo">A custom <see cref="NumberFormatInfo"/> format provider.</param>
   ''' <value>The rounded value with the specified decimal precision.</value>
   Public ReadOnly Property RoundedValue(ByVal decimalPrecision As Integer,
                                         Optional ByVal numberFormatInfo As NumberFormatInfo = Nothing) As String
       Get
           If numberFormatInfo Is Nothing Then
               numberFormatInfo = CultureInfo.CurrentCulture.NumberFormat
           End If
           Return Me.roundedValue1.ToString("N" & decimalPrecision, numberFormatInfo)
       End Get
   End Property

   ''' <summary>
   ''' Gets the rounded <see cref="SizeUnit"/>.
   ''' </summary>
   ''' <value>The rounded <see cref="SizeUnit"/>.</value>
   Public ReadOnly Property Unit As SizeUnit
       Get
           Return Me.unit1
       End Get
   End Property

   ''' <summary>
   ''' Gets the rounded <see cref="SizeUnit"/> short name.
   ''' </summary>
   ''' <value>The rounded <see cref="SizeUnit"/> short name.</value>
   Public ReadOnly Property UnitShortName As String
       Get
           Return Me.unitShortName1
       End Get
   End Property

   ''' <summary>
   ''' Gets the rounded <see cref="SizeUnit"/> long name.
   ''' </summary>
   ''' <value>The rounded <see cref="SizeUnit"/> long name.</value>
   Public ReadOnly Property UnitLongName As String
       Get
           Return Me.unitLongName1
       End Get
   End Property

   ''' <summary>
   ''' The byte value.
   ''' </summary>
   Private byteValue1 As Double

   ''' <summary>
   ''' The rounded value.
   ''' </summary>
   Private roundedValue1 As Double

   ''' <summary>
   ''' The rounded <see cref="SizeUnit"/>.
   ''' </summary>
   Private unit1 As SizeUnit

   ''' <summary>
   ''' The rounded <see cref="SizeUnit"/> short name.
   ''' </summary>
   Private unitShortName1 As String

   ''' <summary>
   ''' The rounded <see cref="SizeUnit"/> long name.
   ''' </summary>
   Private unitLongName1 As String

#End Region

#Region " Enumerations "

   ''' <summary>
   ''' Specifies a size unit.
   ''' </summary>
   Public Enum SizeUnit As Long

       ''' <summary>
       ''' 1 Byte (or 8 bits).
       ''' </summary>
       [Byte] = 1L

       ''' <summary>
       ''' Byte-length of 1 KiloByte.
       ''' </summary>
       KiloByte = [Byte] * 1024L

       ''' <summary>
       ''' Byte-length of 1 MegaByte.
       ''' </summary>
       MegaByte = KiloByte * KiloByte

       ''' <summary>
       ''' Byte-length of 1 GigaByte.
       ''' </summary>
       GigaByte = KiloByte * MegaByte

       ''' <summary>
       ''' Byte-length of 1 TeraByte.
       ''' </summary>
       TeraByte = KiloByte * GigaByte

       ''' <summary>
       ''' Byte-length of 1 PetaByte.
       ''' </summary>
       PetaByte = KiloByte * TeraByte

   End Enum

#End Region

#Region " Constructors "

   ''' <summary>
   ''' Initializes a new instance of the <see cref="RoundByteInfo"/> class.
   ''' </summary>
   ''' <param name="bytes">The byte value.</param>
   ''' <exception cref="System.ArgumentException">Value should be greater than 0.;bytes</exception>
   Public Sub New(ByVal bytes As Double)

       If bytes <= 0L Then
           Throw New ArgumentException("Value should be greater than 0.", "bytes")
       Else
           Me.SetRoundByte(bytes)

       End If

   End Sub

   ''' <summary>
   ''' Prevents a default instance of the <see cref="RoundByteInfo"/> class from being created.
   ''' </summary>
   Private Sub New()
   End Sub

#End Region

#Region " Private Methods "

   ''' <summary>
   ''' Rounds the specified byte value to its most approximated <see cref="SizeUnit"/>.
   ''' </summary>
   ''' <param name="bytes">The byte value.</param>
   Private Sub SetRoundByte(ByVal bytes As Double)

       Me.byteValue1 = bytes

       Select Case bytes

           Case Is >= SizeUnit.PetaByte
               Me.roundedValue1 = bytes / SizeUnit.PetaByte
               Me.unit1 = SizeUnit.PetaByte
               Me.unitShortName1 = "PB"
               Me.unitLongName1 = "PetaBytes"

           Case Is >= SizeUnit.TeraByte
               Me.roundedValue1 = bytes / SizeUnit.TeraByte
               Me.unit1 = SizeUnit.TeraByte
               Me.unitShortName1 = "TB"
               Me.unitLongName1 = "TeraBytes"

           Case Is >= SizeUnit.GigaByte
               Me.roundedValue1 = bytes / SizeUnit.GigaByte
               Me.unit1 = SizeUnit.GigaByte
               Me.unitShortName1 = "GB"
               Me.unitLongName1 = "GigaBytes"

           Case Is >= SizeUnit.MegaByte
               Me.roundedValue1 = bytes / SizeUnit.MegaByte
               Me.unit1 = SizeUnit.MegaByte
               Me.unitShortName1 = "MB"
               Me.unitLongName1 = "MegaBytes"

           Case Is >= SizeUnit.KiloByte
               Me.roundedValue1 = bytes / SizeUnit.KiloByte
               Me.unit1 = SizeUnit.KiloByte
               Me.unitShortName1 = "KB"
               Me.unitLongName1 = "KiloBytes"

           Case Is >= SizeUnit.Byte, Is <= 0
               Me.roundedValue1 = bytes / SizeUnit.Byte
               Me.unit1 = SizeUnit.Byte
               Me.unitShortName1 = "Bytes"
               Me.unitLongName1 = "Bytes"

       End Select

   End Sub

#End Region

End Class

#End Region

[iMacros Script Code Creator]

No estoy seguro de si esto es lo que estás buscando, no uso el imacros:
➢ iMacros Script Code Creator

Generate scripting code from an iMacros macro and vice versa. Supported codestyles: VBS, VB, C#, Java, javascript, Php

Saludos