Visual Foxpro Serial Communication Interface
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? 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.
Visual Foxpro 9.0
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.
Digital Visual Interface
Applications Application Questions and Problems Automation Business The Business of Automation and Control Communications Communications systems and equipment. Engineering Engineering and workplace issues.
Visual Foxpro Download
HMI Human-Machine Interface and SCADA. 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.
Serial Communications Library for Visual FoxPro: Visual FoxPro serial port library, serial component, Visual FoxPro serial control Serial Communication Library for Visual FoxPro, serial port component, serial port control, virtual serial ports, usb serial and RS232, RS422, RS485 software tool for Visual FoxPro. Windows Standard Serial Communication Library for Visual FoxPro The Marshallsoft serial communications component library for Visual FoxPro (WSC4FP) is a serial port library based on the Windows serial comm API. WSC4FP uses the core Windows API to communicate with any device connected to a serial port from within a Visual FoxPro application. A simple interface allows accessing data from a serial port using RS232 or multi-drop RS422 / RS485 serial ports. WSC4FP also supports virtual ports such as those created by Bluetooth and USB/serial converters. WSC4FP provides the capability to quickly write Visual FoxPro applications to control serial devices such as barcode scanners, modems, lab instruments, medical devices, USB serial devices, scales, GPS navigation, etc.
The component library includes 49 functions plus serial line status & control, modem control, ASCII/XMODEM/YMODEM protocols, and a good selection of Visual FoxPro example programs. The library can be used with any 32-bit version of Visual FoxPro.
Features include:. Free technical support and updates for one year. Royalty free distribution with your compiled application. Implemented as a 32-bit DLL (WSC32.DLL). Evaluation versions are fully functional. No unlock code is required.
Includes over 49 functions plus modem control. Can control any serial device (scale, barcode reader, etc.) connected to a serial port. Can be used from GUI mode or console mode programs. Can control multiple ports simultaneously. Can be used with virtual serial ports using Bluetooth serial or a USB to serial converter. Supports RS232, and multidrop RS422, and RS485 ports. Includes hardware and software flow control.
Supports character peek (SioEventChar). Supports transmit and receive timeouts. Can send Windows messages on completion of events (incoming character, etc.). Supports any baud rate (32-bit version). Ability to specify the parity, word size, and number of stop bits. Comes with ANSI emulation and ASCII, XMODEM and YMODEM.
Supports binary and text data transfer. Is port re-entrant. State driven Xmodem and Ymodem on multiple ports simultaneously.
Is fully thread safe. Supports Windows XP through Windows 10.
Works with all versions of 32-bit FoxPro. Microworlds pro for windows xp. Does not depend on support libraries. Makes calls to Windows API functions only.
Can be used with any language (C/C.NET, Delphi,Visual Basic, VB.NET, etc.) that can call the Windows API. License covers all programming languages. Purchase a developer license for WSC4FP and use the DLLs with any other development environment (C, Visual Basic, etc).
Implemented as a standard Windows DLL, which will work with all versions of Windows. Will run on machines with or without.NET installed. Can be purchased with or without ANSI C source code to the WSC DLLs. Documentation online as well as in printable format.
WSC4FP requires the Visual FoxPro compiler (any version). WSC4FP can be used in the development of Visual FoxPro applications running under Windows XP through Windows 10. The evaluation version of WSC4FP is fully functional. The current version of the Windows Std Serial Comm Lib for FoxPro is 6.0 (March 22, 2017).
Registration is $115 for email delivery ($195 with C language source code).