Lave lille tælle script...?

Du smider dette ind i toppen af din side - og så skal du bare sørger for du har en query der hedder ID.

<%
Set conn = Server.CreateObject(\"ADODB.Connection\")

connString = \"Driver={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"database/db.mdb\")

conn.open connString

Set rs =  Server.CreateObject(\"ADODB.Recordset\")

sql = \"SELECT * FROM Counts WHERE Id=\" & Request.QueryString(\"Id\")

rs.open sql, conn, 1, 2

rs(\"count\") = rs(\"count\") + 1

rs.update

%>

/cygnet
http://www.ingermann.dk/cygnet

Hmm ... jeg tror det ville være lidt pænere at gøre det således:

Set conn = Server.CreateObject(\"ADODB.Connection\")
connString = \"Driver={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"database/db.mdb\")
conn.open connString
sql = \"UPDATA T_Counts SET count=count+1 WHERE ID=\"& request(\"ID\")
conn.execute(sql)

Så spare du lidt energi - både i linjer kode men absolut også i netwærk, processer og mindre locking af databasen.

Hmm... Har ikke lige tid til at kigge på det lige nu... Da jeg skal tid at med toget til Høvelte, og have endnu en uge mili sjov.. Men jeg kigger på det næste weekend...

jthyge