WEB EDITION ServerSocket App Open Event

p0wn3d · **Posted:** Thu Jan 24, 2013 12:24 pm

I notice that the Web edition uses app.open and the desktop edition uses app.run are there any differences?

I have the following code in my app.open event of my we application

dim mServerSocket as new ServerSocket
mServerSocket.Port= 55555
mServerSocket.MinimumSocketsAvailable = 10
mServerSocket.listen

Do i need an app doevent to get the socket listening?

Thanks

MonkeybreadSoftware · **Posted:** Thu Jan 24, 2013 1:07 pm

in a web app there is a main loop, so no need to call doevents.

Greetings
Christian

p0wn3d · **Posted:** Thu Jan 24, 2013 1:16 pm

Very strange does not appear to be opening the listening socket on port 5555

netstat -aN at the command prompt does not show it has opened either

MonkeybreadSoftware · **Posted:** Thu Jan 24, 2013 1:27 pm

You need to keep the socket alive to have it staying open!

So store a reference in a property and not just a local variable.

Greetings
Christian

p0wn3d · **Posted:** Fri Jan 25, 2013 5:06 am

Still not been able to get things working my desktop server version work fine but the web edition is proving a little problematic. My guess is that I have overlooked something simple

Main Project Window
mServerSocket -> Super ServerSocket
ClientSocket -> Super EasyTCPSocket

mServerSocket -> AddSocket Event

dim ret as EasyTCPSocket = new ClientSocket
curSocket = curSocket + 1
return ret

Properties->cursocket As Integer

App Open Event

dim mServerSocket as new ServerSocket
mServerSocket.Port= 7777
mServerSocket.MinimumSocketsAvailable = 10
mServerSocket.listen

Property->mserversocket As Serversocket

MonkeybreadSoftware · **Posted:** Fri Jan 25, 2013 5:12 am

replace

dim mServerSocket as

with

mServerSocket =

so you use the property and not the variable.

Greetings
Christian

p0wn3d · **Posted:** Fri Jan 25, 2013 5:26 am

Hi Christian

I did try that yesterday but there is something very strange going on with the WE App

If you replace the local variable with mServerSocket = new ServerSocket and then run the Application the default webpage does not load it just hangs.

:roll:

p0wn3d · **Posted:** Fri Jan 25, 2013 7:34 am

Has anyone else come across this it's driving me MAD :evil:

p0wn3d · **Posted:** Fri Jan 25, 2013 10:59 am

Bump anyone?
:roll:

MonkeybreadSoftware · **Posted:** Fri Jan 25, 2013 11:21 am

Do you have a ServerSocket subclass at all?
Somewhere you need to provide the sockets...

Greetings
Christian

p0wn3d · **Posted:** Fri Jan 25, 2013 12:04 pm

Hi Cristian :?:

All I have is my mserversocket as serversocket and an EasyTCPSockcket as clientsocket

mserversocket addsoscket event

dim ret as EasyTCPSocket = new ClientSocket
curSocket = curSocket + 1
return ret

MonkeybreadSoftware · **Posted:** Fri Jan 25, 2013 12:18 pm

In the code above you don't use the MyServerSocket!

Greetings
Christian

timhare · **Posted:** Fri Jan 25, 2013 2:02 pm

nvm...

You need to make a subclass of ServerSocket like Christian said.

p0wn3d · **Posted:** Fri Jan 25, 2013 3:26 pm

I thought my socketserver addsocket event was subclassing?

timhare · **Posted:** Fri Jan 25, 2013 3:44 pm

Then what is the subclass' name? You have not mentioned a subclass yet. What are the steps you take to get from the Project tab to the event code? That might help clarify what you've got.

	Real Software Forums The forum for Real Studio and other Real Software products.
[ REAL Software Website \| Board Index ]

Real Software Forums

WEB EDITION ServerSocket App Open Event