<%@ 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 Lunch n' Learn: Blogging<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

 

Overdrive Lunch n' Learn: Blogging

posted by Danielle Farber @ Friday, February 19, 2010 - 4:36 PM
Today’s lunch hour at Overdrive was one of learning, laughing and blogging. The employees at Overdrive gathered over sandwiches to talk about the importance of blogging, to share blogging tactics and concepts, as well as give encouragement to our peers that we all have something valuable to share through the Overdrive Blog.

Overdrive Interactive - Lunch N' Learn - Feb 2010

The presentation included games and interactive presentations, as it was lunch hour after all. We gathered in groups of three to complete a madlibs hand out about our office cubicals (this included jogging our memories about the definition of adjectives and superlatives).

Overdrive Interactive - Lunch N' Learn - Feb 2010

Not only did the activity elicit entertaining presentations, but it also got us thinking about content in a new light. We all read the same news every day, but we all have different opinions about what we read and what we take away from particular articles. This segued into our presentation of generating content and forming opinions about news articles relevant to the marketing industry.

Lunch n’ Learning wouldn’t be complete without a homework assignment. Employees left with a new topic for their next blog post, so stay tuned!

Happy Friday from Overdrive Interactive!

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