Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]Foxtable服务端获取不到上传文件


  共有3505人关注过本帖树形打印复制链接

主题：[求助]Foxtable服务端获取不到上传文件
帅哥哟，离线，有人找我吗？
mxko
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00 		[求助]Foxtable服务端获取不到上传文件  发帖心情 Post By：2020/4/28 12:54:00 [只看该作者]

从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】
请大神们帮忙，非常感谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/4/28 14:23:00 [只看该作者]

e.SaveFile(key, fl ,ProjectPath & "web\test\" & key)  '保存接收到的文件
 回到顶部
帅哥哟，离线，有人找我吗？
mxko
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00 		  发帖心情 Post By：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】
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/4/28 14:42:00 [只看该作者]

e.SaveFile(key, fl ,ProjectPath & "web\test\" & fl )  '保存接收到的文件

 回到顶部
帅哥哟，离线，有人找我吗？
mxko
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00 		  发帖心情 Post By：2020/4/28 14:54:00 [只看该作者]

以下是引用有点蓝在2020/4/28 14:42:00的发言：
e.SaveFile(key, fl ,ProjectPath & "web\test\" & fl )  '保存接收到的文件
e.SaveFile(key, fl ,ProjectPath & "web\test\" & fl ) 
e.SaveFile(fl, fl ,ProjectPath & "web\test\" & fl ) 

这两种都试过了还是不行，都是没有看到文件

[此贴子已经被作者于2020/4/28 14:55:07编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/4/28 14:58:00 [只看该作者]

做个例子发上来测试

 回到顶部
帅哥哟，离线，有人找我吗？
mxko
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00 		  发帖心情 Post By：2020/4/28 15:39:00 [只看该作者]

以下是引用有点蓝在2020/4/28 14:58:00的发言：
做个例子发上来测试
这个是例子，能不能你们发个 网址给我，我提交数据给你们帮忙测试？
[此贴子已经被作者于2020/6/10 16:00:05编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/4/28 15:53:00 [只看该作者]

我没有对外的服务器，无法提供网址。如果是使用第三方的应用上传的文件。请提供可以测试的第三方应用程序

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：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
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：463 积分：3792 威望：0 精华：0 注册：2013/2/20 11:07:00 		  发帖心情 Post By：2020/4/28 16:02:00 [只看该作者]

是不是文件流的问题？

 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 4 次数据查询