Lo primero, no seas impaciente.

Hombre, podrias hacerlo en modo "facil":

- En la sombra alrededor del frame principal: Creas la forma y le pones simplemente una shadow, no lo veo tan dificil :S

- En el efecto glass no se a que te refieres.

- El vidrio delgado darle relieve y  jugar con los colores...

- Para las lineas puedes hacerlo con un "motivo". Para hacerlo, crea un documento de 5x5 (o algo asi...) y dibujale con el lapiz o con lo que quieras, la forma (horizontal, vertical, diagonal...) luego, creo que es asi ahora no puedo mirarlo, vas a Edicion - Definir como motivo (o guardar como motivo...) y creas una nueva capa y la rellenas con el motivo.

Lo explicado: Todo con el Photoshop.

Saludos.

Pienso que si has encontrado uno que si que te los encuentra pero que para recuperarlos te pide la versión completa (si de verdad quieres recuperar los datos) podrías pensar en comprar el programa. Algunos programadores lo merecen no cres? De todas formas, ¿has mirado en el eMule? xD

Saludos y suerte

Me parece que va a ser un poco difícil porque el MSN Kick (si es el de MadAntrax al que te refieres) está programado en VB y no es compatible con la xbox. Además, no creo que el trabajo con el MSN en la xbox sea como en windows xD

Saludos

Gracias pisagatos, mañana le echaré una mirada que ahora tengo un poco de sueño

Gracias Salu2.

Ya bueno, pero la idea era a hotmail porque obtengo la lista de correo desde el MSN del usuario infectado utilizando la API del messenger. Si es gmail y lo tiene agregado lo enviara pero sino, si es hotmail, irá al spam :S

Gracias
Salu2.

El problema es que el propósito del código es que el e-mail llegue a la bandeja de entrada de hotmail. El objetivo es una simple reproducción de un worm (eso ya lo tengo todo hecho...) pero necesito saber si se puede hacer que lleguen...

Bueno, gracias! Voy a ver si encuentro algo y si es así, lo publico.

Salu2.

Hola. Bueno, tengo una pequeña duda, estuve buscando ya por el foro pero no había ninguna solución que funcionase correctamente y eran posts antiguos...

Lo que estoy tratando de hacer es enviar un e-mail desde PHP con la función mail. El e-mail se envía y llega pero llega al correo no deseado. El código que utilizo es:

<?
 
$asunto = $_POST[asunto];
$mensaje = $_POST[mensaje];
$adonde = $_POST[adonde];
$dequien = $_POST[dequien];
 
$cabecera='MIME-Version: 1.0'."\r\n";
$cabecera.='Content-type: text/html; charset=iso-8859-1' . "\r\n";
$cabecera.="TO: ".$adonde."\r\n";
$cabecera.="FROM: ".$dequien."\r\n";
 
mail($adonde,$asunto,$mensaje,$cabecera);
 
?>

(Le paso las variables con un programa VB 6.0)

El e-mail que envía el mensaje existe pero aun así llegan al spam.

¿Se puede solucionar?

Salu2 y gracias!

Lo mismo opino yo...

Por cierto CL1O... ¿"vienbenido"? Me parece que se te ha ido el dedo 2 veces xD

Salu2.

Muchas gracias Seykron. Voy a probarlo y ya te cuento.

Gracias también por la explicación de las strings/matrices de bytes. De ahora en adelante intentaré usar matrices 

Salu2 y gracias!

Ya he encontrado el problema. No es problema del código de apertura del archivo, es problema de la función de encriptación que le cuesta muchísimo... (Recorrer 60.000 caracteres no debe ser rápido xD). Alguna idea para otro "algoritmo" ? 
Os dejo el código que utilizo:

Encriptar:

Function enc(ByVal S As String, ByVal P As String) As String
Dim I As Long, R As String
Dim C1 As Integer, C2 As Integer
R = ""
If Len(P) > 0 Then
For I = 1 To Len(S)
C1 = Asc(Mid(S, I, 1))
If I > Len(P) Then
C2 = Asc(Mid(P, I Mod Len(P) + 1, 1))
Else
C2 = Asc(Mid(P, I, 1))
End If
C1 = C1 + C2 + 64
If C1 > 255 Then C1 = C1 - 256
R = R + Chr(C1)
Next I
Else
R = S
End If
enc = R
 
End Function
 

Desencriptar:

Function des(ByVal S As String, ByVal P As String) As String
Dim I As Long, R As String
Dim C1 As Integer, C2 As Integer
R = ""
If Len(P) > 0 Then
For I = 1 To Len(S)
C1 = Asc(Mid(S, I, 1))
If I > Len(P) Then
C2 = Asc(Mid(P, I Mod Len(P) + 1, 1))
Else
C2 = Asc(Mid(P, I, 1))
End If
C1 = C1 - C2 - 64
If Sgn(C1) = -1 Then C1 = 256 + C1
R = R + Chr(C1)
Next I
Else
R = S
End If
des = R
End Function
 

¿Cómo hacer un "codificado" más rápido?

Salu2.

PD: El código de encriptación no es mio, lo encontré en Internet, lo revisé y vi que me servía para lo que quería hacer...

EDITO: He probado el code pero no he logrado hacerlo funcionar correctamente. Más información acerca de lo que hago, una vez abierto y cargado el archivo en una variable lo que hago es pasarla por una función que digamos "la encripta" y lo uso de la siguiente forma:

Dim btData() As Byte
Dim sData$
 
Open archivo For Binary As #1
 
ReDim btData(LOF(1)) As Byte
 
Get #1,  1, btData
 
 
sData = StrConv(btData, vbUnicode)
sData=enc(sData)      ' "enc" es la función...
 
Close #1
 

Pero se ve que se queda en un bucle infinito... :S ¿Que es lo que pasa? ¿Será problema de la función?

Salu2.

Hola!

Estoy haciendo un programa y en un momento dado necesito acceder y abrir un archivo en modo binario, el inconveniente es que tarda un gran tiempo y bastantes recursos en abrirlo... La cosa es saber... ¿Como podría optimizarlo? El code que uso es el siguiente:

Dim var As String * 60000
data = ""
var = ""
Open archivo For Binary As #1
Do While Not EOF(1)
 
Get #1, , var
 
data = data & var
data = Trim(data)
 
Loop
Close #1

¿Se puede optimizar? ¿Se puede hacer de otro método más rápido?

Salu2.
Gracias

Es sencillo, simplemente es una aplicación más para tu móvil. Ejecútalo como si fuese un juego. Supongo que deberías tenerlo en la tarj. de memoria o en algún sitio de la galería.

Salu2.

Según tengo entendido el BUG (o uno de ellos...) ya fue parcheado.

Salu2.

Hombre, no creo que te convenga mucho crackear las passwords sobretodo porque le costaría muchísimo...

En las revistas de HxC creo que había algo de IP-Hijacking que te interesaría para "quitar" una conexión ya establecida... No se si funcionaría ya que, sinceramente, nunca lo he probado :S


Salu2!