Why would the TCP OPEN take 5 seconds using Windows 98 SE?
Immediate using XP. Changed port number and host for security reasons.
Immediate using XP. Changed port number and host for security reasons.
Code:
'snoop.bas #COMPILE EXE #DIM ALL FUNCTION PBMAIN () AS LONG 'Send information to your running monitor or just write to a page on your server LOCAL nsocket AS LONG, PortNumber AS LONG, TheServer AS STRING ,sLine AS STRING PortNumber = 999 TheServer = "99.99.99.99" 'Method 2: Send to a server program running on your desktop nsocket = FREEFILE TCP OPEN PORT PortNumber AT TheServer AS nSocket 'TIMEOUT 250 IF ERR = 0 THEN sLine = "TEST" TCP SEND nSocket, sLine TCP CLOSE nSocket ELSE ? "Unable to connect to " + TheServer+ " on port" + STR$(PortNumber) END IF END FUNCTION
Comment