Gemme data hvert minut i DB

Jeg har et webtermometer hvor temperaturen skal gemmes i DB hvert minut.
Den bliver hentet med en socket.tcp connection. Scriptet ser således ud:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../db/db.mdb")
Conn.Open DSN

set Socket = Server.CreateObject("Socket.TCP")
Socket.Host = "62.107.48.130:80"
Socket.Open
Socket.SendLine("GET /Single1")
Socket.WaitForDisconnect
Result = Socket.Buffer
Socket.Close

str = Left(Socket.Buffer, len(Socket.Buffer)-1)

strSQL = "INSERT INTO T1 (tidspunkt, grad) values(Now(),'" & str & "')"
Conn.execute(strSQL)

Her bliver temperaturen lagret hver gang man opdaterer hvilket ikke er nok da vi skal lave et statistik site omkring den data der bliver lagret.