<%@ 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: Google Toolbar's Share Feature<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

 

Google Toolbar's Share Feature

Are you aware of the sharing feature on the Google Toolbar? Added in December 2009, this feature allows web surfers to share content on social networking sites such as Facebook, Twitter and MySpace. Additionally, surfers can use the tool to share content on blogs and through e-mail.


After users select where they would like to share information, a pop-up enables them to post the selected content to a social networking site, blog or e-mail.


Here is an example of what the content looks like posted on a Facebook wall:

Labels: ,

1 Comments:

Anonymous nintendo ds r4 card said...

With support for live feeds and custom site search, Google toolbar custom buttons are more than just bookmarks.

February 9, 2010 at 4:39 AM  

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