kostenloser Webspace werbefrei: lima-city

Umgebungsvariablen funktionieren nicht

lima-city → Forum → Programmiersprachen → Basic

1. Autor dieses Themas

   seiby

   seiby hat kostenlosen Webspace.

   21:11, 23.4.2011

   Hallo,
   Ich habe mir in Visual Basic 2010 eine kleine Anwendung gebaut, die mir den "saves" ordner von Minecraft in einen BackupOrdner kopiert und andersherum.
   Das soll allerdings nicht nur für mich funktionieren, sondern auch für andere.
   Hier mein Code:
   

   Public Class Form1
   
       Private Sub ButtonBUmachen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUmachen.Click
           My.Computer.FileSystem.CopyDirectory("%AppData%\.minecraft\saves", "%USERPROFILE%\mcbackup\saves", True)
       End Sub
   
       Private Sub ButtonBUrein_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUrein.Click
           My.Computer.FileSystem.CopyDirectory("%USERPROFILE%\mcbackup\saves", "%AppData%\.minecraft\saves", True)
       End Sub
   End Class

   
   
   Das Problem:
   Der Pfad wird nicht gefunden.
   Wo ist der Fehler?
   
   MfG
   seiby

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. harrybotter

   

   harrybotter hat kostenlosen Webspace.

   0:07, 24.4.2011

   Hallo seiby,
   
   bin zwar kein vb-progger, tippe aber auf Fehler in der Pfadangabe. Von anderen Sprachen her abgeleitet sychlage ich folgendes vor:

   Public Class Form1
   
       Private Sub ButtonBUmachen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUmachen.Click
           My.Computer.FileSystem.CopyDirectory(%AppData% & "\.minecraft\saves", %USERPROFILE% & "\mcbackup\saves", True)
       End Sub
   
       Private Sub ButtonBUrein_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUrein.Click
           My.Computer.FileSystem.CopyDirectory(%USERPROFILE% & "\mcbackup\saves", %AppData% & "\.minecraft\saves", True)
       End Sub
   End Class

   teste es einfach mal aus, mehr als schief gehen kann es ja nicht.
   
   Edit: der Dateipfad muss natürlich existieren, evtl. ist bei VB auch ein anderer Verkettungsoperator zu verwenden
   
   Beitrag zuletzt geändert: 24.4.2011 0:10:11 von harrybotter

4. darkpandemic

   

   darkpandemic hat kostenlosen Webspace.

   14:23, 24.4.2011

   Hallo sieby,
   
   die Umgebungsvariablen kannst Du mit Environment.GetEnvironmentVariable() abfragen.
   

   Public Class Form1
       Private Sub ButtonBUmachen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUmachen.Click
           Dim app_data As String
           Dim user_profile As String
   
           app_data = Environment.GetEnvironmentVariable("appdata")
           user_profile = Environment.GetEnvironmentVariable("userprofile")
   
           My.Computer.FileSystem.CopyDirectory(app_data & "\.minecraft\saves",  user_profile & "\mcbackup\saves", True)
       End Sub
   
       Private Sub ButtonBUrein_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBUrein.Click
           Dim app_data As String
           Dim user_profile As String
   
           app_data = Environment.GetEnvironmentVariable("appdata")
           user_profile = Environment.GetEnvironmentVariable("userprofile")
   
           My.Computer.FileSystem.CopyDirectory(user_profile & "\mcbackup\saves", app_data & "\.minecraft\saves", True)
       End Sub
   End Class

5. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?