<%@ 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: Overdrive Launches Facebook Application for Boston.com<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

Overdrive Services

Archives

  

Overdrive Launches Facebook Application for Boston.com

posted by Bill Holmes @ Monday, June 22, 2009 - 8:17 PM

Greetings Everyone,

It is with much pride to announce that Overdrive's first Facebook application is ready for use. Built for Boston.com, the application showcases their Globe 10.0 daily video series and allows users to comment on the videos. Perfect for the New England Sports Nut in all of us!

In addition to the comment system, users can also vote up or down good/bad comments a la Digg. At the end of the month, the user with the most positive votes will win a gift card to The Globe Store or other fabulous prizes.

We've also included the sports feed from The Boston Globe which links to the day's sports headlines.

To find the application, search "Globe 10.0" on Facebook or go to
http://apps.facebook.com/boston-globe-ten

Feel free to add the application to your profile, send it to friends, and join the conversation.

Overdrive completely developed this application in-house, and it represents the first of what we hope to be many more Facebook/Social Media applications to come. If your company is interested in Overdrive building a world class application for your business, please contact us.


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.