尝试使用 vb.net 将文件上传到 sinatra

Question

我正在尝试使用 VB.Net 将文件上传到 Sinatra Web 服务，但我不确定如何配置任一端。当我运行 VB.Net 应用程序时，sinatra 总是以代码 404 响应。这是 VB.Net 代码，我从另一篇 SO 帖子转换而来：

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     Dim responseData As String = ""
     Dim rdr As FileStream = New FileStream("X:\QueryTxtFiles\Query\CDA Curncy_9_1_2011.fqy", FileMode.Open)
     Dim req As HttpWebRequest = DirectCast(WebRequest.Create("http://finqueryserver:9898"), HttpWebRequest)
     req.Method = "POST" ' you might use "POST"
     req.ContentLength = rdr.Length
     req.AllowWriteStreamBuffering = True   

     Dim reqStream = DirectCast(req.GetRequestStream(), Stream)

     Dim inData(rdr.Length) As Byte

     ' Get data from upload file to inData 
     Dim bytesRead As Integer = rdr.Read(inData, 0, rdr.Length)

     ' put data into request stream
     reqStream.Write(inData, 0, rdr.Length)

     rdr.Close()
     Try
         req.GetResponse()
     Catch ex As Exception
         responseData = "An error occurred: " & ex.Message
     End Try

     ' after uploading close stream 
     reqStream.Close()
 End Sub

这是 Sinatra 代码：（

 require 'rubygems'
 require 'sinatra'

 post '/:name/:filename' do
puts "got here"

   begin
     name = params[:name]
   rescue
     name = "no name"
   end  
   begin
     filename = params[:filename]
   rescue
     filename = "no filename"
   end  
 end

我从未见过“到达这里”。）Sinatra代码基于使用 cURL 的教程，但我不是。我也尝试

 post "/:filename'

过给出 404 ，并且简单地

 post "/"

显示“到达这里”，但显然没有用，因为我需要处理该文件。

显然我在这两个方面都是新手，这并不难，但我不知道该怎么做。

谢谢。

Answer 1

好吧，为了后代，这就是我为使其发挥作用所做的事情。在 vb.net 代码中，我使用：

  qry_results = wc.UploadFile("http://192.168.9.81:9898/execfqy", "X:\QueryTxtFiles\Query\CDA Curncy_9_1_2011.fqy")

在 sinatra 文件中：

 post '/execfqy' do
 qry_file.write(params[:file][:tempfile].readlines)