Koneksi database vb.net
Koneksi vb.net dengan postgresql menggunakan sql command
Kadangkala kita kesulitan dalam menghubungkan program aplikasi yang dibuat menggunakan vb.net dengan database yang kita gunakan. Ada beberapa cara untuk menghubungkannya, apabila kita menggunakan komputer berbasis windows OS maka pada umumnya kita bisa menggunakan ODBC. Akan tetapi ada baiknya juga kita menggunakan cara lain, yaitu dengan menngunakan command/ perintah yang dapat menghubungkan antara program dengan data yang kita gunakan.
Banyak cara perintah atau command yang dapat dipakai untuk koneksi database tersebut. Salah satu cara yang bisa kita lakukan adalah dengan menggunakan kode berikut ini….
Semoga bermanfaat…
—–buat koneksi ke database dulu
Public SqlConnection As SqlClient.SqlConnection
Public SqlTransaction As SqlClient.SqlTransaction
Public SqlDataSource As String
Public SqlInitialCatalog As String
Public SqlConnectionString As String
Public SqlUserID As String
Public SqlPassword As String
Public SqlTransaction As SqlClient.SqlTransaction
Public SqlDataSource As String
Public SqlInitialCatalog As String
Public SqlConnectionString As String
Public SqlUserID As String
Public SqlPassword As String
SqlUserID = “sa”
SqlPassword = “xxxxx”
SqlPassword = “xxxxx”
SqlConnectionString = vbNullString
SqlConnectionString = SqlConnectionString & _
“Integrated Security = False;”
SqlConnectionString = SqlConnectionString & _
“Data Source=” & SqlDataSource & “;”
SqlConnectionString = SqlConnectionString & _
“Initial Catalog=” & SqlInitialCatalog & “;”
SqlConnectionString = SqlConnectionString & _
“User ID=” & SqlUserID & “;”
SqlConnectionString = SqlConnectionString & _
“Password=” & SqlPassword & “;”
SqlConnectionString = SqlConnectionString & _
“Integrated Security = False;”
SqlConnectionString = SqlConnectionString & _
“Data Source=” & SqlDataSource & “;”
SqlConnectionString = SqlConnectionString & _
“Initial Catalog=” & SqlInitialCatalog & “;”
SqlConnectionString = SqlConnectionString & _
“User ID=” & SqlUserID & “;”
SqlConnectionString = SqlConnectionString & _
“Password=” & SqlPassword & “;”
SqlConnection = New SqlClient.SqlConnection
SqlConnection.ConnectionString = SqlConnectionString
SqlConnection.Open()
SqlConnection.ConnectionString = SqlConnectionString
SqlConnection.Open()
— Kalo habis sqlconnection.open() ada error berarti koneksi gagal bisa cek —-sql connectionstringnya, user and password database
—Contoh u/ query data
Dim SqlCommand As SqlClient.SqlCommand = New SqlClient.SqlCommand
Dim SqlReader As SqlClient.SqlDataReader
Dim SqlReader As SqlClient.SqlDataReader
SetSqlCommand(SqlCommand)
SqlCommand.CommandText = “Nama_Procedure di SQL Server”
SqlCommand.Parameters.Add(“@para”, Trim(strparameter)) ‘ Parameter dari procedure
SqlReader = SqlCommand.ExecuteReader
If SqlReader.HasRows Then
SqlCommand.CommandText = “Nama_Procedure di SQL Server”
SqlCommand.Parameters.Add(“@para”, Trim(strparameter)) ‘ Parameter dari procedure
SqlReader = SqlCommand.ExecuteReader
If SqlReader.HasRows Then
‘Code goes here
‘Jika ada datanya tinggal diproses…..
End If
SqlReader.Close()
SqlCommand.Dispose()
End If
SqlReader.Close()
SqlCommand.Dispose()
Posted by , Published at 04.54 and have
0
komentar
0 Comments
