You are here:
ActiveXperts.com >ActiveComport
Add serial communication capabilities to any Windows or .NET applicationQuicklinks
Adding serial communications capabilities to an application is never a simple matter. It requires specialized knowledge that might be outside an individual programmer's expertise. For years, VBScript, Visual Basic and Visual C++ developers have relied upon the power, flexibility and reliability of the ActiveComport serial communications control from ActiveXperts Software. Today, a new generation of .NET developers developers use the toolkit.
 |  |  |  |  |
| Startup screen after installation | Use ActiveComport with MS Visual Studio | ActiveComport in a .NET web application | ActiveComport in a .NET GUI forms application | ActiveComport in a console application |
ActiveComport is a COM component, providing an easy-to-use scripting interface for serial, asynchronous communications through a serial port. ActiveComport can control modems, ISDN modems, USB serial devices and other devices and machines that have a serial interface.
Use ActiveComport for different purposes:
ActiveComport features the following:
ActiveComport includessamples for many development tools, including:
ActiveComport is available as a 32-bit component and as a 64-bit component (both part of the product):
ActiveComport runs on the following Operating Systems:
ActiveComport is built on top of the Microsoft serial device drivers. It just uses these drivers. It neither replaces them, nor does it install any additional serial device drivers.
ActiveComport can be distributed easily to many PC's. Once you have purchased the licenses, you copy the AComport.dll to the PCs and register the DLL on that PC.
The following code snippets (VBScript) illustrate how to use ActiveComport.
For more samples, please check theOnline ActiveComport Samples.
Initialize a modem using a direct COM portSet objComport = CreateObject( "ActiveXperts.Comport" )' Create a new Comport instanceobjComport.Device = "COM1"' Use a COM port directly objComport.BaudRate = 56000' Set baudrate (default value: 9600)objComport.HardwareFlowControl = True' Set Hardware Flow ControlobjComport.SoftwareFlowControl = False' Set Software Flow ControlobjComport.Open' Open the portWscript.Echo "Open, result: " & objComport.LastErrorIf( objComport.LastError <> 0 ) Then WScript.QuitEnd IfobjComport.WriteString( "at&f;" )' Write commandstr = objComport.ReadStringWScript.Echo "Received: [" & str & "]"' Read the responseobjComport.Close' Close the port
Initialize a modem using a Windows Telephony DriverSet objComport = CreateObject( "ActiveXperts.Comport" )' Create a new Comport instanceobjComport.Device = "Standard 9600 bps Modem"' Use a Windows Telephony driver objComport.Open' Open the portWscript.Echo "Open, result: " & objComport.LastErrorIf( objComport.LastError <> 0 ) Then WScript.QuitEnd IfobjComport.WriteString( "at&f;" )' Write commandstr = objComport.ReadStringWScript.Echo "Received: [" & str & "]"' Read the responseobjComport.Close' Close the port
Send an SMS using a GSM Modem connected to the PC; Enable loggingConst RECIPIENT = "+31624896641"Const MESSAGE = "Hello, world!"Set objComport = CreateObject( "ActiveXperts.Comport" )' Create a new Comport instanceobjComport.Device = "Nokia 6680 SmartPhone"' Use a Windows Telephony driver objComport.LogFile = "C:\ActiveComport.log"' Enable logging objComport.Open' Open the portWscript.Echo "Open, result: " & objComport.LastErrorIf( objComport.LastError <> 0 ) Then WScript.QuitEnd IfWriteStr objComport, "at+cmgs=" & Chr( 34 ) & strNumber & Chr( 34 )ReadStr objComportWriteStr objComport, strMessagestrTermCmd = Chr( 26 )' Terminate message: [ctrl]zWriteStr objComport, strTermCmdobjComport.Sleep 3000' Allow some timeReadStr objComport' +CMGS: expectedReadStr objComport' OK expectedobjComport.Close' Close the port' ********************************************************************' Sub Routines' ********************************************************************Sub WriteStr( obj, str ) obj.WriteString str WScript.Echo "-> " & strEnd SubSub ReadStr( obj ) str = "notempty" obj.Sleep 200 Do While str <> "" str = obj.ReadString If( str <> "" ) Then WScript.Echo "<- " & str End If LoopEnd Sub' ********************************************************************
| Standard License AX003-0010 | Professional License AX003-0012 | Distribution License AX003-0020 | |
|---|---|---|---|
| Direct COM port support | X | X | X |
| Windows Telephony Device (TAPI) support | X | X | X |
| Configurable baudrate | X | X | X |
| Hardware flow control | X | X | X |
| Software flow control | X | X | X |
| Support for multiple ports (simultaneously) | - | X | X |
| High-speed data transmission | - | X | X |
| Use component on any computer in your organization | - | X | X |
| Distribution of component | - | - | X |
For detailed licensing information,click here.
To read more about ActiveComport, use one of the following links:
Footer Navigation
