主要图片不好上传，vb可以用ado.stream和StrConv(S1, vbFromUnicode) 和leftB(),但vfp不行.
哪位大神帮下！

[此贴子已经被作者于2023-6-4 14:22编辑过]

------WebKitFormBoundaryAx0QwuMECh2eIreV
Content-Disposition: form-data; name="jobNo"

022289
------WebKitFormBoundaryAx0QwuMECh2eIreV
Content-Disposition: form-data; name="fileItemName"; filename="人脸.jpg"
Content-Type: application/octet-stream
Content-Transfer-Encoding: binary

<<filrtostr(x)>>
------WebKitFormBoundaryAx0QwuMECh2eIreV--


send(createbin(...))
返回↓

Array
(
    [flag] =>
    [message] => 上传失败:Bogus Huffman table definition `D:/www/pics/101/yc/100/008/65_1V20MQ.jpg' @ error/jpeg.c/JPEGErrorHandler/347#0 D:\www\web\imgServerYuanli\protected\controller\UploadController.php(712): Imagick->__construct('D:/www/pics/101...')
#1 D:\www\web\imgServerYuanli\protected\controller\UploadController.php(41): UploadController->checkinUpload2()
#2 D:\www\web\imgServerYuanli\dooFrame\app\DooWebApp.php(85): UploadController->serviceAction()
#3 D:\www\web\imgServerYuanli\dooFrame\app\DooWebApp.php(34): DooWebApp->route_to()
#4 D:\www\web\imgServerYuanli\index.php(27): DooWebApp->run()
#5 {main}
    [url] => /101/yc/100/008/65_1V20MQ.jpg
    [ret] => -1
)
Array
(
    [jobNo] => 022289
)
Array
(
)

jonNo 传上了，图没有

Boundary= "----WebKitFormBoundaryAx0QwuMECh2eIreV"

TEXT TO cData TEXTMERGE NOSHOW PRETEXT  3
--<<Boundary>>
Content-Disposition: form-data; name="jobNo"

<<"022289">>
--<<Boundary>>
Content-Disposition: form-data; name="fileItemName"; filename="<<LOWER(cFileName)>>"
Content-Type: image/jpg

<<filetostr(cfile)>>
--<<Boundary>>--

ENDTEXT
cData=CREATEBINARY(cData)

objHTTP = CREATEOBJECT("MSXML2.XMLHTTP")
objHTTP.Open("POST", strWebserviceURL, 0)
objHTTP.setRequestHeader("content-type", "multipart/form-data; boundary="+Boundary+";")  

objHTTP.Send(  cData  )

cData = CREATEBINARY(cData)+ CREATEBINARY(FILETOSTR(cFileName))
cData = cData +  CREATEBINARY(0h0D0A+"--"+Boundary+"--"+0h0D0A)

以上成功了，感恩大师
你加的0h0D0A什麼意思？
Array
(
    [flag] =>
    [message] => 上传成功
    [url] => /101/yc/100/008/68_I2V25A.jpg
    [ret] => 1
)
Array
(
    [jobNo] => 022289
)
Array
(
)

奇怪为何《》赋值就不行

可能text 对文件处理了或裁了一部分