% '--- SEGNO L' INDIRIZZO IP --- ip = request.servervariables("REMOTE_ADDR") '--- SEGNO IL REFERER DI PROVENIENZA --- referer = request.servervariables("HTTP_REFERER") '--- SEGNO LO USERAGENT PER VEDERE IL BWS E IL S.O. useragent = request.servervariables("HTTP_USER_AGENT") wap = Request.ServerVariables("HTTP_ACCEPT") ' BETA VERSION PER VEDERE SE E' UN CELL '--- FINE PARTE FUNCTION E SUB Sistema = os(useragent) browver = BWS(useragent) Set conn = Server.CreateObject("ADODB.Connection") conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/zstat.mdb") Set rs = Server.CreateObject("ADODB.Recordset") '--- SCRIVO LA TABELLA GENERALE sql= "Select * from generale" rs.Open sql, conn, 3, 3 rs.addnew rs.fields("data") = formattadata(date()) rs.fields("ora") = formattaora(now()) rs.fields("ip") = ip rs.fields("referer") = referer rs.fields("pagina") = request.servervariables("SCRIPT_NAME") rs.fields("useragent") = useragent if Sistema <> 12 then rs.fields("osok") = true 'SEGNO CHE HO TROVATO CON SUCCESSO IL S.O. if browver <> 9 then rs.fields("bwok") = true 'SEGNO CHE HO TROVATO CON SUCCESSO IL BWS. rs.update rs.close sql = "select id,visite from os where id like '"& Sistema &"'" rs.Open sql, conn, 3, 3 rs.fields("visite") = rs.fields("visite") + 1 rs.update rs.close sql = "select id,visite from bw where id like '"& browver &"'" rs.Open sql, conn, 3, 3 rs.fields("visite") = rs.fields("visite") + 1 rs.update rs.close Call ScriviOra() Call ScriviKey(referer) Call ScriviReferer(referer) '--- libero risorse conn.close set rs = nothing set conn = nothing %>
| Politica
del sito e trattamento dei dati personali |
|||
|
Varisco & C. srl pone la massima attenzione alle esigenze di protezione dei dati personali che le vengono affidati dai propri clienti. Dispone di linee guida aziendali per applicare in tutta l'organizzazione le prescrizioni normative in materia di tutela dei dati personali, con particolare riferimento a quanto disposto dall'art.15 della Legge 675/96 in materia di sicurezza dei dati. Raccolta delle informazioni sul sito L'autenticazione sull'area clienti del sito Varisco & C. srl non prevede l'utilizzo dei cookies quindi non vi è registrazione di alcun dato atto a tracciare la navigazione degli utenti o per raccogliere i loro dati personali. A soli fini statistici,
per avere informazioni sul numero complessivo di accessi al sito,
vengono registrati e valutati in maniera aggregata gli indirizzi
IP degli utenti che accedono alle pagine del sito. |
|||