Het toevoegen van netwerk communicatie mogelijkheden aan applicaties en scripts is doorgaans niet eenvoudig. Het vereist gespecialiseerde kennis, die niet altijd aanwezig is bij de gebruiker. Ontwikkelaars en administrators die VBScript, Visual Basic en Visual C++ programmatuur/scripts schrijven, vertrouwen daarom al jaren op de door ActiveXperts ontwikkelde "ActiveSocket Network Communication" toolkit.
Met ActiveSocket kunt u communiceren over TCP/IP netwerken, inclusief het Internet. ActiveSocket is een ActiveX/COM component dat zorg draagt voor een eenvoudig script-interface voor TCP/IP communicatie. Met ActiveSocket kunt u op een eenvoudige manier netwerk-functionaliteit toevoegen aan uw applicaties en scripts.
ActiveSocket omvat de volgende objecten:
ActiveSocket is gebaseerd op Winsock; In tegenstelling tot vele toolkits op de markt, maakt ActiveSocket gebruik van Winsock; het vervangt Winsock niet! De installatie van ActiveSocket houdt uw systeem schoon!
De performance van de software module is uitstekend, dankzij de multi-threaded architectuur. Het heeft zijn sterkte bewezen in de loop der jaren, in vele zakelijke, professionele markten.
ActiveSocket is een ActiveX/COM-component, en kan o.a. gebruikt worden bij de volgende ontwikkel- en scripting-talen:
ActiveSocket kan gebruikt worden binnen de volgende besturingssystemen:
De volgende code snippets (VBScript) illustreren hoe ActiveSocket gebruikt kan worden.
Voor meer voorbeelden, ga naar de Online ActiveSocket Samples pagina.
Set icmpObj = CreateObject("ActiveXperts.Icmp")
Do
strHost = inputbox( "Enter host", "Input", "192.168.1.10" )
Loop until strHost <> ""
icmpObj.Ping strHost, 2000 ' Timeout 2000 ms
If( icmpObj.LastError = 0 ) Then
WScript.Echo "Duration:" & icmpObj.LastDuration & "ms"
Else
WScript.Echo "Error " & icmpObj.LastError
End If
WScript.Echo "Ready."
Set objHttp = CreateObject("ActiveXperts.Http")
Do
strUrl = inputbox( "Enter URL", "Input", "www.activexperts.com" )
Loop until strUrl <> ""
objHttp.Connect( strUrl )
If( objHttp.LastError = 0 ) Then
strData = objHttp.ReadData
If( objHttp.LastError = 0 ) Then
WScript.Echo strData
End If
objHttp.Disconnect
WScript.Echo "Disconnect."
End If
WScript.Echo "Ready."
Set objIPC = CreateObject( "ActiveXperts.IPtoCountry" ) objIPC.Host = "www.activexperts.com" objIPC.Query() WScript.Echo "Query, result: " & objIPC.LastError If objIPC.LastError = 0 Then WScript.Echo "Host " & strHost & " is located in " & objIPC.CountryName End If
De 'core' van ActiveSocket is een ActiveX/COM component en wordt in twee varianten meegeleverd:
ActiveSocket kan eenvoudig naar grote hoeveelheid pc's gedistribueerd worden. Nadat u de licentie heeft gekocht moet alleen het bestand ASocket.dll (en/of ASocketx64.dll) naar de verschillende pc's gekopieerd worden en moet deze DLL in het register van deze computer opgenomen worden.
ActiveSocket bestaat uit 3 componenten, elke combinatie van de componenten kan geïnstalleerd worden:
Om de software te installeren voert u eenvoudig het ASocket.exe setup programma uit, de InstallShield wizard voert u dan door het installatieproces. Als u de ActiveSocket COM component kiest, dan kan het setup-programma de registratie van de COM component voor u uitvoeren.
Alle opvolgende installaties van ActiveSocket op andere computers kunnen zowel handmatig als automatisch uitgevoerd worden.
Alle installaties op computers binnen een netwerk kunnen worden uitgevoerd m.b.t. het Setup programma.
Echter, omdat de installatie van de hoofd componenten erg simpel is, kan er worden gekozen om de installatie handmatig te doen, of om de installatie te integreren binnen een eigen installatie procedure of groep policies.
Indien gekozen wordt voor handmatige installatie van de COM component op andere computers, kan dit worden gedaan door uitvoering van de volgende acties: