Dim fs As System.IO.Stream = ???OpenRead???("MyFolder/MyBuildActionContentFile.zip")
Dim archive = SharpCompress.Archive.ArchiveFactory.Open(fs)
For i As Integer = 0 To archive.Entries.Count - 1
If Not archive.Entries(i).IsDirectory Then
If archive.Entries(i).Key.Contains("TheFileImLookingFor.txt") Then
Dim zipStream As System.IO.Stream = archive.Entries(i).OpenEntryStream
Dim myStreamReader As New IO.StreamReader(zipStream)
Return myStreamReader.ReadToEnd()
Exit For
End If
End If
Next
↧
New Post: How to OpenRead in WP 8.1
↧