Avatar billede foko Nybegynder
02. november 2004 - 17:18 Der er 17 kommentarer

hent data fra Reg basen

er det muligt at hente data fra regbase direkte til en textbox

[HKEY_LOCAL_MACHINE\SOFTWARE\test]
"test af værdig"="test"

og så skal jeg så havde "test" i min textbox
Avatar billede burningice Nybegynder
02. november 2004 - 17:30 #1
RegistryKey rk = Registry.LocalMachine.OpenSybKey(@"Software\test", true);

dinTextBox.Text = rk.GetValue("test af værdig").ToString());
Avatar billede foko Nybegynder
02. november 2004 - 21:03 #2
Neeeej den fejler.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lukbt.Click
        Dim sw As StreamWriter
        Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
        regKey.CreateSubKey("test")
        regKey.Close()


        'Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("Software\test", True)
        regKey.SetValue("testest", "MyRegApp")
        regKey = Registry.LocalMachine.OpenSubKey("Software\test", True)
        smtptb.Text = regKey.GetValue("testtest").ToString()
        regKey.Close()
Avatar billede burningice Nybegynder
02. november 2004 - 21:52 #3
hvilken fejl?
Avatar billede foko Nybegynder
02. november 2004 - 22:04 #4
Jeg har løst det.

Hvordan får jeg den til som standard altid at havde det ståene inde i en txtbox når man åbner vinduet. så jeg altid kan se hvad værdien er.
Avatar billede burningice Nybegynder
02. november 2004 - 22:13 #5
ved at skrive koden i konstrukteren på din form...
Avatar billede foko Nybegynder
02. november 2004 - 22:18 #6
ja ved at skrive sådan her ikke

Private Sub smtptb_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles smtptb.TextChanged
        Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("Software\lysavis", True)
        regKey.GetValue("smtp")
    End Sub
Avatar billede foko Nybegynder
02. november 2004 - 22:28 #7
Neeeej den viser stadig ikke noget når jeg starter den side op
Avatar billede burningice Nybegynder
02. november 2004 - 22:29 #8
mm... nej

mere sådan her

Public Class dinForm

  Public dinForm()
      Dim regKey As RegistryKey
      regKey = Registry.LocalMachine.OpenSubKey("Software\lysavis", True)
      smtptb.Text = regKey.GetValue("smtp")
  End

End Class

(er ikke helt sikker på vb-syntaxen)
Avatar billede foko Nybegynder
02. november 2004 - 22:44 #9
Nej den kan jeg heller ikke få til det ØV
Avatar billede burningice Nybegynder
02. november 2004 - 22:46 #10
wínform eller webform (asp.net) ??
Avatar billede foko Nybegynder
02. november 2004 - 22:52 #11
asp.net er jeg slet ikke inde i det er slemt nok her med VB.net
Avatar billede burningice Nybegynder
02. november 2004 - 23:13 #12
så der er altså winform??

det her virker hos mig

    Public Sub New()
        MyBase.New()

        'This call is required by the Windows Form Designer.
        InitializeComponent()

        'Add any initialization after the InitializeComponent() call

        Dim regKey As Microsoft.Win32.RegistryKey
        regKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("Software\lysavis", False)
        TextBox1.Text = regKey.GetValue("smtp").ToString()

    End Sub
Avatar billede foko Nybegynder
02. november 2004 - 23:22 #13
jeg sider og tænker om det kan havde noget med
Private Sub smtptb_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles smtptb.TextChanged
altså textboxen ikke ved hvordan den skal hente den.
Avatar billede burningice Nybegynder
02. november 2004 - 23:28 #14
det er bare en eventhandler til hvad der skal ske når at teksten i teksboxen ændrer sig... intet andet
Avatar billede foko Nybegynder
02. november 2004 - 23:34 #15
nu fandt jeg det flot bare med at lukke øjnene op
        Me.smtptb.Location = New System.Drawing.Point(232, 48)
        Me.smtptb.Name = "smtptb"
        Me.smtptb.TabIndex = 1
Avatar billede foko Nybegynder
03. november 2004 - 00:49 #16
men det virker stadig ikke med

smtptb.Text = regKey.GetValue("smtp")

den her fejlmedelse
Option Strict On disallows implicit conversions from 'System.Object' to 'String'.
Avatar billede burningice Nybegynder
03. november 2004 - 01:57 #17
du mangler ToString() eller CType(ditobject, String)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester