VBScript

Referencing a Pre-Uploaded Image File by file_id in an AI Request

See more AI Examples

Currently, OpenAI is the only AI provider that supports referencing a pre-uploaded image in a request for text generation. VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

success = 0

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set ai = CreateObject("Chilkat.Ai")

' OpenAI is currently the only AI provider that supports referencing a pre-uploaded image by file_id
' in a request for text generation.
ai.Provider = "openai"

' Use your provider's API key.
ai.ApiKey = "MY_API_KEY"

' Choose a model.
ai.Model = "gpt-5-mini"

' See the following example showing how to upload a file
' Upload an Image File to an AI Provider

' Use the file_id of the pre-uploaded file.
file_id = "file-5CnBeuFasqNcAfti3cx4Fe"
success = ai.InputAddImageFileId(file_id,"application/json")

success = ai.InputAddText("What is in this image?")

' Ask the AI for text output.
success = ai.Ask("text")
If (success = 0) Then
    outFile.WriteLine(ai.LastErrorText)
    WScript.Quit
End If

' Get the text response.
set sbResponse = CreateObject("Chilkat.StringBuilder")
success = ai.GetOutputTextSb(sbResponse)
outFile.WriteLine(sbResponse.GetAsString())

outFile.Close