VB.NET Excel Resource File

[rei007]

Viva,

Agora fiquei ainda mais intrigado. Mas afinal o que é que pretendes fazer? Não pretendes distribuir a aplicação com o ficheiro excel a acompanhar?


Após uma pequena pesquisa encontrei este código que aparentemente faz o que pretendes (Retirado daqui):

Código:

Imports System
Imports System.IO
Imports System.Reflection

Public Class ApplicationEmbeddedFile

      Public Shared Sub SaveToDisk(ByVal resourceName As String, ByVal fileName As String)

            ' Get a reference to the running application.
            Dim assy As [Assembly] = [Assembly].GetExecutingAssembly()

            ' Loop through each resource, looking for the image name (case-insensitive).
    For Each resource As String In assy.GetManifestResourceNames()

      If resource.ToLower().IndexOf(resourceName.ToLower) <> -1 Then

        ' Get the embedded file from the assembly as a MemoryStream.
        Using resourceStream As Stream = assy.GetManifestResourceStream(resource)

          If resourceStream IsNot Nothing Then
            Using reader As New BinaryReader(resourceStream)

              ' Read the bytes from the input stream.
              Dim buffer() As Byte = reader.ReadBytes(CInt(resourceStream.Length))
              Using outputStream As New FileStream(fileName, FileMode.Create)
                Using writer As New BinaryWriter(outputStream)

                  ' Write the bytes to the output stream.
                  writer.Write(buffer)
                End Using
              End Using
            End Using
          End If

        End Using

        Exit For

      End If

    Next resource

  End Sub

End Class

Depois para usares isto basta chamares a seguinte linha de código:

Código:

ApplicationEmbeddedFile.SaveToDisk("MyWave.wav", "C:\Temp\MyWave.wav")

O que isto faz é simplesmente ir buscar o ficheiro excel que se encontra nos resources do programa e copiar para uma determinada localização.

Para copiares para a localização da aplicação, basta fazeres o seguinte:

Código:

ApplicationEmbeddedFile.SaveToDisk("MyWave.wav", System.Reflection.Assembly.GetExecutingAssembly.Location & "\MyWave.wav")

Era isto que pretendias?

No google apenas pesquisei por "embeb excel file with vb.net resources" e foi logo o primeiro resultado, ou melhor, o segundo.

Tinha um prof na universidade que numa cadeira de C# ele disse, as ferramentas estão em tal parte e os exercícios estão em tal sitio. Nesse ponto eu perguntei ao professor "O professor não vai explicar?" ao que ele me respondeu "O google é teu amigo. Repara que nem eu preciso ir ao quiosque para ler o jornal."

A partir desse dia o google passou a ser o meu professor para tudo. Na escola o Google é mais que teu amigo. É preciso é ter vontade de lhe ir perguntar.