<%@ Language=VBScript %> <% BaseURL="http://www.ovrdrv.com" Path=Trim(lcase(Request.ServerVariables("Path_Info"))) nP=InStrRev(Path, "/") if nP > 0 then Page = lcase(mid(Path, nP + 1)) section="" end if %> Overdrive Online Marketing Blog: Spreading Holiday Cheer<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

Overdrive Services

Archives

  

Spreading Holiday Cheer

posted by Barb @ Friday, December 19, 2008 - 2:35 PM
TV holiday ads such as the ever-popular (and frequently aired) Kay Jewelers signify for me the start of the holiday season. So as advertisers turn their marketing efforts from traditional advertising to online advertising, advertisers have turned to viral ads to spread holiday cheer, and their brand. I read an article today on PromotionWorld.com, which list the five best viral holiday campaigns of the year.

As the article points out, what makes a viral ad campaign so successful is providing a connection between the user and the ad, providing a unique brand experience through the creative content, and the ability to spread the ad to their friends. However, a successful viral campaign is more than just adding a grab-it feature to the ad unit. As the author points out, an ad is more likely to spread through personalization techniques, such as adding your picture to a dancing elf, just as Office Max has done. Here are some examples of this year’s viral holiday campaigns. Happy Holidays!

5. The Buddy Group’s Naughty Mrs. Claus
4. X-Box’s Holiday Gift Influencer
3. Simon Sez Santa 2.0
2. Office Max’s ElfYourself
1. Disney’s Personalized Video Message From

Labels: , , , ,

0 Comments:

Post a Comment

Subscribe to Post Comments [Atom]

<< Home

Blog Search

 

RSS Feeds

 Atom
 RSS

Subscribe to Overdrive eMarketing Blog by Email





Delivered by FeedBurner

Categories

<% '-- add your label directory here labelDir = "m:\web\users\V029U45EBY\html\ovrdrv\blog\labels\" '-- Check for Directory Set FSO = Server.CreateObject("Scripting.FileSystemObject") If FSO.FolderExists(labelDir) Then Response.Write "
    " Set labelFolder = FSO.GetFolder(labelDir) Set labelBlogs = labelFolder.Files For each label in labelBlogs Set labelFile = FSO.GetFile(label) Set labelStream = labelFile.OpenAsTextStream (1, -2) iLabelCount = -1 '-- Read the file line by line Do While Not labelStream.AtEndOfStream Line = labelStream.readline LineCount = Sgn(InStr(Line,"blogger-labels")) iLabelCount = iLabelCount + LineCount Loop Response.Write "
  • " + Replace(labelFile.Name,".asp","") & " (" + CSTR(iLabelCount) & ")
    • " Set labelStream = nothing Set labelFile = nothing Next Response.Write "
" Else Response.Write "

No labels in folder: " & labelDir & "

" End If Set FSO = nothing %>
Blog Home  |  Social Media Map  |  Schedule a Seminar  |  eMarketing Blog  |  Contact Bloggers  |  © 2002-<%=Year(Date)%> Overdrive. All Rights Reserved.