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

 

 


Tema destacado: Sigue las noticias más importantes de seguridad informática en el ttwitter! de elhacker.NET


  Mostrar Temas
Páginas: 1 2 3 [4] 5
31  Foros Generales / Foro Libre / ¿Qué lugar del mundo te gustaría visitar antes de morir? en: 10 Julio 2011, 19:30 pm
En que lugar del mundo os gustaría visitar antes de morir y el motivo si puede ser ;-)


saludos  ;)
32  Programación / Programación Visual Basic / Obtener IP de una DNS vb6 en: 10 Julio 2011, 16:47 pm
Hola, buscando en google encontré este code que sirve para sacar la IP a una DNS pero me manda la solución en un MsgBox y necesitaria que se pudiera copiar. He intentado con todo lo que he podido pero no consigo hacerlo...

Código
  1. Option Explicit
  2.  
  3. Private Declare Function DnsQuery Lib "dnsapi" Alias "DnsQuery_A" (ByVal strname As String, ByVal wType As Integer, ByVal fOptions As Long, ByVal pServers As Long, ppQueryResultsSet As Long, ByVal pReserved As Long) As Long
  4. Private Declare Function DnsRecordListFree Lib "dnsapi" (ByVal pDnsRecord As Long, ByVal FreeType As Long) As Long
  5. Private Declare Function lstrlen Lib "kernel32" (ByVal straddress As Long) As Long
  6. Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, ByVal Source As Long, ByVal Length As Long)
  7. Private Declare Function inet_ntoa Lib "ws2_32.dll" (ByVal pIP As Long) As Long
  8. Private Declare Function inet_addr Lib "ws2_32.dll" (ByVal sAddr As String) As Long
  9.  
  10. Private Const DnsFreeRecordList         As Long = 1
  11. Private Const DNS_TYPE_A                As Long = &H1
  12. Private Const DNS_QUERY_BYPASS_CACHE    As Long = &H8
  13.  
  14. Private Type VBDnsRecord
  15.    pNext           As Long
  16.    pName           As Long
  17.    wType           As Integer
  18.    wDataLength     As Integer
  19.    flags           As Long
  20.    dwTel           As Long
  21.    dwReserved      As Long
  22.    prt             As Long
  23.    others(35)      As Byte
  24. End Type
  25.  
  26. Private Sub Command1_Click()
  27.    MsgBox Resolve("google.com", "208.67.222.222")
  28. End Sub
  29.  
  30. Private Function Resolve(sAddr As String, Optional sDnsServers As String) As String
  31.    Dim pRecord     As Long
  32.    Dim pNext       As Long
  33.    Dim uRecord     As VBDnsRecord
  34.    Dim lPtr        As Long
  35.    Dim vSplit      As Variant
  36.    Dim laServers() As Long
  37.    Dim pServers    As Long
  38.    Dim sName       As String
  39.  
  40.    If LenB(sDnsServers) <> 0 Then
  41.        vSplit = Split(sDnsServers)
  42.        ReDim laServers(0 To UBound(vSplit) + 1)
  43.        laServers(0) = UBound(laServers)
  44.        For lPtr = 0 To UBound(vSplit)
  45.            laServers(lPtr + 1) = inet_addr(vSplit(lPtr))
  46.        Next
  47.        pServers = VarPtr(laServers(0))
  48.    End If
  49.    If DnsQuery(sAddr, DNS_TYPE_A, DNS_QUERY_BYPASS_CACHE, pServers, pRecord, 0) = 0 Then
  50.        pNext = pRecord
  51.        Do While pNext <> 0
  52.            Call CopyMemory(uRecord, pNext, Len(uRecord))
  53.            If uRecord.wType = DNS_TYPE_A Then
  54.                lPtr = inet_ntoa(uRecord.prt)
  55.                sName = String(lstrlen(lPtr), 0)
  56.                Call CopyMemory(ByVal sName, lPtr, Len(sName))
  57.                If LenB(Resolve) <> 0 Then
  58.                    Resolve = Resolve & " "
  59.                End If
  60.                Resolve = Resolve & sName
  61.            End If
  62.            pNext = uRecord.pNext
  63.        Loop
  64.        Call DnsRecordListFree(pRecord, DnsFreeRecordList)
  65.    End If
  66. End Function


