Mijn programma Collector TODO start tegelijk met windows op. De code die ik hiervoor gebruik is:
Het programma start keurig op alleen "kaal" D.w.z het hoofdmenuformulier geeft alle controls zoals button, labels, listview weer, echter
de listview geeft geen items aan, m.a.w. hij laadt dit niet vanuit textformulier die in de Curdir staat.
Ik moet dan het programma restarten.
Is de code niet helemaal juist of kan ik nog wat anders doen.
Bij voorbaat dank en vr. groet
Code:
Dim regKey As Microsoft.Win32.RegistryKey
Dim KeyName As String = "CollectorToDo"
Dim KeyValue As String = Application.ExecutablePath
regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
If regKey.GetValue(KeyName) = Nothing Then
regKey.SetValue(KeyName, KeyValue, Microsoft.Win32.RegistryValueKind.String)
End IfHet programma start keurig op alleen "kaal" D.w.z het hoofdmenuformulier geeft alle controls zoals button, labels, listview weer, echter
de listview geeft geen items aan, m.a.w. hij laadt dit niet vanuit textformulier die in de Curdir staat.
Ik moet dan het programma restarten.
Is de code niet helemaal juist of kan ik nog wat anders doen.
Bij voorbaat dank en vr. groet
