以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于阿里云流式下载的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133553)
--  作者：智友软件工作室
--  发布时间：2019/4/16 13:32:00
--  [求助]关于阿里云流式下载的问题
请问下面的实例怎么改变为狐表的语言？
try
{
    // 下载文件到流。OssObject 包含了文件的各种信息，如文件所在的存储空间、文件名、元信息以及一个输入流。
    var obj = client.GetObject(bucketName, objectName);
    using (var requestStream = obj.Content)
    {
        byte[] buf = new byte[1024];
        var fs = File.Open(downloadFilename, FileMode.OpenOrCreate);
        var len = 0;
        // 通过输入流将文件的内容读取到文件或者内存中。
        while ((len = requestStream.Read(buf, 0, 1024)) != 0)
        {
            fs.Write(buf, 0, len);
        }
        fs.Close();
    }
    Console.WriteLine("Get object succeeded");
}
catch (Exception ex)
{
    Console.WriteLine("Get object failed. {0}", ex.Message);
}
https://help.aliyun.com/document_detail/91748.html?spm=a2c4g.11186623.6.921.4a192fc0Xe2CKm
--  作者：有点甜
--  发布时间：2019/4/16 14:57:00
--  

比如

 

Try
    Dim obj = client.GetObject(bucketName, objectName)

    Using requestStream = obj.Content
        Dim buf As Byte() = New Byte(1023) {}
        Dim fs = File.Open(downloadFilename, FileMode.OpenOrCreate)
        Dim len = 0

        While (CSharpImpl.__Assign(len, requestStream.Read(buf, 0, 1024))) <> 0
            fs.Write(buf, 0, len)
        End While

        fs.Close()
    End Using

    Console.WriteLine("Get object succeeded")
Catch ex As Exception
    msgbox(CExp("Get object failed. {0}", ex.Message))
End Try

 

http://converter.telerik.com/