Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Call port COM3
Message
From
11/01/2008 01:25:13
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Call port COM3
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01281061
Message ID:
01281061
Views:
74
Hi,

My system need to output a text into POS Display Stand with below command

IF VARTYPE(ThisForm.oPortaComm1) != 'O'
ThisForm.ADDOBJECT('oPortaComm1', 'OleControl', 'MSCOMMLib.MSComm')
EndIf
ThisForm.oPortaComm1.CommPort = 3
ThisForm.oPortaComm1.Settings = '9600,N,8,1'
ThisForm.oPortaComm1.PortOpen = .T.


IT'S ALRIGHT, when installed VPF9 and running this program.

((((((( Question ))))))))
But i will got error when i install a new machine without VFP9

>>>>> While running on "ADDOBJECT", i got below eroor message:-
>>>>> OLE error code 0x80040112: Class is not licensed for use

I had setup below things on new machine
*******************
md "c:\program files\Common files\microsoft shared"
md "c:\program files\Common files\microsoft shared\vfp"
copy system\dll\vfp9r.dll "c:\program files\Common files\microsoft shared\vfp"
copy system\dll\vfp9renu.dll "c:\program files\Common files\microsoft shared\vfp"
copy system\dll\gdiplus.dll "c:\program files\Common files\microsoft shared\vfp"
copy system\dll\dll\vfp9t.dll "c:\program files\Common files\microsoft shared\vfp"
copy system\dll\msvcp71.dll "c:\windows\system32"
copy system\dll\msvcr71.dll "c:\windows\system32"
copy system\dll\richtx32.ocx "c:\windows\system32"
copy system\dll\lbinf32dll "c:\windows\system32"
REGSVR32 "C:\Program Files\Common Files\Microsoft Shared\vfp\vfp9r.dll"
***************

WHAT I HAVE MISSING ?
( I don't want to install VPF9 in every machine )
Next
Reply
Map
View

Click here to load this message in the networking platform