<% Public HitCounter Dim IpAddress, QueryString, ReferSite, BrowserVer IpAddress = Request.ServerVariables("REMOTE_ADDR") QueryString = Request.ServerVariables("QUERY_STRING") ReferSite = Request.ServerVariables("HTTP_REFERER") BrowserVer = Request.ServerVariables("HTTP_USER_AGENT") Set myDll = Server.CreateObject("test1.OpenCom") ReturnVal = myDll.Commands("set default to d:\WWW.BM.COM\") ReturnVal = myDll.Commands("set safety off") ReturnVal = myDll.Commands("set exclusive off") ReturnVal = myDll.Commands("set century on") ReturnVal = myDll.Commands("Use Counter Shared") ReturnVal = myDll.Commands("Replace next 1 counter.hits with counter.hits + 1") HitCounter = myDll.FieldVal("Counter.Hits") ReturnVal = myDll.Commands("Close Data") ReturnVal = myDll.Commands("use stats shared") ReturnVal = myDll.Commands("append blank") ReturnVal = myDll.ReplaceRec("1","IPAddr",IpAddress) ReturnVal = myDll.ReplaceRec("1","Qstring",QueryString) ReturnVal = myDll.ReplaceRec("1","Referrer",ReferSite) ReturnVal = myDll.ReplaceRec("1","Browser",BrowserVer) ReturnVal = myDll.ReplaceRec("1","LDate",date) ReturnVal = myDll.ReplaceRec("1","LTime",Time) ReturnVal = myDll.Commands("Close Data") %> Photo ID Maker

 

Clancy Systems International, Inc. has now released our first version of our photo ID badge system.

This system will produce a 2 sided photo ID or badge in seconds. In fact, in a beta test at Avis in Minneapolis, they replaced all old employee badges with new photo ID produced with this system in 3 hours at a supplies cost of less than 15 cents each.

The software is in daily use now in several Rental Car offices and will be released as a product very soon.

Please download a copy of the software and try it out. We will be happy to help you with questions and would appreciate your comments.

Write us at clancy@clancysystems.com or call us at 303-759-4276. This version is fully operational but it will print "DEMO" on the finished badges. This is the full version but will require an activation key to remove the "DEMO".

 

 

Welcome, you are visitor # <% =HitCounter %>