| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]Foxtable服务端获取不到上传文件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=149299) |
||
| -- 作者：mxko -- 发布时间：2020/4/28 12:54:00 -- [求助]Foxtable服务端获取不到上传文件 从android前端上传的文件在 服务端获取不到，但又执行到里面去了 代码如下： For Each key As String In e.Files.Keys For Each fl As String In e.Files(key) FileSys.WriteAllText("D:\\log.Txt","--key|【" & key & "】【" & ProjectPath & "web\\test\\" & key & "】" & vbcrlf ,True) FileSys.WriteAllText("D:\\log.Txt","--fl|【" & fl & "】【" & ProjectPath & "web\\test\\" & fl & "】" & vbcrlf ,True) e.SaveFile(key,key,ProjectPath & "web\\test\\" & key) \'保存接收到的文件 Next Next ====结果=== --key|【file1】【D:\\web\\test\\file1】 --fl|【magazine-unlock-01-2.3.4162-_8662ADE718A43AE3AFAAB72E68D8276E.jpg】【D:\\web\\test\\magazine-unlock-01-2.3.4162-_8662ADE718A43AE3AFAAB72E68D8276E.jpg】 请大神们帮忙，非常感谢谢！ |
||
| -- 作者：有点蓝 -- 发布时间：2020/4/28 14:23:00 -- e.SaveFile(key, fl ,ProjectPath & "web\\test\\" & key) \'保存接收到的文件 |
||
| -- 作者：mxko -- 发布时间：2020/4/28 14:39:00 -- 以下是引用有点蓝在2020/4/28 14:23:00的发言：
e.SaveFile(key, fl ,ProjectPath & "web\\test\\" & key) \'保存接收到的文件 已经改了也是一样不可以 跟踪到的提交代码如下： Headers:--------------- Connection = keep-alive Content-Length = 440332 Content-Type = multipart/form-data; boundary=----NoHttpFormBoundaryg6Ij0Lm3Op6 Accept = application/json Accept-Encoding = gzip, deflate Accept-Language = zh-CN,zh Host = 192.168.1.168:8080 User-Agent = Mozilla/5.0 (Linux; U; Android 9; zh-cn; HWI-TL00 Build/HUAWEIHWI-TL00) AppleWebKit/533.1 (KHTML, like Gecko) Version/5.0 Mobile Safari/533.1 Headers:--------------- host=192.168.1.168 port=8080 path=procedure_file.htm HttpMethod=POST poststring= ip=192.168.1.130 getValues:--------------- postValues:--------------- name=nohttp age=18 file1 上传1个文件,分别是: magazine-unlock-01-2.3.4162-_B96214103A51DB237E3129BD670120D3.jpg ====结果还是一样===== 2020-04-28 14:37:48[admin|]--key|【file1】【D:\\HttpServer\\web\\test\\file1】 2020-04-28 14:37:48[admin|]--fl|【magazine-unlock-01-2.3.4162-_B96214103A51DB237E3129BD670120D3.jpg】【D:\\HttpServer\\web\\test\\magazine-unlock-01-2.3.4162-_B96214103A51DB237E3129BD670120D3.jpg】 |
||
| -- 作者：有点蓝 -- 发布时间：2020/4/28 14:42:00 -- e.SaveFile(key, fl ,ProjectPath & "web\\test\\" & fl ) \'保存接收到的文件 |
||
| -- 作者：mxko -- 发布时间：2020/4/28 14:54:00 -- 以下是引用有点蓝在2020/4/28 14:42:00的发言： e.SaveFile(key, fl ,ProjectPath & "web\\test\\" & fl ) \'保存接收到的文件
[此贴子已经被作者于2020/4/28 14:55:07编辑过]
|
||
| -- 作者：有点蓝 -- 发布时间：2020/4/28 14:58:00 -- 做个例子发上来测试 |
||
| -- 作者：mxko -- 发布时间：2020/4/28 15:39:00 -- 以下是引用有点蓝在2020/4/28 14:58:00的发言：
做个例子发上来测试 这个是例子，能不能你们发个 网址给我，我提交数据给你们帮忙测试？
[此贴子已经被作者于2020/6/10 16:00:05编辑过]
|
||
| -- 作者：有点蓝 -- 发布时间：2020/4/28 15:53:00 -- 我没有对外的服务器，无法提供网址。如果是使用第三方的应用上传的文件。请提供可以测试的第三方应用程序 |
||
| -- 作者：有点蓝 -- 发布时间：2020/4/28 15:57:00 -- 我这样测试是可以正常接收文件的 Dim wb As New weui Dim e As Object = Args(0) Functions.Execute("_0_RequestLog",e) e.Response.AddHeader("Access-Control-Allow-Origin", "*") e.Response.AddHeader("Access-Control-Allow-Headers", "Content-Type,Content-Length,Authorization,Accept,X-Requested-With") e.Response.AddHeader("Access-Control-Allow-Methods", "PUT,POST,GET,DELETE,OPTIONS") Select Case e.Path Case "test" wb.AddForm("","form1","procedure_file.htm") With wb.AddInputGroup("form1","ipg1","增加员工") .AddInput("姓名","姓名","Text") \'前一个"姓名"是ID,后一个"姓名"是标题 .AddInput("年龄","年龄","number") .AddSelect("学历","学历","大专|本科|硕士|博士") .AddUploader("up1","照片",True) \'True表示允许上传多个文件 End With With wb.AddButtonGroup("form1","btg1",True) .Add("btn1", "确定", "submit") End With e.WriteString(wb.Build) Case "procedure_file.htm" \'执行存储过程含批量上传文件 Functions.Execute("_wExecProcedureFile",e) End Select |
||
| -- 作者：mxko -- 发布时间：2020/4/28 16:02:00 -- 是不是文件流的问题？ |