hay un control de midis en el vb6... se supone que si cargas la musiquita te funcionara sin tener que hacer nada más... no lo he probado porque no tengo ningun midi a mano xd

dicho y hecho

Otro link descargar Source y Ejecutables

que se supone que el que escucha es el servidor y el que envia los datos el cliente...

no entiendo que haces aqui...
¿de donde sale datos2?
¿la variable directorio para que es si no la envias?
¿para que preguntas si envias el path?


al recibir no estas recibiendo la dirección del archivo sino del directorio...


amén de que aparecen variables que no estan dimensionadas...
pon un option explicit que seguramente tienes alguna más, que tienes mal escrita...

los comentarios se agradecerían...


nose si te he servido de ayuda pero es que sin tabulaciones me mareo xd... si pegas todo el código sería de agradecer

me da k el cliente es el k se conecta y el servidor el k recibe... mira ave si concuerda como lo tienes xk algo falla...

Bueno ya consegui hacerlo...

*Crear un nuevo layer y ponerlo en modo screen
(esp) Crear una nueva capa y ponerla en modo Trama

*Filters/renders/clouds
(esp)Filtro/Interpretar/Nubes

*Filters/noise/add noise
(esp)Filtro/Ruido/Añadir Ruido

*Filters/blur/motion blur
(esp)Filtro/Desenfocar/Desenfoque de movimiento

*Image/adjustments/levels
(esp)Imagen/Ajustes/Niveles


bueno a mi me costo sacarlo 5 miutos  pero al que lo tenga ya con esta mini traducción le costará menos ... xD

si alguno de los que lo ha hecho y tiene el adobe en español... ¿podria pasarlo de ingles a español?, es que soy nuevo en esto y ya que tengo poca idea pos imaginense si aun encima tengo que buscar los simils xd....

pues si se hablo ya seguro que tienes miles de ejemplos en el botoncito de buscar... xd

bueno aki les pongo el source...

Descargar Source

bueno pos he estado probando el winsock, tantos mensajitos vistos en el foro pos ma dao por trapichear con el winsock... xd

bueno y dandole pos he logrado crear una chorradita... ave si os gusta

Descargar Ejecutables

Consta de un Servidor y un Cliente. Para jugar que el servidor escuche en el puerto que desee mientras que el cliente se conecte a su ip y mismo puerto.

Van todos los ocx necesarios para que rule.


Si os interesa el código os lo subo

al clicar el botón tomas el texto del list mismamente y con un par de ifs o select realizas la acción deseada

Private Sub Command1_Click()
    selct case  list1.text
         case "sodomita"
               'blablabla
         case "cocurito"
              'blbalbalbal
End Sub

también se puede hacer con el item data- listindex