Ciao a tutti potete aiutarmi ? non riesco ad avviare il file inserito in VB.net con Ctrl+D. mi da sempre Win32Exception non è stata gestita. ho provato anche a mettere il percorso del fine in VB ad esempio "C:\Users\....\AppData\Local\Temporary Projects\WindowsApplication1\nome.zip" fra le virgolette. pur facendo così i file all' interno riesco a vederli solamente io e gli altri PC no. cosa sbaglio ? non riesco a capire l' errore.
codice:
Imports System.IO
Imports System.Reflection
Public Class Form1
Private Shared Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
RunInternalExe("nome.zip")
System.Diagnostics.Process.Start("nome.zip")
End Sub
Private Shared Sub RunInternalExe(ByVal exeName As String)
'Ottieni l'assembly
Dim assembly__1 As Assembly = Assembly.GetExecutingAssembly()
'Ottieni il nome della cartella dov'è contenuto l'exe
Dim rootName As String = assembly__1.GetName().Name
'Ottieni la Resource Stream
Dim resourceStream As Stream = assembly__1.GetManifestResourceStream(rootName + "." + exeName)
'Verifica se il file interno esiste
If resourceStream Is Nothing Then
Return
End If
'Leggi i bytes piani del file
Dim resourcesBuffer As Byte() = New Byte(resourceStream.Length - 1) {}
resourceStream.Read(resourcesBuffer, 0, resourcesBuffer.Length)
resourceStream.Close()
'Carica i bytes come un'assembly
Dim exeAssembly As Assembly = Assembly.Load(resourcesBuffer)
End Sub
End Class