<%@ 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 Interactive Attends BIMA Charity Gala<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

Overdrive Services

Archives

  

Overdrive Interactive Attends BIMA Charity Gala

posted by Laura Ragno @ Friday, December 5, 2008 - 11:05 AM
Last night, a group of us from Overdrive attended the 8th Annual BIMA Charity Gala/Holiday Party sponsored by Microsoft at the Boston Park Plaza.

The gala held a silent auction that benefits the Boys & Girls Clubs of Boston. The charitable group helps young people, especially those most in need, build strong character and realize their full potential as responsible citizens and leaders. To learn more or find out how you can help, click here. Thanks BIMA; looking forward to next year's party!
The New Biz team:
Ty & Bill with festive attire:The lovely ladies of Overdrive:Bill and Mike didn't go home empty-handed; way to support the cause!

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.