saludos y gracias de antemano ;)
33  Programación / Programación Visual Basic / No encuentro por ningún lado como hacer un builder en: 9 Julio 2011, 17:23 pm
Hola a todos, les comento que no encuentro por ningún lado como hacer un builder.

Yo entiendo que builder sería crear una aplicación en vb6 que te muestra unas opciones que tu antes le has asignado y una vez completadas estas opciones le das click a build y te genera otro .exe con las características anteriormente mencionadas.


saludos y espero que me puedan ayudar ;)
34  Foros Generales / Sugerencias y dudas sobre el Foro / [Sugerencia] Cuando sufrimos (elhacker.net) ataques DDoS en: 9 Julio 2011, 14:31 pm
Hola a todos, en este post querría recalcar que hoy en día como muchos sabemos que webs como elhacker.net o esta misma, sufren ataques DDoS por algún lammer que quiere dar a conocer sus """"conocimientos"""" de poder.

Mi Sugerencia sería, que cuando se detectara un ataque DDoS, @el-brujo contratase servicios de publicidad según las visitas como www.impresionesweb.com y colocarlas por toda la web, ya que los ataques producirian ingresos (€) y estos podrían ser implementados para el mantenimiento de la misma.

Esta es mi forma de verlo, así que si pueden den sus opiniones al respecto ;)


saludos :P

EDITO_______________________________________________________________

Tendría que dejar una cosa clara, y es de que ahora me acabo de dar cuenta que hacer eso es delito, es una estafa y puede caer una pena de 2 a 4 años de cárcel según los ingresos  :-\

http://www.delitosinformaticos.com/estafas/delito.shtml


aqui esta, googlea un poco y encontrarás más


saludos y @el-brujo, en vez de hacer lo de la publicidad podrías reclamar al acusado del delito 2000 euros por los gastos del servidor :P
35  Foros Generales / Noticias / El 80% de los smartphones no está protegido contra amenazas informáticas en: 9 Julio 2011, 00:30 am
Según los datos arrojados por la encuesta realizada por ESET Latinoamérica, 9 de cada 10 usuarios consideran que es importante contar con una solución de seguridad en su teléfono móvil. Sin embargo, la mayoría de ellos no dispone de la misma.


El 80% de los usuarios de smartphones no cuenta con soluciones de seguridad en su teléfono móvil a pesar de considerarlas necesarias para una adecuada protección de sus datos y su equipo, según informa ESET, compañía líder en detección proactiva de amenazas.

“En la actual era de la conectividad, los smartphones poseen funcionalidades similares a las de cualquier equipo de escritorio o laptop y almacenan tanta o más información que éstos. Cuentan, además, con algunas particularidades específicas de gran sensibilidad para su protección: son más susceptibles de ser robados o extraviados y, además, son frecuentemente conectados a redes inalámbricas cuya seguridad se desconoce”, aseguró Federico Pacheco, Gerente de Educación e Investigación de ESET Latinoamérica.

Según la última encuesta realizada por el equipo de análisis e investigación de ESET Latinoamérica, los usuarios de la región señalan el robo de información como la principal preocupación en materia de ataques a sus dispositivos móviles, con el 36.8% del total de las respuestas.

Esto se debe, entre otras razones, a que un dispositivo móvil permite almacenar una gran cantidad de información y tener la posibilidad de estar siempre conectado, acceder al correo electrónico, las redes sociales o navegar a través de la web. Con la alta concentración de datos en el mismo, un atacante que logra infectar el dispositivo y acceder a él, puede entrometerse en la vida privada del usuario y acceder a sus datos personales así como a información relativa a su trabajo - siendo de este modo también un riesgo para la fuga de información sensible de la empresa.

