<%@ 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: Spring Potluck 2009<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

 

Spring Potluck 2009

posted by Laura Ragno @ Friday, May 15, 2009 - 9:45 AM
It was a bittersweet Potluck Lunch - last one at our Leo Birmingham Parkway location! Competition was fierce but thankfully everyone brought their A-game.

Setting up...the anticipation is building!
Fruits of our labor! All our client names were listed on the flags...brilliant!
Meryl recreated the garage in our office - very impressive! Complete with Austin Powers, and all.
Dig in!
And the awards go to...
Dan/Shane - best last minute dish (delivery is the way to go sometimes...)
David - best stomach satisfying dish (rum cake with homemade chocolate sauce)
Meryl - best 46 Leo Birmingham Parkway theme (see picture above for full effect)
Laura - best use of a condiment (chocolate frosting is considered a condiment around here)
Ra - best presentation AND most nutritious dish (fruit salad - see above for full effect)


To see more pictures, view them on our Facebook Page at: www.overdriveinteractive.com/facebook.

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 %>