Fråga : Fyllning som en TextBox på en bilda med data från en sätta in från en SQL-databas bordlägger i visuellt hjälpmedelstudion 2008

Jag har en bilda som namnges ViewNotes i ett Visual Basic att projektera i visuellt hjälpmedelstudion 2008. Detta bildar har en RichTextBox på den namngav den pröva förmiddagen för txtNotes.
I för att ladda data från ”noterar” sätter in av en bordlägga som namnges t_notes i en pröva namngiven MyDatabase.
I förmiddag för SQL-serverdatabas för att uppnå detta using kodifierar från en
The för boka (lär Visual Basic i 24 timmar av James Foxall - jag måste att medge det tar mig mer än 24 timmar för att uppnå detta), kodifierar förutsatt att i denna bokar undervisar faktiskt dig att hur man tar fram data från en ta framdatabas using ADO den pröva netto och för Ole.OleDBConnection.
I förmiddagen för att ändra detta kodifierar för att använda den för att ta fram data från en SQL-server using SQL-beställare. förmiddagen för
I ger ändrad denna, kodifierar i kodifiera window.
This kodifierar emellertid, är inte funktionsduglig. Den ger efter egenskapen för error
The SelectCommand har inte initialiserats, innan det kallar avlusaren ”för påfyllnings”
with markerar, fodra i mitt kodifierar efter:

I för
mySQLDataAdapterr.Fill (myDataTab) för
skulle är mest tacksam för rådgivning på fel i denna kodifierar som förhindrar den från att uppnå dess önskade mål.
> för 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
" codeBody " " >Imports System.Data för class= " för
" klar "

Svar : Fyllning som en TextBox på en bilda med data från en sätta in från en SQL-databas bordlägger i visuellt hjälpmedelstudion 2008

ändra fodranr.en 33

        mySQLDataAdapter = nya SqlDataAdapter (”VALT notera FRÅN t_notes”, mySQLConnection),

        Din strömaktivanslutning är sqlconn för mySQLConnection inte. Färdigt kodifiera att jag kör är som är med min databas
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:

Importer System.Data
Importer System.Configuration
Importer System.Data.SqlClient
Allmänhet klassificerar ViewSQLClient

    Dunkel sqlConn som nya SqlConnection
    Privat mySQLConnection som nya SqlConnection
    Privat mySQLDataAdapter som SqlDataAdapter
    Privat mySQLCommandBuilder som SqlCommandBuilder
    Privat myDataTable som nya DataTable
    Privata RowPosition som heltal
    Privata underViewSQLClient_FormClosed (den ByVal avsändaren som anmärker, ByVal e som System.Windows.Forms.FormClosedEventArgs) behandlar Me.FormClosed
        mySQLConnection.Close ()
        mySQLConnection.Dispose ()
    Avsluta suben
    Privata underViewSQLClient_Load (den ByVal avsändaren som System.Object, ByVal e som System.EventArgs) behandlar MyBase.Load
        mySQLConnection.ConnectionString = ”data Source=SMARTCHEATER \ sqlexpress; Initiala Catalog=cricket; Inbyggda Security=True”,
        mySQLConnection.Open ()
        mySQLDataAdapter = nya SqlDataAdapter (”VÄLJ känt FRÅN länder”, mySQLConnection),
        mySQLCommandBuilder = nya SqlCommandBuilder (mySQLDataAdapter)
        'Kodifiera i det nästa fodrar ger felet 
        'Fel Messag: e den ConnectionString egenskapen har inte initialiserats
        (myDataTable) mySQLDataAdapter.Fill,
        Me.ShowCurrentRecord ()
    Avsluta suben
    Privata underShowCurrentRecord ()
        Om myDataTable.Rows.Count = 0 därefter
            txtNotes.Text = "",
            Gå ut suben
        Avsluta om
        txtNotes.Text = myDataTable.Rows (RowPosition) (”namnge”), .ToString ()
    Avsluta suben
Avsluta klassificerar
Andra lösningar  
 
programming4us programming4us