Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Comm ports
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP
Miscellaneous
Thread ID:
01167666
Message ID:
01178729
Views:
9
Hi Tracy

And then arrived my bluetooth scanner - a keyboard wedge device - charged it up and behold it too worked - and very fast it is too

Now to try several more than 1 scanner on the same host!!!

This is a link to the scanner

http://www.europe.metrologic.com/europe/uk/products/retail/overview/Hand-Held/01_MS9535-Voyager-BT/moreinfo/index.html

Colin

>Great! You are so lucky. Most of the devices come with their own drivers and interface. Working with HID devices is easy enough as well. It is all those others.... :o(
>
>
>
>>>Perhaps it accepts a command to start the scanning? Or else another method is used such as a power button, etc? When you get the actual device, the manual or the website should tell you more...
>>>
>>Tracy
>>
>>Got a USB scanner this morning - created a dummy form with a couple of text boxes and the scanned data read straight into the text box which had focus
>>
>>So I have alreadt developed the app to work with the USB scanner - now I'm borrowing a couple of RF scanners but I'm told that should be quite easy to incorporate
>>
>>Thanks for your help
>>
>>Colin
>>
>>>
>>>
>>>>>See my other message I just sent you in the other thread. Do you have a USB device which accepts data (commands) and responds with data you can use for testing?
>>>>>
>>>>>
>>>>>>>Ed's Faq does it for you:
>>>>>>>
>>>>>>>LOCAL oComm, i, cOldErrorHandler
>>>>>>>DECLARE aComPorts[16]
>>>>>>>aComPorts = .T.
>>>>>>>cOldErrorHandler = ON('ERROR')
>>>>>>>FOR i = 1 TO 16
>>>>>>>  oComm = CREATEOBJ('MsCOMMLib.Mscomm')
>>>>>>>  oComm.CommPort = i
>>>>>>>  ON ERROR aComPorts[i] = .F.
>>>>>>>  oComm.PortOpen = .T.
>>>>>>>  oComm.PortOpen = .F.
>>>>>>>  oComm = NULL
>>>>>>>  ON ERROR &cOldErrorHandler
>>>>>>>ENDFOR
>>>>>>>For i = 1 TO 16
>>>>>>>	IF aComPorts[i]
>>>>>>>		? [Comm Port ] + ALLTRIM(STR(i)) + [ is valid]
>>>>>>>	ENDIF
>>>>>>>ENDFOR
>>>>>>>
>>>>>>>
>>>>>>>>>Up to 16,
>>>>>>>>>
>>>>>>>>>FAQ #7943
>>>>>>>>>
>>>>>>
>>>>>>Thanks Tracy but what about USB ports?
>>>>>>
>>>>>>Colin
>>>>>>>>>>Hi all,
>>>>>>>>>>
>>>>>>>>>>is there a vfp command that can give me the number of serial ports installed ?
>>>>>>>>>>
>>>>>>>>>>Best Regards,
>>>>>>>>>>Hans
>>>>>>>>
>>>>>>>>Jim
>>>>>>>>
>>>>>>>>Is there a VFP command which can tell me what those ports are?
>>>>>>>>
>>>>>>>>Thanks
>>>>>>>>
>>>>>>>>Colin
>>>>
>>>>
>>>>Tracy
>>>>
>>>>Struggling to answer your questions - at the moment the first of my trial USB scanners comes tomorrow - I assumed it was only a reader and therefore could not accept data
>>>>
>>>>I had thought that if I knew the port ID (hence my original question) I could access the data with FGETS() commands - and do this in a loop - am I wrong to do it this way?
>>>>
>>>>
>>>>
>>>>Colin
Specialist in Advertising, Marketing, especially Direct Marketing

I run courses in Business Management and Marketing
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform