J'ai un probleme avec ce script qui n'inscrit rien dans la BD ACCESS ???
<%'----Récupération des variables
vIP=Request.servervariables("REMOTE_ADDR")
if vIP="" then vIP="iconnue" end if
vnavigateur=Request.servervariables("HTTP_USER_AGENT")
if vnavigateur="" then vnavigateur="iconnue" end if
vlangue=Request.servervariables("HTTP_ACCEPT_LANGUE")
if vlangue="" then vlangue="inconnue" end if
vorigine=Request.servervariables("HTTP_REFERER")
if vorigine="" then vorigine="iconnue" end if
%>
<%
DSN_BASE = "DBQ=" & Server.Mappath("stats.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25"
Set ConnLot=Server.CreateObject("ADODB.Connection")
ConnLot.Open DSN_BASE
Set RsLot=Server.CreateObject("ADODB.Recordset")
SQL= "INSERT INTO TBLStats (IP, navigateur, langue, origine) values (' "&vIP&" ', ' "&vnavigateur&" ', ' "&vlangue&" ', ' "&vorigine&" ')"
Set RsLot=nothing
ConnLot.Close
Set ConnLot=nothing
%>
La BD est placé a la racine et les champs sont bien recopié(...)
Merci