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:
|
" codeBody "
Public Klasse Form1
Het schemerige connetionString als Koord
Schemerige verbinding als MySqlConnection
Schemerige adapter als MySqlDataAdapter
Schemerige cmdBuilder als MySqlCommandBuilder
Schemerige ds als Nieuwe Dataset
Schemerige veranderingen als Dataset
Schemerige sql als Koord
Schemerige I als Int32
Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten BekijkAllesToolStripMenuItem_Click BekijkAllesToolStripMenuItem.Click
Het schemerige connetionString als Koord = („Gegevens Source=site; Aanvankelijke Catalog=catalog; Gebruiker - identiteitskaart =id; Password=pw“)
verbinding = Nieuwe MySqlConnection (het connetionString)
sql = „selecteer * uit Herstellingen2“
Probeer
verbinding. Open ()
adapter = Nieuwe MySqlDataAdapter (sql, verbinding)
adapter. Vul (ds)
verbinding. Sluit ()
Herstellingen.DataSource = ds. Lijsten (0)
Vangst ex als Uitzondering
MsgBox (ex.ToString)
Het eind probeert
Sub van het eind
Privé SubSaveToolStripButton_Click (ByVal afzender als System.Object, ByVal e als System.EventArgs) behandelt SaveToolStripButton.Click
Probeer
cmdBuilder = Nieuwe MySqlCommandBuilder (adapter)
verandert = ds.GetChanges ()
Als veranderingen IsNot niets toen
adapter. Update (veranderingen)
Eind als
MsgBox („Opgeslagen“)
Vangst ex als Uitzondering
MsgBox (ex.ToString)
Het eind probeert
|