<% '''''''''''''''''''''''''''''''''CODE FOR HIT COUNTER''''''''''''''''''''' set connhc=server.createobject("ADODB.Connection") set reccounter=server.createobject("ADODB.Recordset") sete=server.mappath("hitcounter.mdb") connhc.ConnectionString ="provider=microsoft.jet.oledb.4.0;data source=" & sete connhc.Open sql="select * from user_counter" reccounter.open sql,connhc if reccounter.eof=true then ' or reccounter("counter")=0 then hitcounter=7000 else hitcounter=reccounter("counter")+1 end if sql="delete from user_counter" connhc.execute(sql) sql="insert into user_counter values ("&hitcounter&")" connhc.execute(sql) %> Irish Gifts, Irish Souvenirs, Connexxion Sports at Irish Connexxion
 

Irish Connexxion

 
 
Hotel Accessories like Irish Designer Gifts, Irish Souvenirs, Connexxion Sports at Irish Connexxion