Se i file stanno sul server genera le richieste HTTP dal server.![]()
Se i file stanno sul server genera le richieste HTTP dal server.![]()
Amaro C++, il gusto pieno dell'undefined behavior.
Ho trovato questo che sembra fare al caso mio.
Unico dubbio: come diavolo imposto "FormData"?
La spiegazione in inglese parla di "binary (VT_UI1 | VT_ARRAY)", ma io sono sinceramente spiazzato.
Grazie per la pazienza!
'sends multipart/form-data To the URL using WinHttprequest/XMLHTTP
'FormData - binary (VT_UI1 | VT_ARRAY) multipart form data
Function WinHTTPPostRequest(URL, FormData, Boundary)
Dim http 'As New MSXML2.XMLHTTP
'Create XMLHTTP/ServerXMLHTTP/WinHttprequest object
'You can use any of these three objects.
Set http = CreateObject("WinHttp.WinHttprequest.5")
'Set http = CreateObject("MSXML2.XMLHTTP")
'Set http = CreateObject("MSXML2.ServerXMLHTTP")
'Open URL As POST request
http.Open "POST", URL, False
'Set Content-Type header
http.setRequestHeader "Content-Type", "multipart/form-data; boundary=" + Boundary
'Send the form data To URL As POST binary request
http.send FormData
'Get a result of the script which has received upload
WinHTTPPostRequest = http.responseText
End Function
Ragazzi ragiono insieme a voi, questa funzione sembra essere utile per convertire i miei files e in qualche modo includerli nel "FormData". Mi sfugge ancora come. Che oggetto è sto formData?
In una chiamata semplice l'argomento del send sarebbe stato "param1=abc¶m2=def¶m3=ghi".
Io come lo setto invece?
ps: mi rendo conto che la discussione potrebbe essere diventata più da ASP, però magari il carattere generale del problema ne potrebbe ancora giustificare la permanenza qui? Altrimento forse è il caso di spostarla?
Function ReadBinaryFile(FileName)
Const adTypeBinary = 1
'Create Stream object
Dim BinaryStream
Set BinaryStream = CreateObject("ADODB.Stream")
'Specify stream type - we want To get binary data.
BinaryStream.Type = adTypeBinary
'Open the stream
BinaryStream.Open
'Load the file data from disk To stream object
BinaryStream.LoadFromFile FileName
'Open the stream And get binary data from the object
ReadBinaryFile = BinaryStream.Read
End Function