Newsgroup: it.comp.appl.access
Titolo: nordigen api estratto conto bancario

Buona sera, qualcuno ha mai usato le api di 
www.Nordogen.com
, per accedere all'estratto conto bancario, con access ?

 Buona sera, qualcuno ha mai usato le api di 
www.Nordogen.com
, per accedere all'estratto conto bancario, con access ?
 
 
se parli di queste
 
https://nordigen.com/en/account_information_documenation/integration/quickstart_guide/
 
 
no, ma da quel che leggo sono le solite api da gestire con get e post e 
relativo risultato json da tradurre
 
ma funziona con tutte le banche? mi pare strano
 
BFS

 
si da accesso a quasi 2500 banche europee in 31 paesi
crea in interfaccia comune  (  PSD2 )  , sembra gratuita per le operazioni principali . 

Dim xmlhttp As New MSXML2.XMLHTTP60
Dim strXml As String
Dim dtExecStart As Date
Dim dtExecEnd As Date
 
' Build request
xmlhttp.Open "POST", "
https://ob.nordigen.com/api/v2/agreements
", False
xmlhttp.setRequestHeader "Content-Type", "application/json"
xmlhttp.setRequestHeader "Accept", "application/json"
xmlhttp.Send "{""key"": ""YOUR_API_KEY_HERE"",""enduser_id"": ""USER_ID_HERE""}"
 
' Retrieve response
strXml = xmlhttp.responseText
 
' Process the response
'Do something with strXml
 
' Cleanup
Set xmlhttp = Nothing

 crea in interfaccia comune  (  PSD2 )  , sembra gratuita per le operazioni principali .
 
 
provate
ho generato il secret_key e il secret_id sul sito
da quello il token con questa funzione se può servirti
 
 
Public Function CreaToken(secret_id As String, secret_key As String) As 
String
Dim Ris As Object
Dim objXMLHTTP As Object
Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP.6.0")
Dim sUrl As String
sUrl = "
https://ob.nordigen.com/api/v2/token/new/
"
Dim sPostData As String
sPostData = "{'secret_id':'" & secret_id & "','secret_key':'" & 
secret_key & "'}"
 
With objXMLHTTP
     .Open "POST", sUrl, False
     .setRequestHeader "Content-Type", "application/json"
     .setRequestHeader "accept", "application/json"
     .send (Replace(sPostData, "'", """"))
     Set Ris = ParseJSON(.responseText)
     ListPaths Ris
 
     If Ris.Item("obj.access") <> "" Then
 
         CreaToken = Ris.Item("obj.access")
         Else
         CreaToken = "errore"
         Debug.Print .responseText
         Exit Function
     End If
End With
 
Set objXMLHTTP = Nothing
 
End Function
 
 
con il token ottenuto si tratta di chiamare le varie API
ma mi fermo perchè mi chiede di associare le credenziali della mia banca...
non mi fido..pur essendoci la possibilità di mettere un filtro per ip
 
se tu vai oltre magari facci sapere se funziona bene
 
BFS
 
 
 
 
 
 
 
 
 

la prova si può fare con il conto di test SANDBOXFINANCE_SFIN0000 
https://nordigen.com/en/account_information_documenation/integration/sandbox/
 
 
la prima parte  l'avevo già completata, il problema si pone quando restituisce il link ad una pagina web  per autenticarsi e
 dopo ad una pagina web locale per accedere ai dati
 
 
 


non ti basta aprire nel browser il link che l'api restituisce?
 

Il 30/03/2023 11:16, shado gps ha scritto:

non vedo problemi
arrivo alla generazione del link..lo apro nel browser
e ottengo questo
 
https://i.imgur.com/xLiKLwt.png
 
 
Accetto
 
e mi esce:
 
https://i.imgur.com/GOPVXEf.png
 
 
approvo e vengo rimbalzato sul sito di uscita passato nel postdata
 
e ora posso usare le api gratuite per interrogare il conto di prova
 
BFS