Info TCP server

[El Berto]

Ciao a tutti, sono nuovo del forum.
Prima (e anche adesso) lavoravo con Visual Basic; mi tocca però passare a un sistema Linux.
Sto provando a fare dei piccoli programmini con protocollo TCP/IP.

Ho provato a eseguire questo piccolo programma di esempio:

' Gambas class file
STATIC Server AS ClsServer
PUBLIC Clients AS Object[]
PUBLIC Srv AS ServerSocket

PUBLIC SUB Socket_Read()

  DIM sCad AS String
  READ #LAST,sCad,Lof(LAST)
  PRINT "Received data -->" & sCad
  WRITE #LAST,"bye",3

END

PUBLIC SUB Socket_Closed()

  PRINT "Connection closed"
  Clients.Remove(Clients.Find(LAST))

END

PUBLIC SUB Srv_Connection(Host AS String)

  DIM MySock AS Socket
  PRINT "Accepting connection from --> " & Host
  MySock=Srv.Accept()
  Clients.Add(MySock)

END

PUBLIC SUB _New()

  Clients =NEW Object[]
  Srv=NEW ServerSocket AS "Srv"
  Srv.Port=3450
  Srv.Type=ServerSocket.Internet
  Srv.Listen()

END

STATIC PUBLIC SUB Main()

  Server=NEW ClsServer

END

Ma durante la compilazione mi compare l'errore:

"Unknown identifier: ClsServer"

Dov'è che ho sbagliato?
Grazie.

[Francoiky]

Prima di tutto ti conviene fare una cosa:
. vai in Gambas;
. poi Strumenti>Preferenze;
. qui vai su Editor;
. imposti "Mostra i numeri di linea" su "Si";
Impostati i numeri di linea, :
. premi F5 (per eseguire);
. nel messaggio di errore guardi la linea;
. la posti sul forum.

Forse poi qualcuno potrà aiutarti

[Ceskho]

Stai cercando di creare un oggetto Server ereditandolo da uno di tipo ClsServer. Quest'ultimo esiste? E una classe che hai creato tu? È un modulo? cos'è? Sicuro che il codice giusto non sia:

STATIC ClsServer AS Server?

Hai abilitato il componente di rete?

[doublemm]

mi tocca però passare a un sistema Linux.

 

 

[Ceskho]

mi tocca però passare a un sistema Linux.

 

 

Mi era sfuggita quella frase altrimenti lo bannavo....

[dex]

mi tocca però passare a un sistema Linux.

 

 

Mi era sfuggita quella frase altrimenti lo bannavo....

che cattivi!!!!

sicuramente il poverino è stato costretto a passare a linux dai virus e i continui blocchi di windows

[leo72]

Cari confratelli, accogliamo con gioia il caro fratello El Berto che, illuminato come San Paolo sulla via di Damasco, si aggiunge a noi adoratori del Sacro Gambero del Pinguino abbandonando i sistemi operativi pagani. Amen. 

[El Berto]

Innanzitutto, grazie per il benvenuto.
Poi, Windows (nello specifico Visual Studio) qualche qualità ce l'aveva; se non altro riuscivo a trovare gli esempi in rete.
Oggi volevo installare Firefox su Linux ma ci ho rinunciato.

Comunque, tornando al problema, io "dovrei" aver abilitato tutti i moduli necessari:

Project -> Properties -> Components
ho abilitati Gb.net e Gb.net.curl

L'errore è sempre:
"Unknown identifier: ClsServer"
Anche se dichiaro "As Server" non cambia niente.
Io l'esempio l'ho copiato come l'ho trovato.

[leo72]

1) Windows ha un pregio: quello di portare la gente a provare altri SO 

2) Per installare Firefox non devi far altro che usare il package manager della distro che usi. Quale distro usi?

3) Non ho capito bene se stai provando un esempio di Gambas oppure se hai copiato del codice trovato da qualche parte. Cmq l'errore è chiaro: ti dice che non hai creato quella classe, clsServer.

[El Berto]

Allora, io uso l'ultima di Slackware (mi sembra la 13).

Il codice l'ho copiato direttamente da una pagina web dove parlava di Server/Client in Gambas.

Ci sono esempi di Gambas da vedere/scaricare da qualche parte?

Che la classe ClsServer non è creata lo sospettavo anch'io, come faccio?

[leo72]

Gambas integra già degli esempi: quando appare Gambas con la schermata di scelta dell'applicazione da aprire seleziona dal menu grafico a SX "Esempi" ed aprine uno inerente l'interfacciamento.

Per quanto riguarda quella classe mancante, devi tornare su quel sito e procurarti i file mancanti. Mica puoi "inventartela" 

[Diakrufus]

Allora, io uso l'ultima di Slackware (mi sembra la 13).

Il codice l'ho copiato direttamente da una pagina web dove parlava di Server/Client in Gambas.

Ci sono esempi di Gambas da vedere/scaricare da qualche parte?

Che la classe ClsServer non è creata lo sospettavo anch'io, come faccio?

Ciao El Berto, un consiglio da uno che usa come distro Debian da moltissimi anni, ma ha usato quasi tutte le distro più famose in linux Gentoo, Red Hat,Slackware, Mandrake  ed altre. Cercati una distro che si avvicina di più al tuo mondo cioè più simile a windows, che ti carichi già inpartenza quasi tutto anche Firefox. Perchè non per offenderti la Slackware è un po ostica per un principiante che si avvicina a Gnu-Linux. Ti consiglio l'ultima realise di Ubuntu.

[El Berto]

Dopo un po' di tempo riesco finalmente a tornare a lavorare su Gambas.

Dando un'occhiata agli esempi di Gambas...... ma il ServerSocket gestisce già implicitamente più client contemporanei?

[El Berto]

Allora, rifacendomi all'esempio del server TCP, ho provato questo codice:

Codice: [Seleziona]

 
PUBLIC SUB Form_Open()
 Client = NEW Object[] 
 Server.Type = Net.Internet
 Server.Port = 27 ' porta
 Server.Listen(0)
 TextArea1.Text = TextArea1.Text & "Server started!" & Chr(13) & Chr(10)
END

E puntualmente ho l'errore:

  Message.Error("Unable to bind socket")

Potreste spiegarmi dov'è che sbaglio? A me sembra uguale alla parte dell'esempio (eccetto il fatto che non scelgo la modalità UNIX o TCP)...
Grazie.

[El Berto]

Allora, ho provato con le porte:
29 -> "Unable to bind socket"
292 -> "Unable to bind socket"

2000 -> Funziona

Ci sono valori di porta riservati?