I più cliccati

Trucchi Farmville

Farmville Toolbar [GRATIS]

Vinci Farm Cash $FV[GRATIS]

Farmville Extreme Manager [5€]

Scrivere sottosopra [GRATIS]

Speed Downloading [GRATIS]

Avatarize Facebook [GRATIS]

Personalizza Facebook [GRATIS]

CONSOLIDAMENTO PARETI ROCCIOSE

Trucchi Giochi Facebook

coming soon

Aggiungimi su Facebook

martedì 23 dicembre 2008

Creare applicazione Client/Server [Operazione Parte 3]]


Con la terza parte concludiamo il client...


Doppio click sul bottone disconnetti ed inserire il seguente codice:

Private Sub cmddisconnect_Click()
lblstatus.Caption = "Non Connesso" 'Mostra questa scritta nel campo label
cmddisconnect.Enabled = False 'Disabilita il bottone disconnetti
cmdconnect.Enabled = True ' Abilita il bottone connetti
tcpclient.Close ' chiude la connessione
End Sub


Aggiungere anche questo codice:

Private Sub tcpclient_Connect()
lblstatus.Caption = "Connesso"
End Sub


Doppio click sul bottone Apri Cd-Rom e:

Private Sub cmdopen_Click()
tcpclient.SendData "open
End Sub


Doppio click sul bottone Chiudi Cd-Rom:

Private Sub cmdclose_Click()
tcpclient.SendData "close
End Sub


Il Client è terminato...

Alla prossima con il lato Server...

Buon Natale da Juni0r!!!

0 commenti:

Posta un commento

 

juni0r. Copyright 2008 All Rights Reserved Revolution Two Church theme by Brian Gardner Converted into Blogger Template by Bloganol dot com