Judul : Belajar VB .NET - Cara Input Data Kedalam Database
link : Belajar VB .NET - Cara Input Data Kedalam Database
Belajar VB .NET - Cara Input Data Kedalam Database
Kembali di Tutorial Visual Basic .Net, kali ini kami akan membahas tentang Cara Input atau Insert Data Kedalam Database Dengan Menggunakan VB .Net 2010 dan Database SQL Server 2008.Berikut langkahnya :
Buka Komputer anda
Silahkan masuk ke Microsoft SQL Server Management Studio
Buatlah Database dengan nama : DBJNM
Kemudian buatlah Tabel dengan nama : TBL_PEGAWAI
Design TBL_PEGAWAI adalah seperti gambar dibawah ini :
Jika sudah silahkan Save kemudian anda bisa mengisi data seperti gambar dibawah ini ( Optional )
Jika sudah mari kita lanjut ke Aplikasi VB .Net anda
Buka Visual Basic .Net anda
Kemudian Buatlah Design Form Seperti gambar dibawah ini :
Pada gambar diatas, saya membuat form dengan nama Form1, kemudian terdapat DatagridView, TextBox1, TextBox2, TextBox3, TextBox4, Label, Button1 dan Button2
Jika sudah membuat form1 seperti gambar diatas, silahkan masukan koding dibawah ini :
Imports System.Data.SqlClient
Public Class Form1
Dim Conn As SqlConnection
Dim da As SqlDataAdapter
Dim ds As DataSet
Dim CMD As SqlCommand
Dim LokasiDB As String
Sub Koneksi()
LokasiDB = "data source=JAVANET001;initial catalog=DBJNM;integrated security =true"
Conn = New SqlConnection(LokasiDB)
If Conn.State = ConnectionState.Closed Then Conn.Open()
End Sub
Sub KondisiAwal()
Koneksi()
da = New SqlDataAdapter("Select * from TBL_PEGAWAI", Conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "TBL_PEGAWAI")
DataGridView1.DataSource = (ds.Tables("TBL_PEGAWAI"))
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call KondisiAwal()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then
MsgBox("Data belum lengkap, Pastikan NIP 6 Digit dan Semua form terisi")
Exit Sub
Else
Call Koneksi()
Dim simpan As String = "insert into TBL_PEGAWAI values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "')"
CMD = New SqlCommand(simpan, Conn)
CMD.ExecuteNonQuery()
MsgBox("Data berhasil di Input", MsgBoxStyle.Information, "Information")
Call KondisiAwal()
End If
End Sub
End Class
Jika sudah, silahkan Running atau jalankan Project anda
Note :
Silahkan samakan kode yang berwarna kuning dengan nama komputer anda
Tutorial diatas adalah menggunakan Visual Basic .NET database SQL Server. Dengan Tutorial diatas anda juga bisa menggunakan database MySQL maupun Access.
Silahkan KLIK DISINI Untuk mendownload Source Code Project diatas
Silahakn KLIK DISINI Untuk mengetaui panduan atau cara downloadnya
Demikian Cara Input atau Insert Data Kedalam Database Dengan Menggunakan VB .Net 2010 dan Database SQL Server 2008 Semoga bermanfaat untuk anda. Anda bisa Klik Link Ini untuk mendapatkan index tutorial VB .NET dari JNM.
Demikianlah Artikel Belajar VB .NET - Cara Input Data Kedalam Database
Sekianlah artikel Belajar VB .NET - Cara Input Data Kedalam Database kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.
Anda sekarang membaca artikel Belajar VB .NET - Cara Input Data Kedalam Database dengan alamat link https://menjadiembohgakro.blogspot.com/2016/01/belajar-vb-net-cara-input-data-kedalam.html