<%@ 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: Social News bit: Facebook Expands "Connect" app<% if inStr(Path,"/labels") > 0 then %>: <%=Page%><%end if%>

 

Social News bit: Facebook Expands "Connect" app

October 2
Facebook announced expansions to its Facebook Connect application this week, introducing the Facebook Connect Wizard, which will make it simpler for non-developers to add the service to their sites. Additionally, it announced Translations for Facebook Connect, a language translation service capable of working in 65 different languages, and Playground for Facebook Connect, which provides code samples with which site owners can experiment with Connect's integration capabilities.

Facebook continues its march towards total Web takeover (positioning its Translations as a competitor to the Google language tool), and making Facebook Connect more accessible to companies and websites that don't employ large developer teams will allow smaller businesses to increase their social media presence by building communities of Facebook users and helping them interact with the company and with one another.

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