//Name space untuk
ruang penyimpanan, wajib ada.(ini menggunakan sql, beda lagi jika menggunakan
database selain sql)
Imports
System.Data.SqlClient
Module Module1
Public CONN
As SqlConnection
Public STR As String
Public DA As SqlDataAdapter
Public DS As New DataSet
Public CMD As SqlCommand
Public DR As SqlDataReader
Sub
KoneksI()
STR = "Data
Source=MUHAMMADFAHMI\SQLSERVER;Initial Catalog=DBLATIHAN;Integrated
Security=True"
// keterangan
-data source =
nama dari sqlserver anda
-initial catalog =
nama dari database yang anda buat
-integrated
security = true, apabila anda login menggunakan windows authentication. Beda
lagi jika menggunakan sql server authentication.
CONN = New
SqlConnection(STR)
If
CONN.State = ConnectionState.Closed Then
CONN.Open()
End If
End Sub
End Module
*jangan copy yang warna merah.
