Incominciamo:
apriamo visual basic 6 e creiamo un TextBox abbastanza grande da contenere i messaggi e chiamiamolo "txtMessaggi" ( senza "" ) e impostiamo la proprietà "multiline" su True
Adesso creiamo un altro TextBox e lo chiameremo "txtdainviare" e anke qst con multiline True .
Successivamente creiamo un controllo Winsock impostiamo il protocollo a TCP e chiameremo questo controllo Winsock "TCP" e impostiamo local port su "0"
Creiamo altri 2 TextBox nei quali inseriremo HOST e PORTA .
Ora è arrivato il momento di inserire i Command Button
Allora creiamone uno con la proprietà "caption" -> Connetti -> prop. Name -> cmdConnetti
Un altro con la caption -> Disconnetti -> prop. Name -> cmdDisconnetti
un altro -> Invia -> prop. Name -> cmdInvia
e l'ultimo -> Ascolta -> prop. Name -> cmdAscolta
( prop. vuol dire proprietà )
Adesso vedremo i codici da inserire per ogni controllo :
Prima del controllo Winsock dichiariamo una variabile di tipo nick :
Adesso possiamo vedere il controllo Winsock :
Nella dichiarazione -> TCP_ConnectionRequest inseriamo
Codice:
Nella dichiarazione -> TCP_DataArrival
Codice:
Adesso vediamo il Command Button "invia" -> doppio click e inseriamo
Ora il Command Button "ascolta -> doppio click e inseriamo
Codice:
Ci mancano solo 2 Command Button :
Connetti
Codice:
e Disconnetti
Codice:
Me.Caption = "Connessione chiusa"
TCP.Close
Spero di esservi stato d'aiuto...
Fonte: Un Altro Forum
apriamo visual basic 6 e creiamo un TextBox abbastanza grande da contenere i messaggi e chiamiamolo "txtMessaggi" ( senza "" ) e impostiamo la proprietà "multiline" su True
Adesso creiamo un altro TextBox e lo chiameremo "txtdainviare" e anke qst con multiline True .
Successivamente creiamo un controllo Winsock impostiamo il protocollo a TCP e chiameremo questo controllo Winsock "TCP" e impostiamo local port su "0"
Creiamo altri 2 TextBox nei quali inseriremo HOST e PORTA .
Ora è arrivato il momento di inserire i Command Button
Allora creiamone uno con la proprietà "caption" -> Connetti -> prop. Name -> cmdConnetti
Un altro con la caption -> Disconnetti -> prop. Name -> cmdDisconnetti
un altro -> Invia -> prop. Name -> cmdInvia
e l'ultimo -> Ascolta -> prop. Name -> cmdAscolta
( prop. vuol dire proprietà )
Adesso vedremo i codici da inserire per ogni controllo :
Prima del controllo Winsock dichiariamo una variabile di tipo nick :
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
Nella dichiarazione -> TCP_ConnectionRequest inseriamo
Codice:
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
Nella dichiarazione -> TCP_DataArrival
Codice:
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
Adesso vediamo il Command Button "invia" -> doppio click e inseriamo
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
Ora il Command Button "ascolta -> doppio click e inseriamo
Codice:
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
Ci mancano solo 2 Command Button :
Connetti
Codice:
PHP:
Perfavore,
Entra
oppure
Registrati
per vedere i codici!
e Disconnetti
Codice:
Me.Caption = "Connessione chiusa"
TCP.Close
Spero di esservi stato d'aiuto...
Fonte: Un Altro Forum