Analisi di un documento con GPT

' Il seguente codice analizza un'immagine o un documento utilizzando GPT

dim path as string ' assegnare a questa variabile il percorso del file
dim domanda as string ' assegnare a questa variabile la specifica del tipo di analisi da fare sul documento. Se si desidera che venga ritornato un JSON, inserire "JSON" nella domanda e l'elenco dei campi da estrarre e di cosa devono contenere

if dbdollar(".jpg",lower(path)) or dbdollar(".png",lower(path)) or dbdollar(".jpeg",lower(path))
	' converte l'immagine in BASE64
    domanda+=ImageToBase64(path)
Else
    if dbdollar(".pdf",lower(path))
		' Effettua l'OCR
        PDFOcr(Parameter1,path,300,"ita")
    Else
        Path=path
    End If

    domanda+="dal seguente testo:"+vbCr+Search2_Extract_Text(path)
End If

Dim errmsg As String
dim risposta as string
OpenAIChatAsk(form.GetSession(),domanda,risposta,errmsg)

If Empty(errmsg)
    ' la variabile risposta contiene l'analisi effettuata, in formato JSON se la domanda contiene "JSON"
Else
    form.Alert(errmsg)
End If