<% 'HIT COUNTER 'Dimension variables Dim adoCon 'Holds the Database Connection Object Dim rsAccess 'Holds the recordset for the new record to be added to the database Dim strSQL 'Holds the SQL query for the database Dim counter 'Holds counter value from database Dim strCurrentPage 'Holds name of current web page strCurrentPage = "Index" 'Create an ADO connection odject Set adoCon = Server.CreateObject("ADODB.Connection") 'Set an active connection to the Connection object using a DSN-less connection adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("_private/Hits.mdb") 'Create an ADO recordset object Set rsAccess = Server.CreateObject("ADODB.Recordset") 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT tblHits.Index, tblHits.Advertising, tblHits.Classifieds, tblHits.Commercial_Advertising, tblHits.Contact, tblHits.Contests, tblHits.Coupons, tblHits.Employment, tblHits.Events, tblHits.Fun_Links, tblHits.KIQX, tblHits.KIUP, tblHits.KKDC, tblHits.KRSJ, tblHits.Listen_Live, tblHits.Loyal_Listener_Registry, tblHits.News, tblHits.PSA, tblHits.Sports, tblHits.Weather FROM tblHits;" 'Set the cursor type we are using so we can navigate through the recordset rsAccess.CursorType = 2 'Set the lock type so that the record is locked by ADO when it is updated rsAccess.LockType = 3 'Open the tblComments table using the SQL query held in the strSQL varaiable rsAccess.Open strSQL, adoCon Set counter = rsAccess(strCurrentPage) counter = counter + 1 rsAccess.Fields(strCurrentPage) = counter rsAccess.Update adoCon.Close %> The Snowdown 2013 Montage Contest

 

Todays News Home Page

News Page
Chamber Chat, FYI, LaPlata County Update,Newscast & Specials
Weather
Contests
Sports
oncerts
Advertising
photoalbums
Fun Links
Employment with FCB
Advertise with FCB

 

Copyright

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Upcoming Events

Project Merry
Christmas
Blanket Drives.
Bring your donations
of New Blankets,
Toys,
Non Perishable Food
and New Clothing
Saturday's from
11:00am-3pm

November 22
Natures Oasis

November 29
Kroegers Ace Hardware

December 6
Alpine Bank

December 13
LaPlata Electric

All for your less
fortunate neighbors.

Register as A Frequest Listener

Listin On Line
Fort Lewis Sports

Listen Live

On Air Broadcasts
Live On
KRSJ-FM 100.5 & 104.9
CU Buffalos
Denver Broncos
Colorado Avalanche


Live On
Sports Stop 930 KIUPColorado RockiesFort Lewis Footbal & BasketballDenver Nuggets

"...so you listening to Four Corners Broadcasting?

If your not, you can't win the..."

Well Done
Ben S.
He figured it all out.

Montage Answers:
Tarzan, The Gods Must Be Crazy, The Lion King, Madagascar, Gorillas in the Mist, the Jungle Book, Ghost in the Darkness, Ace Ventura - nature Calls, Out of Africa, and George of the Jungle.


Listen to

For the montage.

When you have the answers, E-mail your entry to:

safari@radiodurango.com
thegeeks@radiodurango.com

Fax entries to:970-247-1005

From the correct entries one person will be drawn to win the grand prize
One Snowdown Poster
One Snowdown Tee Shirt
and
One pair of tickets to the FOLLIES
Saturday 10:00pm
from.