✔ Game loader mit vb.net 2008 express

[yondaime1981]

Jetzt kannt ich dir leider auch nicht mehr helfen, da derselbe Code bei mir funktioniert^^

Aufgerufen wird der Eintrag durch diesen Code, der ist aber bei dir schon drinnen:

Dim value As String = My.Computer.Registry.GetValue("HKEY_CURRENT_USER\Software\GameLoader", _
           "pfad", Nothing)
pfad1.Text = value

Lösche mal den Ordner "GameLoader" in der Registry unter HKEY_CURRENT_USER/Software/ und führe dann das angehängte Programm aus und schau, obs funktioniert.

MfG
Afritus

ja das Testprogramm hat funktioniert, also Ich habe den wert in der Reg gelöscht , dann deine test.exe ausgeführt, den pfad gewählt und dann kam ne Msgbox mit dem pfad.

Woran kanns bei mir liegen? Also in meinem loader

mfg Yondaime1981

 

[Afritus]

Bei meinem Testprogramm habe ich genau diesen Code verwendet (1mal FolderBrowserDialog1, 1mal TextBox1):

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        If My.Computer.Registry.GetValue("HKEY_CURRENT_USER\Software\GameLoader", _
            "pfad", Nothing) Is Nothing Then
            My.Computer.Registry.SetValue _
            ("HKEY_CURRENT_USER\Software\GameLoader", "pfad", "")
        End If



        Dim value As String = My.Computer.Registry.GetValue("HKEY_CURRENT_USER\Software\GameLoader", _
           "pfad", Nothing)
        If value = "" Then
            FolderBrowserDialog1.ShowDialog()
            value = FolderBrowserDialog1.SelectedPath + "\left4dead2.exe"
            My.Computer.Registry.SetValue _
                ("HKEY_CURRENT_USER\Software\GameLoader", "pfad", value)
            TextBox1.Text = value
        Else
            TextBox1.Text = value
        End If

    End Sub

Versuch mal, ob es so klappt.

MfG
Afritus

 

[yondaime1981]

Es funktioniert

Vielen vielen Dank.


Jetzt nur noch der feinschliff und es ist fertig



Mfg Yondaime1981

 

[Afritus]

Kein Problem, wenn du Fragen hast, einfach fragen

MfG