En segundo lugar, con el 27.6 %, los usuarios destacan entre sus preocupaciones tanto el ataque de códigos maliciosos como el robo físico del dispositivo. Finalmente, la recepción de spam vía mensajes de texto se ubica en el último lugar, con el 8% de las respuestas.

En línea con esto, al ser consultados sobre la importancia de contar con una solución de seguridad en sus smartphones, el 94.3% de los encuestados respondió considerar necesaria la protección de sus equipos con el fin de resguardar su información. Sin embargo más del 80% no cuenta con ningún tipo de software de seguridad en sus dispositivos móviles.

Para acceder a los resultados de la encuesta puede visitar el Blog de Laboratorio de este Latinoamérica: http://blogs.eset-la.com/laboratorio/2011/06/14/smartphones-protegidos-amenazas/

“La utilización de teléfonos inteligentes se encuentra en aumento. Según una investigación desarrollada por la empresa Gartner, durante el año pasado se compraron 297 millones de smartphones en todo el mundo, un incremento del 72% con respecto al 2009. Por ello, es fundamental comenzar a tomar conciencia sobre la importancia de su protección, complementando la utilización de una solución de seguridad con la información y educación del usuario”, aseguró Sebastián Bortnik, Coordinador de Awareness & Research de ESET Latinoamérica.

Entre las buenas prácticas que se pueden recomendar a los usuarios para el uso de la telefonía móvil se encuentran: la implementación de una solución antivirus con capacidades proactivas, como la ofrecida por ESET Mobile Security; la desactivación de tecnologías de comunicación inalámbrica -como bluetooth y wi-fi- cuando no se encuentran bajo utilización; y la toma de precauciones en cuanto a la información que se almacena en el dispositivo móvil, ya que es frecuente que los usuarios descarguen sus correos o accedan a diferentes servicios ofrecidos en Internet que requieren el acceso de datos personales y sensibles.

fuente: http://noticiasdeinformatica.info/noticias/24-seguridad-informca/1010-el-80-de-los-smartphones-no-esta-protegido-contra-amenazas-informaticas-
36  Foros Generales / Foro Libre / Glaciares en movimiento vistos desde el espacio en: 9 Julio 2011, 00:22 am
Los glaciares se mueven a gran velocidad en Groenladia, hasta 35 metros por día, una velocidad que ha sido detectada desde el espacio gracias al satélite de observación de la Tierra ERS-2, de la Agencia Espacial Europea (ESA). El ERS-2, que ha sido jubilado esta misma semana, el día 6 de julio, vigiló en sus últimos días el glaciar de Kangerdlugssuaq. En concreto, realizó una órbita terrestre por esa zona cada tres días, en lugar de cada 35 como hasta ahora.

Gracias a las imágenes que ha captado del glaciar no sólo se ha observado su velocidad, sino que entre el 19 y el 22 de mayo detectó que un pedazo de nueve kilómetros cuadrados se rompió en pedazos, dando origen a varios icebergs.

La ESA, en una nota de prensa, señala que la recogida de estos datos es importante para estudiar los derrumbamientos rápidos, los movimientos tectónicos o el hielo marino.

Al comparar las imágenes actuales con las que se tomaron del Kangerdlugssuaq en 1992, se observa que la corriente de hielo ha disminuido unos cinco kilómetros en los últimos 19 años en su parte inferior. También es evidente ese retraimiento en la parte superior del glaciar. "Los datos indican que hay una aceleración y retraimiento de los glaciares tanto en la Antártida como en Groenlandia y esto es, sin duda, una prueba clara el cambio climático que se puede captar desde los satélites espaciales", ha señalado el profesor Andrew Shepherd, de la Universidad de Leeds en el Reino Unido.

