Statistik side der kaldes via html i nyhedsbrev
jeg vil gerne føre statistik over hvem der åbner mit nyhedsbrev. og har prøvet at gøre det som nedenstående der ikke virker. så jeg kører statistik hver gang html'en bliver hentet.jeg kalder en side i mit html nyhedsbrev sådan:
<img src="http://www.because.dk/newsletter_stats.asp?Link=Opened&Modtager=Michael&URL=www.gutternes.dk">
min kode der skal oprette i databasen ser sådan ud:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/because.asp" -->
<%
'Undgå for mange scriptlimiters (<% ), de har det med at sløve scriptet!
SetLocale(1030)
Set rsNyhedsbrev = Server.CreateObject("ADODB.Recordset")
rsNyhedsbrev.ActiveConnection = MM_because_STRING
'Undgaa *, vi skal kun bruge id, så derfor nøjes vi med id!
rsNyhedsbrev.open("SELECT IDnyhedsbrev FROM nyhedsbrev ORDER BY IDnyhedsbrev DESC")
nyhedsbrevID = (rsNyhedsbrev.Fields.Item("IDnyhedsbrev").Value)
'Luk basen med det samme!
rsNyhedsbrev.Close()
Set rsNyhedsbrev = Nothing
'Ingen grund til at definere date og time her... Det gør vi i sql'en
link = Request.Querystring("Link")
receiver = Request.Querystring("Modtager")
url = Request.Querystring("URL")
Set rsInsert = Server.CreateObject("ADODB.Recordset")
rsInsert.ActiveConnection = MM_because_STRING
'husk at smide dine værdier ind i sql'en...
insert = "INSERT INTO statistikTEST (newsletterID, Link, StatDate, StatTime, Receiver, URL) VALUES (" & nyhedsbrevID & ", '" & link & "', '" & date() & "', '" & time() & "', '" & receiver & "', '" & url & "')"
rsInsert.open(insert)
'rsInsert.Close()
Set rsInsert = Nothing
'Response.Redirect(url)
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<img src="http://www.gutternes.dk/images/top_vip.jpg"></body>
</html>
