ActiveSocket Toolkit Add network capabilities to any Windows or .NET application

Quicklinks

Powershell Telnet Sample Source Code

ActiveSocket provides an easy-to-use development interface to a variety of IP protocols. By using ActiveSocket, you can very easily create or enhance applications with network features.

ActiveSocket features the following: DNS, FTP, HTTP, HTTPs, ICMP Ping, IP-to-Country, MSN, NTP, RSH, SCP, SFTP, SNMP v1/v2c (Get, GetNext, Set), SNMP Traps, SNMP MIB, SSH, TCP, Telnet, TFTP, UDP, Telnet, Wake-On-LAN and more.

ActiveSocket can be well integrated into Powershell environments. This document describes how ActiveSocket can be integrated into Powershell projects.

Step 1: Download and install the ActiveSocket Toolkit

Download ActiveSocket from the ActiveXperts Download Site and start the installation. The installation guides you through the installation process.

Step 2: Create a new script

Create a new script using your favorite editor. You can simply use notepad. However, a Powershell editor is recommended, so you can browse through objects, objects properties and object functions.

You're now able to write a more advanced script to communicate using the ActiveSocket Toolkit.

Step 3: Create the ActiveSocket object in Powershell

Create a new Powershell file called DEMO.PS1.

Create the ActiveSocket object(s) like this:

$objTcp  	= new-object -comobject ActiveXperts.Tcp
$objConst	= new-object -comobject ActiveXperts.ASConstants

$objTcp.Protocol = $objConst.asSOCKET_PROTOCOL_TELNET

Now, add the following lines to the file to have your fist ActiveSocket Powershell program:

WScript.Echo "Version: " & objSocket.Version
WScript.Echo "Expiration Date: " & objSocket.Expiration Date

Step 4: Setup a simple TCP connection to a webserver

You can now setup a TCP/IP connection to a server.

The following Powershell code shows how to get a HTML page from a webserver:

Option Explicit

' Create a socket instance
Set objSocket      = CreateObject("ActiveXperts.Tcp")

objSocket.Protocol = objSocket.asPROTOCOL_TELNET

' Write some information to console
Write-Host "ActiveSocket Version " $objTcp.Version "; Build " $objTcp.Build "; Module " $objTcp.Module
Write-Host "Expiration date: " $objTcp.ExpirationDate

' Make a connection on port 80 to remote server
#################################################################################
# ActiveSocket - Powershell script
# © Copyright ActiveXperts Software B.V.
#
# For more information about ActiveSocket, please
# visit the online ActiveSocket page at:
# http://www.activexperts.com
#################################################################################
# ActiveSocket sample - Telnet client communication
#    Connects to www.activexperts.com and reads page /network-component/demopage
#################################################################################

cls

#################################################################################
# THE SCRIPT ITSELF ------------------------------------------------------------#
#################################################################################
  
# Create a Tcp instance
$objTcp  	= new-object -comobject ActiveXperts.Tcp
$objConst	= new-object -comobject ActiveXperts.ASConstants

$objTcp.Protocol = $objConst.asSOCKET_PROTOCOL_TELNET

# Write some information to console
Write-Host "ActiveSocket Version " $objTcp.Version "; Build " $objTcp.Build "; Module " $objTcp.Module
Write-Host "Expiration date: " $objTcp.ExpirationDate

# Make a connection on port 80 to remote server
$objTcp.Connect("www.activexperts.com", 80)
Write-Host "Connect to www.activexperts.com:80, result: " $objTcp.LastError

if($objTcp.LastError -ne 0 -or $objTcp.ConnectionState -ne $objConst.asSOCKET_CONNSTATE_CONNECTED)
	{
		exit
	}

# YES, connection established.
Write-Host "Connection established"
	
$objTcp.Sleep(1000)
	
$objTcp.SendString("GET /network-component/demopage/ HTTP/1.1")
$objTcp.SendString("Host: www.activexperts.com")
$objTcp.SendString("")
	
$objTcp.Sleep(1000)
	
if($objTcp.HasData)
	{
		$strReceived = $objTcp.ReceiveString()
		Write-Host "RECV: " $strReceived
	}	
      
$objTcp.Sleep(1000)
  
# And finally, disconnect
$objTcp.Disconnect()
Write-Host "Disconnect."

Write-Host "Ready."

To run the code, start Powershell and browse to the location of the file you just created. Enter .\Demo.ps1 to run the code. Notice that if the script is not working, you have to change the execution policy; you can do that with the following command: 

Set-ExecutionPolicy -unrestricted

There are many working samples included with the product. You can also find them on the ActiveXperts FTP site: ftp.activexperts-labs.com/samples/network-component.