devo riuscire a scaricare automaticamente una serie di file in un sito con HTTPS. Oltre all'https classico c'è anche un discorso di firma digitale. Infatti quando apro il browser, mi appare una finestrella con su scritto: "scelta del certificato digitale"
Io lo seleziono ed accedo.
Da VB non riesco ad accedere ed il file non me lo tira giu', credo perchè l'autenticazione non sia avvenuta.
Avevo trovato una procedure che dunziona perfettamente per il download di file non sotto HTTPS.
Ho provato a modificare le proprietà del controllo inet, impostando HTTPS come protocol pero' non va... c'è ancora il problema della firma digitale... qualcuno sa darmi qualche dritta? esiste un controllo studiato per questo tipo di accessi?
segue il semplicissimo codice utlizzato:
codice:
Private Sub Command1_Click()
Dim buffer() As Byte
Dim FileNR As Integer
buffer = AccessoInternet.OpenURL "https://www.pippo.it/file.txt", icByteArray)
FileNR = FreeFile
Open App.Path & "\TMP" For Binary As FileNR
Put FileNR, , buffer
Close FileNR
On Error Resume Next
Immagine.Picture = LoadPicture("")
Immagine.Picture = LoadPicture(App.Path & "\TMP")
'Kill App.Path & "\TMP"
End Sub