[
  {
    "Id": "467558",
    "ThreadId": "219508",
    "Html": "<p>Hi everyone I would like to put a zip file as an embedded resource on my program in Visual Basic .NET. I need this file to be unzipped or somehow access when my program runs so I'm able to use the files inside of that zip as normal embedded resources (I only want to zip them to compress the size of my file). I saw examples for this in C# but I only know VB.NET and I'm having trouble doing this. Please help, thanks in advance.</p>\r\n<p>&nbsp;</p>\r\n<p>-GamerJer</p>",
    "PostedDate": "2010-07-14T21:19:52.183-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  },
  {
    "Id": "470584",
    "ThreadId": "219508",
    "Html": "I am having the same problem. Seems to be the only examples are in C#. I know it's something about Stream, but I don't know where to start.\r\n\r\n-Conroy",
    "PostedDate": "2010-07-21T14:26:04.49-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  },
  {
    "Id": "470645",
    "ThreadId": "219508",
    "Html": "<p>Yeah this is really being a pain for me as well.</p>",
    "PostedDate": "2010-07-21T19:32:40.83-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  },
  {
    "Id": "471155",
    "ThreadId": "219508",
    "Html": "http://www.vbforums.com/showthread.php?p=3847866#post3847866 This thread helped me, hopefully it will help you too!",
    "PostedDate": "2010-07-22T11:33:50.183-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  },
  {
    "Id": "473624",
    "ThreadId": "219508",
    "Html": "If you provide some VB sample code showing what worked for you,\r\n I can add it to the documentation so as to help others in the future.\r\n",
    "PostedDate": "2010-07-28T04:45:06.327-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  },
  {
    "Id": "473702",
    "ThreadId": "219508",
    "Html": "' This creates the stream from the resource <br>\r\nUsing s As Stream = Me.GetType().Assembly.GetManifestResourceStream(Me.GetType(), &quot;FILENAME.zip&quot;) 'Change to your .ZIP in the resources<br>\r\n    Dim TargetDir As String = &quot;C:\\&quot;  'Naturally adjust this to suit your needs.<br>\r\n   Using zip1 As ZipFile = ZipFile.Read(s) <br>\r\n       AddHandler zip1.ExtractProgress, AddressOf MyExtractProgress   ' I'm guessing this is optional if you want to show progress....<br>\r\n       Dim e As ZipEntry   <br>\r\n       ' here, we extract every entry, but we could extract    <br>\r\n       ' based on entry name, size, date, etc.   <br>\r\n       For Each File In zip1   <br>\r\n           File.Extract(TargetDir, ExtractExistingFileAction.OverwriteSilently)   ' This is what will actually write your files out<br>\r\n       Next  <br>\r\n   End Using  'zip1<br>\r\nEnd Using 'Stream",
    "PostedDate": "2010-07-28T07:25:58.083-07:00",
    "UserRole": null,
    "MarkedAsAnswerDate": null
  }
]