Solved

Winsock Control

Posted on 1997-05-01
2
284 Views
Last Modified: 2013-11-13
Hi,

I'm using Visual Basic 5 to create a simple TCP/IP client.  I have add a Winsock control to the main form of the application and can make a telnet connect to a remote host.

What i'm trying to achieve is when a menu option is selected a a sting of characters will be transmitted to the host and a response waited for.  Depending on the menu option different characters are transmitted. The response will be output in a dialog box.

i have tried the following (Query is the menu option)

Private Sub Query_Click()
dim received as String

Winsock1.SendData ">>P001"
received = ""
while received = ""
     Winsock1.PeekData received
wend
` we have some data
` so lets display it
End Sub

What seems to happen is that Winsock1.SendData completes OK. But data is not transmitted to the remote host. As the remote host does not send anything back till it receives an input. we get into a loop.  I have noticed that Winsock1.SendData only physically transmits the data when Query_Click() functions exits.  If  this is how it works how can I have a function which is called by a click of a menu option which sends data waits for a response displays the result then sends some more etc etc.

Robert
0
Comment
Question by:Robert888
2 Comments
 
LVL 1

Expert Comment

by:bitz
ID: 1425902
I need to know one thing.  What Winsock Control are you using?  (Did you download the Internet Control Pack from MicroSoft?).  If  you say the filename, I'll know what one your using.  Thanks,
                        -bitz(program@mindless.com)
0
 

Accepted Solution

by:
lmeijer earned 50 total points
ID: 1425903
Robert,

Place a doevents statement! Otherwise you don't let events
happen to fill the data.

while received = "" 
  Winsock1.PeekData received
  DoEvents
wend
 
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
The goal of the tutorial is to teach the user how to use functions in C++. The video will cover how to define functions, how to call functions and how to create functions prototypes. Microsoft Visual C++ 2010 Express will be used as a text editor an…
The goal of the video will be to teach the user the difference and consequence of passing data by value vs passing data by reference in C++. An example of passing data by value as well as an example of passing data by reference will be be given. Bot…

839 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question