• Super User

    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


  • Super User

    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


  • Super User

    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 ❌x❌x❌x:x


  • Super User

    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