Pubblicare link in automatico su facebook

bino1979

Pubblicare link in automatico su facebook

Salve, dato un sito di un mercatino dell'usato e la sua pagina su facebook, c'è un modo per pubblicare automaticamente un link o altro sulla pagina facebook??o

Cioè, se inserisco un nuovo prodotto o post nel blog questi può essere pubblicato in automatico su facebook?..non so se sono stato chiaro ...spero di si

bino1979

Ho trovato questo, ma oltre a non farmi specificare dove deve pubblicare, mi da errore
http://www.aspsnippets.com/Articles/Upload-Post-Photo-Image-to-FaceBook-Wall-using-Graph-API-in-ASPNet.aspx

Ps ho anche creato l'app web, forse dove deve pubblicare lo dovrei inserire li??

l'errore che mi da è il seguente

Invalid Scopes: publish_stream. This message is only shown to developers. Users of your app will ignore these permissions if present. Please read the documentation for valid permissions at: https://developers.facebook.com/docs/facebook-login/permissions

bino1979

Nel link sopra c'è un errore dovuto ad un aggiornamento di fb

Il codice giusto dell'ultima riga è FaceBookConnect.Authorize("user_photos,publish_actions", Request.Url.AbsoluteUri.Split("?"c)(0))

PErò il codice sopra fa pubblicare solo foto in un album e sul mio profilo.

Io invece devo pubblicare sulla pagina del mercatino di cui sono amministratore .... help help help xxx:x

bino1979

Niente, creata un app web alla pagina https://developers.facebook.com

con il seguente codice posso pubblicare sulla mia bacheca ma non la pagina fan della mia attività.

Imports ASPSnippets.FaceBookAPI
Imports System.Collections.Generic

Public Class tfbpost
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    FaceBookConnect.API_Key = "xxxxxxxxxxxxx"
    FaceBookConnect.API_Secret = "xxxxxxxxxxxxxx"
    If Not IsPostBack Then
        Dim code As String = Request.QueryString("code")
        If Not String.IsNullOrEmpty(code) Then
            ViewState("Code") = code
            pnlPost.Enabled = True
            'btnAuthorize.Enabled = False
        End If
    End If
End Sub


Protected Sub Authorize(ByVal sender As Object, ByVal e As EventArgs)
    FaceBookConnect.Authorize("publish_actions", Request.Url.AbsoluteUri)
End Sub




Protected Sub Post(ByVal sender As Object, ByVal e As EventArgs)
    Dim data As Dictionary(Of String, String) = New Dictionary(Of String, String)
    data.Add("link", "http://www.portobellocatanzaro.it/prodotto.aspx?nome=prezzoperelettrodomesticotest221181")
    data.Add("picture", "http://www.portobellocatanzaro.it/public/201591122458.jpg")
    data.Add("caption", "caption")
    data.Add("name", "Nome")
    data.Add("message", "Pubblicazione in auto per test Portobello")
    FaceBookConnect.Post(ViewState("Code").ToString, "me/feed", data)
End Sub