Freeware String Collection ActiveX Component
This is a simple and free ActiveX component for creating and managing in-memory stacks and queues of strings. It can be used in ASP, VBScipt, Visual Basic, and any other programming language that supports ActiveX components.
How to Use
Simply download the Zip distribution and unzip. Register the DLL using regsvr32.exe. The following sample VBScript is included in the download and demonstrates the functionality of this component:
' This VBScript example serves as the documentation for this free ActiveX component.
' To use the component, simply unzip the distribution package and register
' the DLL using regsvr32.
' Stack and queue object creation:
set stack = CreateObject("StringColl.Stack")
set queue = CreateObject("StringColl.Queue")
' Push strings onto a stack.
stack.Push "String A"
stack.Push "String B"
stack.Push "String C"
' Pop strings off the stack.
MsgBox stack.Pop()
MsgBox stack.Pop()
' How many strings on the stack?
MsgBox stack.Count
' Peek at the next string to be popped.
MsgBox stack.Peek()
' Does the stack contain a particular string?
MsgBox stack.Contains("String A")
' Clear the stack
stack.Clear
' Enqueue strings onto a queue.
queue.Enqueue "String A"
queue.Enqueue "String B"
queue.Enqueue "String C"
' Dequeue strings
MsgBox queue.Dequeue()
MsgBox queue.Dequeue()
' How many strings in the queue?
MsgBox queue.Count
' Peek at the next string to be dequeued.
MsgBox queue.Peek()
' Does the queue contain a particular string?
MsgBox queue.Contains("String A")
' Clear the queue
queue.Clear
About Tortuga
Tortuga Group LLC is in the business of building
a new index for the World Wide Web
at http://www.worldwideweb-x.com. The company has decided to make available
some of its internally used ActiveX components to the general public. We hope
you find them to be useful.