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

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 [11] 12 13 14 15
101  Programación / .NET (C#, VB.NET, ASP) / Re: ayuda con captura de pantalla en: 22 Enero 2011, 01:48 am
la idea es dibujar la captura de pantalla que realizo :S
102  Programación / Programación Visual Basic / Re: [BRAINSTORMING] KPC v3 (Karcrack Project Crypter) en: 22 Enero 2011, 00:55 am
creo q deveriamos abrir un topic y hacer variaciones de funciones que simulen a las mismas para ir ganando tiempo al proyecto hacer split y etc y q las mejorcitas c vallan agregando...
103  Programación / .NET (C#, VB.NET, ASP) / ayuda con captura de pantalla en: 21 Enero 2011, 23:20 pm
tengo el fragmento de este code el cual toma una captura de la pantalla y todo bien lo toma sin problemas, el problema es el siguiente
Código
  1.  Public Sub New()
  2.            'escritorio = rectangle
  3.            B_rectangle = Windows.Forms.Screen.PrimaryScreen.Bounds
  4.            'encapsulamos mapas de bits a partir del B_rectangle.
  5.            B_image = New Drawing.Bitmap(B_rectangle.Width, B_rectangle.Height, Drawing.Imaging.PixelFormat.Format32bppArgb)
  6.            'crea la imagen a partir de b_image
  7.            B_graphics = Drawing.Graphics.FromImage(B_image)
  8.        End Sub
  9.  
  10.  
  11. Public Function GetSnapshot() As IntPtr Implements Icaptura.GetSnapshot
  12.            If B_bitmapData IsNot Nothing Then
  13.                Throw New InvalidOperationException("Hay que liberar la instantánea actual antes de obtener una nueva.")
  14.            End If
  15.            B_graphics.CopyFromScreen(0, 0, 0, 0, B_rectangle.Size)
  16.            B_bitmapData = B_image.LockBits(B_rectangle, Drawing.Imaging.ImageLockMode.ReadOnly, Drawing.Imaging.PixelFormat.Format32bppArgb)
  17.            Return B_bitmapData.Scan0
  18.  
  19.        End Function
  20.  
Código
  1.  
  2.        Public Sub New(ByRef target As Windows.Forms.Control, ByVal width As Integer, ByVal height As Integer, ByVal pixelformat As Drawing.Imaging.PixelFormat)
  3.            o_target = target
  4.            o_graphics = o_target.CreateGraphics
  5.  
  6.            b_rectangle = New Drawing.Rectangle(0, 0, width, height)
  7.            b_format = pixelformat
  8.  
  9.            Dim stride As Integer
  10.            stride = 0
  11.  
  12.            Select Case b_format
  13.                Case Drawing.Imaging.PixelFormat.Format16bppArgb1555, Drawing.Imaging.PixelFormat.Format16bppRgb555, Drawing.Imaging.PixelFormat.Format16bppRgb565
  14.                    stride = (width * 2)
  15.                Case Drawing.Imaging.PixelFormat.Format24bppRgb
  16.                    stride = (width * 3)
  17.                Case Drawing.Imaging.PixelFormat.Format32bppArgb, Drawing.Imaging.PixelFormat.Format32bppPArgb, Drawing.Imaging.PixelFormat.Format32bppRgb
  18.                    stride = (width * 4)
  19.            End Select
  20.  
  21.            b_length = height * stride
  22.  
  23.            buffer = Runtime.InteropServices.Marshal.AllocHGlobal(b_length)
  24.  
  25.            b_image = New Drawing.Bitmap(b_rectangle.Width, b_rectangle.Height, stride, b_format, buffer)
  26.            o_graphics.DrawImage(b_image, o_target.ClientRectangle)
  27.        End Sub
  28.  
  29.  
  30.        Public Sub DrawUpdate(ByVal intIndex As Integer, ByRef aryData() As Byte, ByVal intIndex_Data As Integer, ByVal intLength As Integer) Implements Idibujar.DrawUpdate
  31.            Runtime.InteropServices.Marshal.Copy(aryData, intIndex_Data, CInt(buffer) + intIndex, intLength)
  32.        End Sub
  33.  
  34.  

esta segunda part es fragmento de un code el cual no logro hacer que dibuje donde le designo....
o si hay alguna otra forma me seria de utilidad, y si desean las declaraciones de las variables las subo o algo mas.
104  Programación / .NET (C#, VB.NET, ASP) / conexion inversa en vb.net algun dato por hay ? en: 21 Enero 2011, 00:59 am
hola a todos mi duda es esa quiero y pretende realizar una aplicacion que sea parecida a los troyanos osea poder conectar varios servidores en un solo cliente y manejarlos desde hay al que desee algo como la conexion inversa que se realiza en esto como array de sockets o algo,alguna info o por donde empezar? gracias
105  Programación / Programación Visual Basic / Re: [BRAINSTORMING] KPC v3 (Karcrack Project Crypter) en: 20 Enero 2011, 23:59 pm
y que otros metodos se pueden hacer pero atraves de code....yo ni idea de esto pero creo q los av's t colocan firma tambien donde compilas el proyecto seria modificar esto,agregar variantes al split,LOF y demas q tienen firmass... :S
106  Foros Generales / Sugerencias y dudas sobre el Foro / Re: [Sugerencia] Otro moderador en Visual Basic en: 18 Enero 2011, 23:10 pm
y porq no el compadre BlackZeroX▓▓▒▒░░  ?¿ jejej
107  Seguridad Informática / Análisis y Diseño de Malware / Re: Proyecto DEMOXY en: 15 Enero 2011, 16:24 pm
el sistema con el servidor es udp hole punching ? o es otro a tu manera!
108  Programación / Programación Visual Basic / Re: [Ayuda] Reemplazar "COMDLG32.OCX" con algun Control de Usuario. en: 5 Diciembre 2010, 20:43 pm
hay lo tienes man es un modulo de clase para ello y no dependes de la ocx, igual no es muy dificil hacer un pequeño modulo a tu gusto husmea las api q usa y listo te daras cuenta.

http://www.sendspace.com/file/fdd766
109  Programación / Programación Visual Basic / Re: [SRC] FrogCheat v1.1 [by Mr. Frog ©] en: 30 Noviembre 2010, 03:52 am
muy bueno y probadopor mi te felicito señor Frog  ;-)
110  Programación / Programación Visual Basic / Re: Modulo StartUp ["AutoRun.bas"] Falla en: 5 Noviembre 2010, 03:45 am
si iinicias tu aplicacion como administrador te tiene q funcionar ! igual creo q deberias buscar tu propia manera ya q como sabes desde W$ vista en adelante tenes el UAC y demas !
Páginas: 1 2 3 4 5 6 7 8 9 10 [11] 12 13 14 15
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines