NET Link Tracker
DeleteExpiredLinks Method (LinkLogic)
Example 



KellermanSoftware.NetLinkTracker Namespace > LinkLogic Class : DeleteExpiredLinks Method
Delete all expired links based on the date, request count, or maximum IP Addresses
Syntax
'Declaration
 
Public Function DeleteExpiredLinks() As Integer
'Usage
 
Dim instance As LinkLogic
Dim value As Integer
 
value = instance.DeleteExpiredLinks()
public int DeleteExpiredLinks()
public:
int DeleteExpiredLinks(); 
Example
LinkLogic linkLogic = new LinkLogic(); //Trial Mode
LinkLogic linkLogicLicensed = new LinkLogic("place user name here", "place license key here");  //License Mode
 
//Use a in memory mock database for testing
ILinkTrackerDatabaseLogic databaseLogic = new LinkTrackerMockDatabase();
 
linkLogic.DatabaseLogic = databaseLogic;
 
//Create a link to a URL that will expire in 30 days
TrackedLink createdLink = linkLogic.CreateExpiringUrl("http://www.google.com", 30);
 
TrackedLink link = linkLogic.GetLinkByGuid(createdLink.LinkGuid);
LinkStatus status = linkLogic.CheckLinkStatus(link);
 
//The status will be Active
Console.WriteLine("Status: " + status);
 
//Get a friendly status for the user
Console.WriteLine("Friendly Status: " + linkLogic.GetFriendlyStatus(link));
 
//Force the link to expire
link.ExpirationDate = DateTime.Now.AddDays(-1);
databaseLogic.SaveTrackedLink(link);
 
//Delete all expired links
linkLogic.DeleteExpiredLinks();
 
//This will be zero
Console.WriteLine("Number of links: " + linkLogic.DatabaseLogic.GetAllTrackedLinks().Count);
Dim linkLogic As New LinkLogic() 'Trial Mode
Dim linkLogicLicensed As New LinkLogic("place user name here", "place license key here") 'License Mode
 
'Use a in memory mock database for testing
Dim databaseLogic As ILinkTrackerDatabaseLogic = New LinkTrackerMockDatabase()
 
linkLogic.DatabaseLogic = databaseLogic
 
'Create a link to a URL that will expire in 30 days
Dim createdLink As TrackedLink = linkLogic.CreateExpiringUrl("http://www.google.com", 30)
 
Dim link As TrackedLink = linkLogic.GetLinkByGuid(createdLink.LinkGuid)
Dim status As LinkStatus = linkLogic.CheckLinkStatus(link)
 
'The status will be Active
Console.WriteLine("Status: " & status)
 
'Get a friendly status for the user
Console.WriteLine("Friendly Status: " & linkLogic.GetFriendlyStatus(link))
 
'Force the link to expire
link.ExpirationDate = Date.Now.AddDays(-1)
databaseLogic.SaveTrackedLink(link)
 
'Delete all expired links
linkLogic.DeleteExpiredLinks()
 
'This will be zero
Console.WriteLine("Number of links: " & linkLogic.DatabaseLogic.GetAllTrackedLinks().Count)
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

LinkLogic Class
LinkLogic Members