本文整理汇总了VB.NET中System.Net.OpenWriteCompletedEventHandler代理的典型用法代码示例。如果您正苦于以下问题:VB.NET OpenWriteCompletedEventHandler代理的具体用法?VB.NET OpenWriteCompletedEventHandler怎么用?VB.NET OpenWriteCompletedEventHandler使用的例子?那么恭喜您, 这里精选的代理代码示例或许可以为您提供帮助。
在下文中一共展示了OpenWriteCompletedEventHandler代理的2个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: OpenResourceForPosting
Public Shared Sub OpenResourceForPosting(ByVal address As String)
Dim client As WebClient = New WebClient()
' Specify that the OpenWriteCallback method gets called
' when the writeable stream is available.
AddHandler client.OpenWriteCompleted, AddressOf OpenWriteCallback2
Dim uri as Uri = New Uri(address)
client.OpenWriteAsync(uri)
' Applications can perform other tasks
' while waiting for the upload to complete.
End Sub
示例2: CType
Private Shared Sub OpenWriteCallback2(ByVal sender As Object, ByVal e As OpenWriteCompletedEventArgs)
Dim body As Stream = Nothing
Dim s As StreamWriter = Nothing
Try
body = CType(e.Result, Stream)
s = New StreamWriter(body)
s.AutoFlush = True
s.Write("This is content data to be sent to the server.")
Finally
If Not s Is Nothing Then
s.Close()
End If
If Not body Is Nothing Then
body.Close()
End If
End Try
End Sub