El satélite de teledetección europeo ERS-2 fue lanzado en abril de 1995 y ha pasado más de 16 años en espacio, 13 más de los tres años para los que fue diseñado. Gracias a su instrumental, a lo largo de este tiempo proporcionó medidas de la capa de ozono, de los niveles del mar o de las temperaturas en la superficie terrestre. Con su jubilación, no hay ningún otro satélite ni en órbita ni previsto que pueda localizar corrientes de hielo en nuestro planeta.

fuente: http://www.elmundo.es/elmundo/2011/07/08/ciencia/1310137748.html
37  Foros Generales / Foro Libre / Transbordador Atlantis despega en último vuelo en: 9 Julio 2011, 00:16 am
CABO CAÑAVERAL, EEUU (Reuters) - El transbordador espacial Atlantis fue lanzado desde su plataforma de despegue el viernes, elevándose sobre una columna de llamas y humo a medida que se alejaba de la Tierra en el último vuelo del programa de transbordadores de Estados Unidos.

Luego de una historia de 30 años que costó casi 200.000 millones de dólares y causó la muerte de 14 astronautas, los transbordadores serán retirados para dar paso a una nueva generación de naves espaciales.

Según el presidente Barack Obama, la nueva etapa espacial pondrá a astronautas estadounidenses primero en un asteroide y luego en Marte.

"El lanzamiento de hoy podrá marcar el vuelo final de un transbordador espacial pero da inicio a una nueva era de aventuras infinitas para superar las fronteras de la exploración y el descubrimiento en el espacio", afirmó Obama en un comunicado emitido desde la Casa Blanca.


Cerca de 1 millón de turistas fueron testigos del suave despegue desde el Centro Espacial Kennedy. Se alinearon en pasos altos y playas alrededor de las instalaciones de Florida, buscando ver por última vez la nave pionera que ha definido el programa de transbordadores estadounidense durante los últimos 30 años.

"Buena suerte a ti y a la tripulación en este vuelo final de un auténtico ícono estadounidense", transmitió por radio Mike Leinbach, el director de lanzamientos, a la tripulación minutos antes del despegue.

"Disfruten ahí arriba", añadió.

Unas amenazadoras nubes pudieron haber retrasado la misión de 12 días a la Estación Espacial Internacional, pero el cielo se despejó a tiempo para el despegue.

fuente: http://lta.reuters.com/article/worldNews/idLTASIE76717520110708
38  Comunicaciones / Mensajería / XBomb MSN v1.4 - Bloquea o Kickea a tus contactos de MSN (TODAS LAS VERSIONES) en: 8 Julio 2011, 19:56 pm
XBomb MSN v1.4 - by VanX

Hola, estaba el otro día con un amigo viendo por los foros y vi que faltaba algun programa de MSN, ya que el Kick de @MadAntrax no funciona con las nuevas versiones y me puse a codear una versión parecida al Chau pero nueva y una nueva del Kick juntandolas las dos y para que funcionaran en los messengers actuales, en todos, incluyendo el 2008 para arriba.  ;D


MEJORAS:
1) El Chau tenía algún defecto que no siempre conectaba ya que solo usaba 1 solo puerto y winsock. Ahora intenta conectar de 5 maneras distintas por si alguna falla.
2) El Kick MSN no funciona con las nuevas versiones(2008 para arriba) así que he tenido que añadir para que funcione en todas.
3) Fácil de usar y entendible
4) Incluye 3 IDIOMAS: Español, Inglés, Italiano.
5) La interfaz gráfica está mejorada, aunque eso depende de los gustos de cada uno.


Para futuras versiones:
- Implementar hasta 10 idiomas
- Poder escoger el tiempo que se quiera mantener la cuenta OFFline (bloqueada)
- Multiconexiones, poder bloquear más de 1 mail




LOG
www.virustotal.com

