Visualizza post

Questa sezione ti permette di visualizzare tutti i post inviati da questo utente. N.B: puoi vedere solo i post relativi alle aree dove hai l'accesso.


Post - Skyfox

Pagine: [1]
1
Programmazione (Gambas 2) / gb.NET esempi e come ulizzarla
« il: 21 Giugno 2008, 23:15:41 »
Ciao,

Avrei bisogno di qualche esempio per l'utilizzo del ServerSocket e del Socket.

Avrei la necessità di passare informazioni da un client al server usando una connessione TCPIP

Ho provato ad utilizzare gli esempi della documentazione relativi a gb.net sia per il server che per il client ma ho problemi, ad esempio usando la classe ClsServer:

' 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

se eseguo il codice mi va in errore sulla linea:
  Srv.Type=ServerSocket.Internet

posso proseguire solo se cambio in

  Srv.Type=1


all'esecuzione mi ritrovo con un messaggio di Warning: circular references detected.

Nelle proprietà del progetto ho solo i riferiemnti a gb, gb.form, gb.gui e gb.net

Serve qualche cosa in più?

Sto eseguendo Gambas su Ubuntu8.04 in VirtualBox su Vista.

Grazie

Pagine: [1]