Tulisan ini adalah catatan mengenai koneksi VB.NET ke SQL Server 2017. Koneksi dibuat dalam sebuah kode ketika tombol diklik. Kode yang dibuat masih sederhana, tidak melibatkan adapter macem-macem. Berikut adalah kode programnya :
Dim conn As SqlConnection = New SqlConnection("Data Source=KOMPI\SQLEXPRESS; Database=dbku; integrated security = true")
Dim command As New SqlCommand()
Dim sqlReader As SqlDataReader
Dim result As String
command = conn.CreateCommand
command.CommandText = "SELECT * FROM Tabel_Login"
conn.Open()
sqlReader = command.ExecuteReader()
Do While sqlReader.Read()
'menampilkan kolom kedua menggunakan message box
MessageBox.Show(sqlReader.GetString(1))
Loop
— End of Note —