File name: XBomb MSN v1.4.exe
Submission date: 2011-07-08 17:35:49 (UTC)
Current status: finished
Result: 1/ 43 (2.3%)

Antivirus   Version   Last Update   Result
AhnLab-V3   2011.07.08.01   2011.07.08   -
AntiVir   7.11.11.45   2011.07.08   -
Antiy-AVL   2.0.3.7   2011.07.08   -
Avast   4.8.1351.0   2011.07.08   -
Avast5   5.0.677.0   2011.07.08   -
AVG   10.0.0.1190   2011.07.08   -
BitDefender   7.2   2011.07.08   -
CAT-QuickHeal   11.00   2011.07.08   -
ClamAV   0.97.0.0   2011.07.08   -
Commtouch   5.3.2.6   2011.07.08   -
Comodo   9320   2011.07.08   -
DrWeb   5.0.2.03300   2011.07.08   -
Emsisoft   5.1.0.8   2011.07.08   -
eSafe   7.0.17.0   2011.07.07   -
eTrust-Vet   36.1.8433   2011.07.08   -
F-Prot   4.6.2.117   2011.07.08   -
F-Secure   9.0.16440.0   2011.07.08   -
Fortinet   4.2.257.0   2011.07.08   -
GData   22   2011.07.08   -
Ikarus   T3.1.1.104.0   2011.07.08   -
Jiangmin   13.0.900   2011.07.08   -
K7AntiVirus   9.107.4887   2011.07.08   -
Kaspersky   9.0.0.837   2011.07.08   -
McAfee   5.400.0.1158   2011.07.08   -
McAfee-GW-Edition   2010.1D   2011.07.08   -
Microsoft   1.7000   2011.07.08   TrojanSpy:Win32/Vwealer.IW
NOD32   6278   2011.07.08   -
Norman   6.07.10   2011.07.08   -
nProtect   2011-07-08.01   2011.07.08   -
Panda   10.0.3.5   2011.07.08   -
PCTools   8.0.0.5   2011.07.08   -
Prevx   3.0   2011.07.08   -
Rising   23.65.04.03   2011.07.08   -
Sophos   4.67.0   2011.07.08   -
SUPERAntiSpyware   4.40.0.1006   2011.07.08   -
Symantec   20111.1.0.186   2011.07.08   -
TheHacker   6.7.0.1.250   2011.07.08   -
TrendMicro   9.200.0.1012   2011.07.08   -
TrendMicro-HouseCall   9.200.0.1012   2011.07.08   -
VBA32   3.12.16.4   2011.07.08   -
VIPRE   9805   2011.07.08   -
ViRobot   2011.7.8.4558   2011.07.08   -
VirusBuster   14.0.114.0   2011.07.07   -


DESCARGA:
- editado -


Espero que lo disfruten y cualquier duda o sugerencia ya saben ;)

saludos  :P
39  Foros Generales / Foro Libre / Me presento en: 8 Julio 2011, 19:01 pm
Hola, soy nuevo pero ya leo este foro desde hace mucho, soy "programador" de vb6 y intentaré aprender y ayudar con todo lo que pueda ;)
40  Programación / Scripting / [Solucionado]Registrar DLL OCX en: 8 Julio 2011, 18:39 pm
HOla, quiero hacer un batch para registrar una OCX o DLL y tengo este code:

Código
  1. @echo off
  2. cls
  3. echo **** REGISTRAR OCX O DLL ****
  4. set /p Ruta=Introduce la ruta de la OCX o DLL (Ejemplo: c:\Msflxgrd.ocx):
  5. REGSVR32 %Ruta%

y quiero que en vez de escribir tu la ruta, que el .bat registre automaticamente la DLL o OCX ya que estará en la misma carpeta y el nombre no será modificado. No se si me he explicado...

gracias :-\



____________________________________________________________________

LO SIENTO, me equivoque de lugar! (porfavor muevanlo)
Páginas: 1 2 3 [4] 5
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines