Hello all,

I am looking for a module that makes it possible to count the hits to a link of the following form:

http://www.mysite.com/something.aspx?ID=XYZ

and redirects afterwards to a common location :

http://www.mysite.com

What I would like is to identify with XX the recipients of a mailing, so that I might know who of the recipients has clicked on the link in the mail.

See what I mean?

Thanks for any indication!

Regards,

Fabian

Hi skinjerski,

thanks a lot for this hint.

I checked the feature list and decided that this module was "too powerfull" for what I need. So I wrote my own "LinkTracker".

Thanks !

Regards,
Fabian

Hello Eric,

in fact I did not create a module, but simple wrote an independent application. The idea is very simple :

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Try
Dim ___LinkTracker As New LinkTracker
___LinkTracker.ContactID = Request.QueryString("contactid")
___LinkTracker.RequestUrl = Request.Url.OriginalString
___LinkTracker.IP = Request.UserHostAddress
___LinkTracker.Moment = Now
___LinkTracker.TargetUrl = Request.QueryString("targeturl")

'this is my custom made persistency system - you would have to write the object to the db
Library.Percistency.PersistencyDriver.UpdateObject(___LinkTracker)
Catch ex As Exception

Finally
Dim TargetUrl As String = Request.QueryString("targeturl")
If TargetUrl <> "" Then
Response.Redirect(Request.QueryString("targeturl"))
Else
Response.Redirect("http://www.yourdomain.com")
End If
End Try
End Sub
End Class

Public Class LinkTracker
Private _ID As Integer
Private _ContactID As String
Private _RequestUrl As String
Private _TargetUrl As String
Private _Moment As Date
Private _IP As String
Public Property ID() As Integer
Get
Return _ID
End Get
Set(ByVal value As Integer)
_ID = value
End Set
End Property
Public Property ContactID() As String
Get
Return _ContactID
End Get
Set(ByVal value As String)
_ContactID = value
End Set
End Property
Public Property RequestUrl() As String
Get
Return _RequestUrl
End Get
Set(ByVal value As String)
_RequestUrl = value
End Set
End Property
Public Property TargetUrl() As String
Get
Return _TargetUrl
End Get
Set(ByVal value As String)
_TargetUrl = value
End Set
End Property
Public Property Moment() As Date
Get
Return _Moment
End Get
Set(ByVal value As Date)
_Moment = value
End Set
End Property
Public Property IP() As String
Get
Return _IP
End Get
Set(ByVal value As String)
_IP = value
End Set
End Property
End Class

Hope this will help you.

Regards,
Fabian