Datei öffnen 27. Februar 2009, 09:30 Hallo. Ich nutze Visual Basic 2008 Express. Wie kann ich mit VB eine Datei öffnen, die im gleichen Verzeichnis wie die .exe meines VB.Projekts liegt? Vielen Dank und gruß, lui.
27. Februar 2009, 10:14 Den Pfad bekommst du mit "Application.ExecutablePath", wie man Dateien öffnet findest du im Internet.
27. Februar 2009, 11:13 "Application.ExecutablePath", gibt mir den Pfad der Anwndung inklusive Anwendungsname. Wie bekomme ich denn den Pfad ohne Anwendungsname? Die auszuführende Datei liegt im gleichem Verzeichnis, wie die .exe meines VB-Projekts und so sollte das ungefär aussehen: FileOpen(FreeFile, "Pfad-zu-meiner-Anwendung\meinedatei.xls" , Openmode.Ramdom) Vielen Dank, Lukas.
27. Februar 2009, 11:31 schau dir mal String.Substring und String.LastIndexOf("/") an, damit solltest du es schaffen.
27. Februar 2009, 12:52 Ich habe da etwas falsch gemacht. Ich möchte ein einfaches Excel-Dokument mit VB öffnen. So, wie wenn man es einfach vom Desktop mit der Maus per Doppelklick öffnet. Mit "FileOpen(FreeFile, "Vollständiger Pfad", OpenMode.Random)" wird das Dokument irgendwie geöffnet, landet aber nichteinmal im Taskmanager. Mit "Shell("Mein Pfad") gibt er mir die Fehlermeldung, die Datei sei nicht vorhanden. Gebe ich "Mein Pfad" direkt in cmd oder in das"Ausführenfenster" ein, so öffnet Windows das Dokument. Also ist der Pfad auf jedenfall korrekt. Wo liegt mein Fehler? Vielen Dank für eure Mühe! Lui. Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Bastelui“ (27. Februar 2009, 12:59)
27. Februar 2009, 13:58 ganz einfach so VB.NET-Quellcode Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Dim file As String = Application.StartupPath & "/test.xls" Process.Start(file) Catch ex As Exception MsgBox("File not found try again") End Try End Sub GR Schäm dich nicht "Zu fragen", schäm dich "Nicht zu wissen". Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „miko1204“ (27. Februar 2009, 14:10)
27. Februar 2009, 14:04 Besser ist: VB.NET-Quellcode My.Computer.FileSystem.CombinePath(Application.StartupPath, "\Datei.exe") gruß EDIT: Sry, natürlich so: VB.NET-Quellcode My.Computer.FileSystem.CombinePath(Application.StartupPath, "Datei.exe") ' ohne Schrägstrich Quicklet Quicklink Desktop Edition Gadget Collection
27. Februar 2009, 14:10 Gibt es bei startuppath nicht Probleme, wenn man das Programm mit einer Verknüpfung startet?
27. Februar 2009, 14:12 nein denn die verknuepfung geht zum exe ordner versuchs mal so zu laden VB.NET-Quellcode Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Dim file As String = Application.StartupPath & "/test.xls" Process.Start(file) Catch ex As Exception MsgBox("File not found try again") End Try End Sub sag mir ob es geklappt hat GR EDIT: wenn du die datei selber ausweahlen willst kannst es so machen VB.NET-Quellcode Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Dim OpenFileDialog As New OpenFileDialog OpenFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments OpenFileDialog.Filter = "Excel Files (*.xls)|*.xls" OpenFileDialog.ShowDialog(Me) Dim FileName As String = OpenFileDialog.FileName FileName = Application.StartupPath & "/test.xls" Process.Start(FileName) Catch ex As Exception MsgBox("Error, check if Excel is installed on your PC") End Try End Sub Schäm dich nicht "Zu fragen", schäm dich "Nicht zu wissen".