<% on error resume next session("cnstring") = "uid=sa;pwd=kfmdb;Driver={SQL Server};database=smskf;Server=192.168.1.25" session("cnstring") = "uid=smskf;pwd=liver1pool;Driver={SQL Server};database=SMSKF;Server=192.168.1.118" set cn = Server.CreateObject("ADODB.CONNECTION") cn.Open session("cnstring") if request.querystring("null") = "bekreftet" then sql = "update opptelling set antall = 0 where antall = 'KR nyhetsbrev'" cn.execute(sql) response.redirect "opptelling.asp" end if if request.querystring("null") = "bekreftet_nyhet" then sql = "update opptelling set antall = 0 where antall = 'KR banner'" cn.execute(sql) response.redirect "opptelling.asp" end if 'Utsendelse sql = "Select * from opptelling where beskrivelse = 'KR nyhetsbrev'" set rs = cn.Execute(sql) antall1 = rs("antall") rs.close sql = "Select * from opptelling where beskrivelse = 'KR banner'" set rs = cn.Execute(sql) antall2 = rs("antall") rs.close cn.close %> Kommuneforlaget opptelling annonser
Opptelling av ulike klikk på annonser

Antall klikk på de ulike annonseringene hos Kommunal Rapport:
Kikket
KR nyhetsbrev: <%= antall1 %> <%= antall31 %> <%= antall41 %> <%= antall61 %> <%= antall71 %> <%= antall51 %>
KR bannerannonse: <%= antall2 %> <%= antall22 %> <%= antall32 %> <%= antall42 %> <%= antall62 %> <%= antall72 %> <%= antall52 %>