Mensajes

Primero que nada, tu code tiene mal la ruta del archivo,

Código [Seleccionar] Expandir

Private Sub Form_Load()
Dim Code As String
Open App.Path & "\" & App.EXEName & ".exe" For Binary As #1
    Code = Input(LOF(1), 1)
Close #1
End Sub
cn este code, tendria q andar, y poder leer el archivo,
y para poder hacer tu code,
dale una ojeada al cactus joiner que de seguro te va a ayudar.

salu2 y suerte

te doy 2 posible soluciones,
cuando lo ejecutes primero procurra haber creado el exe y luego ejecutarlo,
si esto no funciona
cambia el space y pone,

Código [Seleccionar] Expandir

Input(LOF(1), 1)
habiendo creado el exe antes de ejecutarlo.

salu2 y suerte

tienes muchas cosas mal,
tendrias q tener mas cuidado,
al empezar a codear,
presta ams atencion.

salu2

ademas, nunk vas a recivier nada,
ya que en el servidor,
el DataArrival esta mal,
ya que pones solo winsock y no winsock1,
como realmente se llama en tu proycto

salu2

no sabia q con tan pocas lineas,
se podia lograr una fomra X para el fomr,

mcuhas gracias

salu2

etsa bueno,
la verda nunk se me hubiese ocurrido hacer algo de esto xD
ni por mas aburrido que este  jaja

salu2 y gracias

se nota quetenes bastante para aportar,

a mi me gustan las cosas que se pueden generar cn estos Beep,
estan muy buenas
y pueden llegar a ser desesperantes en algiunos casos

gracias

salu2

para el icon changer si no me equivoco,
necesitas tener el archivo .ico

para eso utiliza esto:
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=22893&lngWId=1

salu2

lo que hace es associar las extensiones
por lo que se tomaria a un .cabo como un .bat o como un .cab, etc

esto definitivamente,
no lo tomaria como virus, pero ni de casualidad.

puede que joda,
pero de ahi a virus, dudo mucho.


salu2

yo me prenderia,
pero Sinceramente estoy totalemente desorientado,
para ahcer una lib de DirectX,

pero si se peude aprender,
cn gusto coperare,

pero si es como la mayoria de las propuestas del foro,
terminaras haciendola tu solo 

salu2