Visual Foxpro Serial Communications
I have been cracking my brain for two weeks now to have two pc's communicate through SERIAL PORT. First of all I would like to know if what kind of truble do you have. Are you receiving nothing? Are you receiving partial data?
Windows Standard Serial Comm Library for Visual FoxPro v3.0 Windows Standard Serial Comm Library for Visual FoxPro is a communications library for Visual FoxPro.This serial comm library is based on the Windows API and includes 28 functions along with modem control.
If you are not getting any info from any of the PC's I would ask what kind of media are you using. In this case you should have a crossed serial cable, i.e. The Tx from PC1 goes to Rx in PC2, and Rx from PC1 goes to Tx in PC2. If you have the right cable configuration, and you are getting just partial data in your 'sData' variable, e.g. The label shows just 'FA', it could be caused by the instruction 'MSComm1.InputLen = 2' this instruction produce the OnComm event everytime it reads two bytes, so when the first two bytes arrive, 'FA', they will be store in the variable sData and then will be shown in the label.
But when the two other bytes arrive, they will be stored in the same sData variable and the lable will show only the last two bytes received. Here's what I would do: Dim Temp as String Dim sData as String Private Sub FormLoad Temp = ' sData = ' End Private Sub MSComm1OnComm If MSComm1.CommEvent = comEvReceive Then Temp = Temp + MSComm.Input 'Temporal store variable if Temp = 'FAFA' then ' If the data is what you are expecting sData = Temp Temp = ' 'reset the temporary variable Text1.Text = sData End If End If This will help correcting this error, depending on your protocol.
If you are using a simple point to point protocol, i.e. Start bit, information and stop bit(s), you can evaluate the begining and end of the data sent usind commands like 'mid'. I hope this might help you. If you like you can send me an email to andresefe@hotmail.com with the subject 'Control.com'. I have worked with erial communication projects in VB before and maybe I could help you. Re: 'advise me on what I'm doing wrong'. Have a look below for yourself.
It's fairly obvious. I have been cracking my brain for two weeks now to have two pc's communicate through SERIAL PORT. It seems I'm having trouble passing my string say(fafa) to the 'mscomm1.input' see my full coding below and advise me on what I'm doing wrong sending code ' 2400 baud, no parity, 8 data bits, 1 stop bit MSComm1.Settings = '19200,N,8,1' receiving code from the second pc ' 2400 Baud, No Parity, 8 Data Bits, 1 Stop Bit MSComm1.Settings = '2400,N,8,1'. You have clicked on the '?' Button for search help. To search the site, enter your search terms in the box labeled 'search the site' and hit Enter.
Some tips for better search results. Precede each search term with a '+', as follows:. +Modbus +TCP Otherwise, any post with either term will match. Use double quotes around phrases, as follows:. +'Allen Bradley' +ethernetOtherwise, posts containing these words in separate locations will match. To exclude a word, precede it with a '-', as follows:.
+Modbus -Plus This will return only posts containing 'Modbus' but NOT containing 'Plus'. Note that common words (and, that, etc.) and words shorter than 2 characters are automatically excluded from searches.
Select the categories for which you would like to see messages displayed. Applications Application Questions and Problems Automation Business The Business of Automation and Control Communications Communications systems and equipment. Engineering Engineering and workplace issues. HMI Human-Machine Interface and SCADA.
Visual Foxpro Serial Communications Manual
Information Information resources, documentation. Languages Programming languages. Motion Control Motion control, servos, steppers, etc. Networking Local and wide area networking in factory automation. Open Control Open interfaces, software and hardware PCs in Automation Computers in manufacturing; also hardware discussion. PLCs PLCs and related questions.
Power Generation Power generation equipment control. Process Control Continuous process industries, DCS questions. Sensors Sensor technologies. Software in Automation Software, including programming, OS issues, etc.
Visual Foxpro Serial Communications Software
Serial or Parallel communication in Visual FoxPro I/O ActiveX Control in Visual FoxPro Inserting the Control:. From the menu: 'View' - 'Form Controls Toolbar'.
Select 'OLE Container Control' on Form Controls Toolbar. Drop control on form. Select 'Insert Control'. Scroll down and select 'IO Control'. Click 'OK'. OR:. From the menu: 'Tools', 'Options', 'Controls'.
Select 'ActiveX Controls'. Scroll down and select 'IO Control'. Final destination 4 full movie free download in hindi hd pagalworld.
Click 'OK'. On 'Forms Control Toolbar', 'View Classes' - 'ActiveX'. Select 'IO Control' from the 'Forms Control Toolbar' and drop it on the form. CODE: ThisForm.Olecontrol1.Open('COM2:', 'baud=9600 parity=N data=8 stop=1'); ThisForm.Olecontrol1.SetHandshaking(2); 'Serial ports Only.
0 = None, 1 = Xon/Xoff, 2 = Hardware ThisForm.Olecontrol1.WriteString('Hello World '); ThisForm.Olecontrol1.Close; Note: Olecontrol may have a different number than 1 as in the example. This number depends on if you have other controls that you are using. Copyright (c) 1998.