Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Winsock Control

Posted on 1997-05-01
2
Medium Priority
?
298 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
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 150 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

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…
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 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…
In a recent question (https://www.experts-exchange.com/questions/29004105/Run-AutoHotkey-script-directly-from-Notepad.html) here at Experts Exchange, a member asked how to run an AutoHotkey script (.AHK) directly from Notepad++ (aka NPP). This video…

721 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