FiveTech Software tech support forums

... = 5950 cHostIP = "10.10.10.1" nProxyPort = 8080 cProxyAddress = "202.89.128.85" oSocket := CNCSocket():New(nProxyPort) oSocket:bConnect := { | oSocket | OnConnect(oSocket,oGet)} oSocket:cDestAddr := cProxyAddress oSocket:connect() Function OnConnect(oSocket) oSocket:SendData("CONNECT ...

... = { | oSocket | mUniWinInput := oSocket:GetData() } // Never use a MsgInfo() here because it hangs Windows!!! oSocketArray[nBridge]:bConnect = { || mUniWinConnected := .T. } oSocketArray[nBridge]:bClose = { || mUniWinClosed := .T. } oSocketArray[nBridge]:lDebug = .T. oSocketArray[nBridge]:cLogFile ...

... FUNCTION SENDDATA( nPort, cIP, cMsg ) LOCAL oSocket := TSocket():New( nPort ) oSocket:bConnect := { || oSocket:SendData( "MSG " + cMsg ),; oSocket:End() } oSocket:Connect( cIP ) RETURN NIL

... to :Listen() from a Client (another party). The question : How can I know the client connect to server (if I am server)? I try as below code but :bConnect is not response when client connect.  oSocket:bAccept = { | oSocket | ;                       oClient := TSocket():Accept( ...

... I dont seem to be able to check if i'm connected. I have a public variable called lConnected that is initially set to .F. - this is set to true in bConnect, but when i try to reference it, it always returns .f. - the senddata & getdata routines all work fine. Is there a better way to detect ...

... STATIC FUNCTION SENDDATA( nPort, cIP, cMsg ) LOCAL oSocket := TSocket():New( nPort ) oSocket:bConnect := { || oSocket:SendData( "MSG " + cMsg ),; oSocket:End() } oSocket:Connect( cIP ) RETURN NIL

... cRfid ) ACTIVATE WINDOW oWnd RETURN NIL STATIC FUNCTION SENDDATA( nPort, cIP, cRfData ) LOCAL oSocket := TSocket():New( nPort ) oSocket:bConnect := { || oSocket:SendData( cRfData ),; oSocket:End(), MsgInfo( cRfData + " DATA SENT!" ) } oSocket:bClose = { || MsgInfo( "disconnected!" ...

... Socket server as I know. I use standart port 2000 and use 127.0.0.1 as IP. (I have tried several unknown ip) I run SockCli.prg and connect. The bConnect block is evaluated, but the return value of connect method is -1. It is not connected. so if you call senddata method after that, the unexpected ...

Dear Hakan,

Horizon wrote:I have 11.01. When I try to run SockCli.prg as an example without running SockSer.prg, Tsocket runs to bConnect. I think it should say can not connected.

unfortunately I never solved the problem above, and I'm still on 9.05

Hi,
Davide

Hi Davide,

Can you solve this problem?

I have 11.01. When I try to run SockCli.prg as an example without running SockSer.prg, Tsocket runs to bConnect. I think it should say can not connected.

Thanks,

... 2000 ) oSocket:bRead = { | oSocket | MsgInfo( oSocket:GetData() ) } // Never use a MsgInfo() here because it hangs Windows!!! oSocket:bConnect = { || oBtn1:Disable(), oBtn2:Enable(), oBtn3:Enable(), oBtn4:Enable() } oSocket:bClose = { || MsgInfo( "Server se cierra y espera transferencia" ...

oSocket := TSocket():New( 8083 ) oSocket:bConnect := { | oSocket | Send(oSocket) } oSocket:bRead := { | oSocket | CogeDato( oSocket ) } oSocket:bClose := { || MsgInfo( "Server has closed!" ) } oSocket:Connect( "miserver.dyndns.org", ...

... init (oWnd:Hide(),BarixConn(nIdWav,@oWnd)) end if return function BarixConn(nId,oWnd) local oSocket,b:=.f. oSocket = TSocket():New( 2020 ) oSocket:bConnect = { || iif(SendFile(@oSocket,nId),(oSocket:End(),oWnd:end()),)} oSocket:bClose = { || MsgInfo( "Server has closed!" ) } oSocket:Connect( ...

... // get rid of blanks ::oClientSock := TSocket():New(iDSERVERPORT) ::oClientSock:bRead := { |oClient| ClientRead(oClient)} ::oClientSock:bConnect := { |oClient| OnConnect(oClient) } // ::oClientSock:bClose := { |oClient| OnCloseClient(oClient) } ::oClientSock:Connect( ::cServerIP ) // ...

... server is not activate. I don't know. 2. When the server down. I know but when server re-activate. I try to ::connect() but it doesn't know ( ::bConnect is not run ). - How can I know the server is activate or not? - How can reconnect if the server re-activate? Regards, Dutch oSocket := ...