<%@LANGUAGE="VBSCRIPT"%> <% ' *** Update Record: set variables MM_editConnection = MM_connABI_STRING MM_editQuery = "UPDATE Counters SET Counters.Countervalue = [Counters]![Countervalue]+1, Counters.LastUpdate = Date() WHERE [Counters].CounterID = 'Main'" Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close %> <% set rsCounters = Server.CreateObject("ADODB.Recordset") rsCounters.ActiveConnection = MM_connABI_STRING rsCounters.Source = "SELECT * FROM Counters" rsCounters.CursorType = 0 rsCounters.CursorLocation = 2 rsCounters.LockType = 3 rsCounters.Open() rsCounters_numRows = 0 %> <% set rscompanies = Server.CreateObject("ADODB.Recordset") rscompanies.ActiveConnection = MM_connABI_STRING rscompanies.Source = "SELECT Distinct Company FROM tblroster ORDER BY Company ASC" rscompanies.CursorType = 0 rscompanies.CursorLocation = 2 rscompanies.LockType = 3 rscompanies.Open() rscompanies_numRows = 0 %> ABI-N Business Networking, Tampa Bay, Brandon, Lakewood, Sarasota

ABI-N Newsletter

 

ABI-N INTERNATIONAL CORPORATE EXECUTIVE CHAPTERS
(I.C.E. Chapters)

A Business Development Organization Designed To Meet The Needs Of Today’s Business Professionals

CONTACT INFORMATION

ART MOFFA
PRESIDENT

 

PHONE:  813-404-3570

FAX:  813-425-0418

EMAIL:  art@artmoffa.com

 

Address:
ABI-N
P.O. BOX 1230
BRANDON, FL 33509

 Website:
www.ABI-N.com

 

 

 

 

 


<% rsCounters.Close() %><% rsCompanies.Close() %>