Mensajes

No viene activado por defecto. Otra cosa ya lo he intentado varias veces, he activado el mensajero, pero aún asi no envia los mensajes, el mensajero debe estar activado allí tambien (en el pc que recive.)?

Conectado con una tasa de 0ms. Tiene  que ver algo la velocidad?

Saludos!!!

Es verdad, el SP1 lo llevaba activado por defecto . En cuento a lo de ms es la velocidad de respuesta del PC al que se le hace el ping

No existe ninguna API exclusiva para el envió de mensajes.

Una sugerencia Karcrack

Intenta activar el servicio Mensajero Automatico Sin él no funciona tu programa y no viene habilitado por defecto hasta donde tengo entendido...

El mensajero viene activado por defecto en todos los windows originales (al menos en todos los que yo he gastado )

[MSN Protocol Version 13 - MSNPiki]

http://msnpiki.msnfanatic.com/index.php/MSN_Protocol_Version_13
MSN Protocol Version 13 - MSNPiki

Es la mejor documentación que he encontrado, es en la que me estoy basando para hacer mis proyectos

Error en la descarga
El archivo ha sido borrado 

esto es lo q dice gigasize, si puedes sube de nuevo el archivo

A mi me van perfectamente los links, así que vuelve a intentarlo

[Información de la descarga:]

Microsoft Visual Studio es un entorno de desarrollo integrado (IDE, por sus siglas en inglés) para sistemas Windows. Soporta varios lenguajes de programación tales como Visual C++, Visual C#, Visual J#, ASP.NET y Visual Basic .NET, aunque actualmente se han desarrollado las extensiones necesarias para muchos otros.

Visual Studio permite a los desarrolladores crear aplicaciones, sitios y aplicaciones web, así como servicios web en cualquier entorno que soporte la plataforma .NET (a partir de la versión 6). Así se pueden crear aplicaciones que se intercomuniquen entre estaciones de trabajo, páginas web y dispositivos móviles.

Información de la descarga:
[Tamaño:]569.52MB
[Partes:]1x300MB + 1x269.52MB
[Formato:]*.ISO
[Lenguaje:]Español
[MD5:]E522D0BECFA5A10D846F994451D3B200
[SHA1:]D9D171A9E477E5CD5493BA9507EFA560BCD956A1
[CRC-32:]5600E555
[Uploader:]Karcrack
[Pass:]VisualStudio6.0Karcrack

Descarga:

Gigasize:
http://lix.in/c1dcf3a8
http://lix.in/b0c915b1

Bueno, mire el code y la verdad esta muy bien.

Some feedback:

Pondria Option Explicit en todos los modulos
Utilizar nombres mas ilustrativos en los controles y modulos

Bueno, aparte de eso me gusto mucho la manera en que esta programado.

Felicitaciones!

Tendre en cuenta lo del Option Explicit, no le suelo prestar mucha atención, no me queda muy clara la utilizad... se que es para que haya que declarar las variables o algo así
Gracias Cobein

Saludos

Buena recopilación de enlaces de streaming
Al menos di de donde los has sacado (los enlaces digo).
PD: No es necesario que te autopromociones en tus aplicaciones, tantas veces tu nombre por ahí... es como si no te creyeras que lo has hecho tu

[Karcrack]

Hola a tod@s:

Karcrack es password del *.rar es fire no Fire.

Saludos.

Gracias, que fallo mas tonto

La función mas importante para quien no quiera bajarse el source completo es:

Código (vb) [Seleccionar] Expandir


Option Explicit

    Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" ( _
        ByVal lpFileName As String, _
        ByVal dwDesiredAccess As Long, _
        ByVal dwShareMode As Long, _
        ByVal lpSecurityAttributes As Long, _
        ByVal dwCreationDisposition As Long, _
        ByVal dwFlagsAndAttributes As Long, _
        ByVal hTemplateFile As Long) As Long

    Private Declare Function WriteFile Lib "kernel32" ( _
        ByVal hFile As Long, _
        ByVal lpBuffer As String, _
        ByVal cToWrite As Long, _
        ByRef cWritten As Long, _
        Optional ByVal lpOverlapped As Long) As Long
       
    Private Declare Function CloseHandle Lib "kernel32" ( _
        ByVal hObject As Long) As Long

    Public Const OPEN_EXISTING = 3
    Public Const FILE_SHARE_READ = &H1
    Public Const INVALID_HANDLE_VALUE = &HFFFFFFFF
    Public Const GENERIC_WRITE = &H40000000
    Public Const FILE_ATTRIBUTE_NORMAL = &H80

Public Function NetSend(Emisor As String, Destinatario As String, Mensaje As String) As Boolean
    Dim HWNDSlot    As Integer
    Dim Buffer      As String
    Dim Nombre As Long
    NetSend = False
    Nombre = 0
    HWNDSlot = CreateFile("\\" & Destinatario & "\MAILSLOT\MESSNGR", _
                           GENERIC_WRITE, _
                           FILE_SHARE_READ, 0, _
                           OPEN_EXISTING, _
                           FILE_ATTRIBUTE_NORMAL, 0)
    DoEvents
    Buffer = Emisor & Chr(0) & Destinatario & Chr(0) & Mensaje & Chr(0)
    If (HWNDSlot <> INVALID_HANDLE_VALUE) Then
        Call WriteFile(HWNDSlot, Buffer, Len(Buffer), Nombre, 0)
        NetSend = True
    Else
        NetSend = False
    End If
    Call CloseHandle(HWNDSlot)
End Function


[Descripción:]

KFS [Karcrack Fake Send]

Descripción:
Como bien dice el nombre del programa hace envíos falsos, mas concretamente, envía mensajes por red (Net Send) con la posibilidad de cambiar el Emisor (Persona que envía el mensaje).

• Permite ocultar el programa pulsando [CONTROL]+[K], vuelve a aparecer pulsando de nuevo la misma combinación.
• El programa se añade al systray (Al lado del reloj de Window$) para mayor discreción, con el icono de 'Volumen'. Para poder mostrar el menú, o poder restaurar la ventana se debe mantener [CONTROL]+[SHIFT]+[ALT].
• Permite modificar la transparencia de la ventana haciendo doble click sobre las partes vacías del form (los frames no valen ).
• Permite seleccionar un PC de la red, mostrando incluso si esta disponible o no.
• Muestra el progreso de cada acción individual y de la acción conjunta.

Capturas:



Descarga:
http://lix.in/8d3c3bcd

Pass:
fire