To book an appointment call 020 8924 3296




 
<% Dim ClientIPAddress, ShopName, PageName, strSQL Set AdoConn = Server.CreateObject("ADODB.Connection") AdoConn.Open sConnectionS ClientIPAddress = Request.ServerVariables("REMOTE_ADDR") PageName = "Homepage" strSQL = "INSERT INTO NoOfHits (IPAddress, PageName) VALUES ('" & ClientIPAddress & "', '" & PageName & "')" AdoConn.Execute(strSQL) AdoConn.Close : Set AdoConn = NOTHING %>