trasferire file

[*D-Planet*]

tra due computer è possibile cn vb?...ho cominciato a leggere un pò del controllo Inet ma nn ho bene capito se si possono trasferire file da un computer all'altro...se si mi direste come posso fare?
grazie mille

[I'mtheleader]

Ti posso dire che per trasferire dati tra due computer puoi usare il winsock anche se nn so bene cm funzioni xchè nn lo sò ancora usare...

Vabbe ciao ciao

[goku370]

Tra due PC in rete o via internet ?

Puoi usare winsock. ( consigliato per il trasferimento via internet, ma funziona anche con pc in rete.)

Vedi: http://www.vbsimple.net/index.htm?/cliserv/clser_04.htm

Ti avverto che non è propriamente una passeggiata.

[asva]

trovato su vbitalia.it utilizzando FTP

'prima di tutto inserire il controllo
'MSINET nel form. Per controllare se si dispone
'di tale controllo verificare la presenza del file
'MSINET.ocx nella directory System32 di Windows
Dim Inet1 As New InetCtlsObjects.Inet

'inserire un command, un textbox txtURL,
'un textbox txtURL un textbox txtServer e un textbox
'txtDestinazione dove indicare dove mettere il file scaricato nell'
'hard disk
Private Sub Command1_Click()
URLfile = txtURL.Text
strServer = txtServer.Text
strDestinazione = txtDestinazione.Text
Inet1.Execute URLfile, "GET " & strServer & " " & strDestinazione
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)



'controlla lo stato del trasferimento
Select Case State
Case icError
'i casi possono essere tanti:
'1) il file esiste già nell'HD
If Inet1.ResponseCode = 80 Then
MsgBox "Il file esiste già"
Else
'altrimenti c'è un errore generico
MsgBox Inet1.ResponseInfo, , "Errore nel trasferimento"
End If
'caso successo del trasferimento
Case icResponseCompleted
MsgBox "Trasferimento completato a " & strDestinazione, , _ strDestinazione
End Select
End Sub

[lucianod6]

io MSINET.ocx non ce l'ho come posso fare?