Internet • tsNetPostSync issues with AnythingLLM server document upload. (SOLVED)

CODE:

import requestsimport osapi_url = "http://localhost:3001/api/v1/document/upload"headers = {    "Authorization": "[My API Key]",    "accept": "application/json"}pdf_filename = "temp.pdf"files = {'file': open(pdf_filename, 'rb')}print(f"Sending files: {pdf_filename}")response = requests.post(api_url, headers=headers, files=files)if response.status_code == 200:    print("PDF successfully uploaded to the API.")else:    print(f"Failed. Status code: {response.status_code}, Response: {response.text}")

CODE:

command AI_AnythingLLM_File_Upload tInPathAndFile @tOutMessage @tOutResultCode @tOutFilename @tOutDocumentID @tOutResultMessage   ------------------------------------------------------------------   put "binfile:" & tInPathAndFile into tInBinPathAndFile   try      put URL tInBinPathAndFile into tFileContent   catch errorVariable      put "Error 1" into tOutResultCode      put "Could not Read file " & tInPathAndFile into tOutResultMessage      exit AI_AnythingLLM_File_Upload   end try   ------------------------------------------------------------------   put "Hello" into tFileContent   ------------------------------------------------------------------   set the itemdelimiter to "\"   put the last item of tInPathAndFile into tFilename   put tInPathAndFile into tInPath   delete the last item of tInPath   put "\" after tInPath   set the itemdelimiter to comma   ------------------------------------------------------------------   # API key and URL   # AnythingLLM API key   put "NH*******************DR65" into tApiKey //AnythingLLM   ------------------------------------------------------------------   put "http://localhost:3001/api/v1/document/upload" into tURLString   ------------------------------------------------------------------   -- Generate a unique boundary string   put "UniqueDataBoundary" & the ticks into tBoundary   ------------------------------------------------------------------   -- Construct the multipart/form-data body   put "" into tPostData  -- Initialize tPostData      put "--" & tBoundary & cr & ¬  -- Use cr instead of return   "Content-Disposition: form-data; name=" & quote & "file" & quote & "; filename=" & quote & tFilename & quote & cr & ¬   "Content-Type: text/csv" & cr & cr & ¬     tFileContent & cr & ¬   "--" & tBoundary & "--" & cr into tPostData    ------------------------------------------------------------------   -- Calculate the length of tPostData in bytes   put the length of tPostData into tContentLength   ------------------------------------------------------------------   -- Prepare headers   put "Content-Type: multipart/form-data; boundary=" & tBoundary & cr & ¬   "Content-Length: " & tContentLength & cr & ¬   "accept: application/json" & cr & ¬   "Authorization: Bearer " & tApiKey into tHeaders   ------------------------------------------------------------------   put tHeaders into tPrePostHeaders   ------------------------------------------------------------------   # Make the API call using TSNet   tsNetInit   put tsNetPostSync(tURLString, tHeaders, tPostData, tRecvHeaders, tResult, tBytes) into tData   tsNetClose   ------------------------------------------------------------------   put tResult into tOutResultCode   if tResult is not 200    then       put "--- Result ---" &return& "Could not upload file. Error code : " & tResult &return& "Data: " & tData &return& "RecvHeaders: " & tRecvHeaders &return&"--- Posted information ---" &return& "RequestString: " & tURLString &return&  "Headers: " & tHeaders &return& "PostData: " & tPostData into tOutResultMessage   else       put JSONtoArray(tData) into tResultArray      put tResultArray["textResponse"] into tOutResultMessage   end if   ------------------------------------------------------------------end AI_AnythingLLM_File_Upload

CODE:

-- Data between boundary      -- Boundary must start with --   and end with -- including the start boundar variable --        -- in PostData part every line must end with crlf      -- The data part in tPostData needs to start and end with crlf      put "--" & tBoundary & crlf & \              "Content-Disposition: form-data; name=~file~;filename=~"& tFilename & "~" & crlf & \            "Content-Type: text/csv" & crlf &\ // text/csv            crlf & tFileContent & crlf & \            "--" & tBoundary & "--" into tPostData       -- Prepare headers, in Headers do not use crlf but use lf      -- Also boundary needs to be the plain boundary string without the pre  --      put "Content-Type: multipart/form-data; boundary=" & tBoundary & lf & \              "accept: application/json" & lf & \            "Authorization: Bearer " & tApiKey into tHeaders

CODE:

 put repQ(tPostData,"~") into tPostData 

CODE:

function repQ pText,pQ   replace pQ with quote in pText   return pTextend repQ