4

我最近开始为我大学的一个项目创建一个使用 F# 和 Suave 的网站。我需要做的一件事是让用户通过网站上传文件,然后我将对其进行解析。

我现在拥有的是

let post =
   let ``process`` httpRequest =
      use reader = File.OpenText httpRequest.files.Head.tempFilePath
      // do parsing and save to database
   request ``process``

在我的 HTML 中,我有一个简单的表单

<form action="/parse" method="POST">
    <div>
        <input type="file" name="file">
    </div>
    <div>
        <button>Send</button>
    </div>
</form>

在通过该post方法处理 POST 请求期间,我得到以下异常

[22:45:30 ERR] request failed
System.InvalidOperationException: The input list was empty.
  at Microsoft.FSharp.Collections.FSharpList`1[T].get_Head () <0x41494340 + 0x0007b> in <filename unknown>:0
  at Web+Parse+post@25.Invoke (Suave.HttpRequest httpRequest) <0x41493e10 + 0x0003b> in <filename unknown>:0
  at Microsoft.FSharp.Core.FSharpFunc`2[T,TResult].InvokeFast[V] (Microsoft.FSharp.Core.FSharpFunc`2 func, Microsoft.FSharp.Core.T arg1, Microsoft.FSharp.Core.TResult arg2) <0x4143c6a0 + 0x00099> in <filename unknown>:0
  at Web+Parse+post@39-4.Invoke (Suave.HttpContext context) <0x41493dc0 + 0x0002f> in <filename unknown>:0
  at Suave.WebPart+bind@14-5[a,b].Invoke (Microsoft.FSharp.Core.FSharpOption`1 _arg1) <0x41472a10 + 0x00044> in <filename unknown>:0
  at Microsoft.FSharp.Control.AsyncBuilderImpl+args@835-1[a,b].Invoke (a a) <0x41435c60 + 0x000af> in <filename unknown>:0

这意味着列表中没有文件httpRequest.files

我无法找到有关如何访问上传文件或是否已上传的任何信息。我用 Fiddler 检查了浏览器发送的 HTTP 请求的内容,我能看到的只有

file=myFile.txt

那么文件上传了吗?我是否正确访问它?

注意:我使用的是 Suave 2.0.0

4

1 回答 1

6

好的,我找到了我所缺少的。要发布文件,表单必须有一个像这样的附加参数

<form action="/parse" method="POST" enctype="multipart/form-data">

这样,文件的内容将与 Content 部分中的 HTTP 请求一起发送。

(通过https://searchcode.com/codesearch/view/7502482/找到)

于 2017-01-16T22:44:59.823 回答