Visualizzazione dei risultati da 1 a 2 su 2
  1. #1

    Trasferimento file usando Winsock.ocx ?

    Come posso fare che premendo sul "bottone Command1" si apre la finestra per sciegliere il file das disco fisso e poi inviarlo ad un specifico IP usano componente winsock ?
    ho fatto due parti una Client che si connete e l altra Server che fa
    Listen su un port


    rivate Sub Command1_Click()
    If Command1.Caption = "Connect" Then
    Winsock1.RemoteHost = Text3.Text
    Winsock1.RemotePort = 1112
    Winsock1.Connect
    Command1.Caption = "Disconnect"
    Else
    Winsock1.close
    Command1.Caption = "Connect"
    End If

    E per accetare la conessione ho fatto cosi

    Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
    If Winsock1.State <> sckClosed Then Winsock1.Close
    Winsock1.Accept requestID
    End Sub

    Spero che qualcuno melo puo spiegare

    [-Blade-]

  2. #2

    ?

    Che ce non Risponde nessuno ? sniff
    [-Blade-]

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2020 vBulletin Solutions, Inc. All rights reserved.