na wenn du unbedingt einen code willst…
Public Function Kopieren(ByVal Zielpfad As String) As Boolean
'progName = System.Reflection.Assembly.GetEntryAssembly().GetName().Name & „.xlsx“
quellpfad = Application.StartupPath
quelle = System.IO.Path.Combine(quellpfad, progName)
ziel = System.IO.Path.Combine(Zielpfad, progName)
Try
IO.File.Copy(quelle, ziel, True)
Return True
Catch ex As Exception
Return False
End Try
End Function
Sub subcopy()
My.Computer.FileSystem.CopyFile(My.Application.Info.DirectoryPath & „“ _
& My.Application.Info.AssemblyName & „.xlsx“, _
My.Computer.FileSystem.GetParentPath( _
My.Computer.FileSystem.SpecialDirectories.ProgramFiles) & „\temp“ & _
My.Application.Info.AssemblyName & „.xlsx“)
End Sub
In der Funktion wird die assemly gesucht aber die datei die ich brauche ist nicht vorhanden. Mit Subcopy such ich den pfad des ausführendes programmes, sprich ich bekomme den pfad der Excel.exe .
In beiden hab ich versucht den Pfad der zu öffnenden Datei zufinden, und diese Datei in tmp zu kopieren, damit das Programm jederzeit unabhängig vom Speicherort zu öffnen und zu bearbeiten.