Vb .Net - Menciptakan Form Admin Aplikasi Penjualan

Kembali lagi di Tutorial Visual Basic .Net, Karena banyak yang Submit VB .Net pada TUTORIAL APA YANG KAMU SUKA bada web ini, maka akan kami lanjutkan kembali Tutorial VB .NET. ini yaitu tahap ke Enam dalam menciptakan Aplikasi Penjualan Dengan VB .Net.

Berikut langkahnya :
Buka Project anda sebelumnya :

Pada tahap sebelumnya anda telah sukses menciptakan Form Login dan Logout, sekarang saatnya kita akan menciptakan Form Admin, dimana form admin berfungsi untuk menginput, edit, delete data admin yang dipakai untuk Login ke Aplikasi Penjualan.


Klik Project - Add Form

Buatlah Form dengan nama : FormMasterAdmin.vb
Kemudian Klik Add
Maka akan muncul FormMasterAdmin, lalu buatlah design form menyerupai gambar dibawah ini :

Pada FormMenuUtama untuk memanggil FormMasterAdmin :

  Private Sub AdminToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AdminToolStripMenuItem.Click         FormMasterAdmin.ShowDialog() End Sub 

Kemudian masukan Koding dibawah ini pada FormMasterAdmin :

  Imports System.Data.SqlClient Public Class FormMasterAdmin     'Untuk Memunculkan di ComboBox     Sub TampilStatus()         ComboBox1.Items.Clear()         ComboBox1.Items.Add("ADMIN")         ComboBox1.Items.Add("USER")     End Sub     'Untuk Menampilkan Data di DataGridView     Sub TampilGrid()         Call Koneksi()         DA = New SqlDataAdapter("select kodeAdmin as Kode,NamaAdmin as Nama,LevelAdmin as Level From tbl_admin", CONN)         DS = New DataSet         DA.Fill(DS, "tbl_Admin")         DataGridView1.DataSource = DS.Tables("tbl_Admin")         DataGridView1.ReadOnly = True     End Sub      Private Sub FormMasterAdmin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         Call TampilStatus()         Call TampilGrid()     End Sub End Class 

Note :
Koding pada FormMasterAdmin diatas yaitu hanya untuk memunculkan Data di DataGridView dan ComboBox. Adapaun untuk Input, Edit dan Delete nya anda dapat buka tutorial dibawah ini :

1. Cara Input Data Kedalam Database Dengan VB .Net 2010
2. Cara Edit Data Didalam Database Dengan VB .Net 2010
3. Cara Hapus Data Didalam Database Dengan VB .Net 2010

Jika sudah mempelajari 3 Tutorial diatas seharusny anda sudah dapat menciptakan FormMasterAdmin dengan benar. Atau anda dapat buka Tutorial kami di Youtube untuk memperjelasnya..

Pembuatan FormMasterAdmin selesai, ikuti terus pembelajaran dari kami sleanjutnya..

<<Tahap Sebelumnya

Tahap Selanjutnya>>

Vb .Net - Menciptakan Tabel Pelanggan Dan Barang Aplikasi Penjualan

Pada tahap ini akan kami lanjutkan Tutorial Step by Step menciptakan Aplikasi Penjualan dengan VB .net dengan database SQL Server. Ini dalah Tahap ke Tujuh dalam melanjutkan pembuatan Aplikasi Penjualan VB .Net.

Jika dilihat pada Form Menu Utama, kita akan menciptakan Form Master Admin, Pelanggan dan Barang, sedangkan yang sudah kita buat pada Database gres TBL_ADMIN. oleh alasannya ialah itu kita akan menciptakan Tabel Pelanggan dan Tabel Barang terlebih dahulu pada Database SQL Server

Silahkan buka : SQL Server Management Studio pada komputer anda

Klik Connect
Buatlah Tabel pada DBJNMJUAL

TBL_PELANGGAN

TBL_BARANG

Jika sudah Klik Save, dan kita akan melanjutkan pada Tahap 8

<<Tahap Sebelumnya

Tahap Selanjutnya>>

Vb .Net - Menciptakan Form Pelanggan Aplikasi Penjualan

Kita lanjutkan kembali Tutorial VB .Net aplikasi Penjualan dengan database SQL Server. Ini yakni tahap ke 9 (sembilan) dalam menciptakan Aplikasi penjualan dengan Visual Basic .Net, jikalau anda gres bergabung di tutorial kali ini, alangkah baiknya anda mengikuti dari tahap pertama hingga tahap sebelumnya yaitu tahap ke 7.

Berikut langkah dalam menciptakan Form Pelanggan.
Buka Project VB .Net anda sebelumnya.

Pada gambar diatas, anda telah sukses menciptakan Form Master Admin, dimana data yang diinput, edit dan delete berfungsi untuk menciptakan account untuk login ke Aplikasi

Klik Project - Add Form

Buatlah nama form : FormMasterPelanggan.vb
Jika sudah Klik Add
Buatlah Design FormMasterPelanggan ibarat gambar dibawah ini :

Pada FormMenuUtama, untuk memanggil FormMasterPelanggan yakni :

Kemudian masukan koding dibawah ini pada FormMasterPelanggan :

  Private Sub PelangganToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PelangganToolStripMenuItem.Click         FormMasterPelanggan.ShowDialog() End Sub 

Masukan Koding Dibawah ini Pada FormMasterPelanggan

Imports System.Data.SqlClient Public Class FormMasterPelanggan     Sub KondisiAwal()         TextBox1.Text = ""         TextBox2.Text = ""         TextBox3.Text = ""         TextBox4.Text = ""         Call TampilGrid()     End Sub     Sub TampilGrid()         Call Koneksi()         DA = New SqlDataAdapter("select * From tbl_Pelanggan", CONN)         DS = New DataSet         DA.Fill(DS, "tbl_Pelanggan")         DataGridView1.DataSource = DS.Tables("tbl_Pelanggan")         DataGridView1.ReadOnly = True     End Sub      Private Sub FormMasterPelanggan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         Call KondisiAwal()     End Sub End Class  

 Silahkan anda Run Project Aplikasi VB .Net anda, silahkan ikuti terus tehap demi tahap dalam menciptakan Aplikasi Penjualan dengan SQL Server

Note :
Koding pada FormMasterPelanggan diatas yakni hanya untuk memunculkan Data di DataGridView saja. Adapaun untuk Input, Edit dan Delete nya anda dapat buka tutorial dibawah ini :

1. Cara Input Data Kedalam Database Dengan VB .Net 2010
2. Cara Edit Data Didalam Database Dengan VB .Net 2010
3. Cara Hapus Data Didalam Database Dengan VB .Net 2010

Jika sudah mempelajari 3 Tutorial diatas seharusny anda sudah dapat menciptakan FormMasterPelanggan dengan benar. Atau anda dapat buka Tutorial kami di Youtube untuk memperjelasnya..

<<Tahap Sebelumnya

Tahap Selanjutnya>>

Cara Menciptakan Sharing Folder Pada Windows 7

Pada Tutorial kali ini kami akan membahas tentang Cara Membuat Sharing Folder Pada Windows 7. Jika anda pernah melaksanakan Sharing folder pada windows XP maka anda akan dengan gampang melaksanakan sharing folder, namun kalau anda memakai Windows 7 atau windows 8, 10, maka akan sedikit hambatan dimana security pada windows 7 lebih baik dari windows XP. namun damai saja anda perlu melaksanakan 1 satu langkah saja dan tidak ribet koq.. Hehhehehe...

Oh ya, bagi rekan rekan yang belum mengetahui apa itu sharing folder, sebelumnya akan kami jelaskan terlebih dahulu. Salah satu keunggulan Jaringan komputer yakni kita sanggup melaksanakan sharing folder, dimana folder tersebut bebas dimanfaatkan untuk mengisi apapun yang nantinya akan dipakai oleh beberapa user dalam jaringan tersebut. Manfaatnya yakni kita sanggup mengakses data dalam folder tersebut tanpa harus terdapat di komputer si user. Folder di taruh di PC server, lalu banyak user sanggup mengaksesnya. Bayangkan kalau di sebuah kantor ada 10 lantai dan tiap lantai ada beberapa user, salah satu user di lantai 10 akan mengirimkan data kepada user yang ada di Lantai 1. Maka user di lantai 10 tidak harus turun ke lantai 1 untuk memperlihatkan data, cukup di kirim ke Share Folder di server, lalu User 1 sanggup membuka atau mengambilnya di Share Folder tersebut. Gimana sangat bermanfaat sekali bukan????

Baiklah, berikut ini akan kami berikan pengetahuan kepada anda bagaimana cara menciptakan share folder pada Windows 7.

Siapkan 2 komputer ( 1 sebagai Client, dan 1 sebagai Server )
Komputer 1 :
Ip Address : 192.168.1.2
Subnet Mask : 255.255.255.0

Komputer 2 :
IP Address : 192.168.1.3
Subnet Mask : 255.255.255.0

Kedua komputer tersebut harus terkoneksi jaringan ( anda sanggup memakai Peer to Peer atau di hubungkan dengan Switch )

Jika komputer 1 dan kompuer 2 sudah terhubung, Buatlah folder pada drive D: di komputer 1.
Nama Folder : Share Folder
Klik Kanan - Properties

Klik Share

Kemudian carai Everyone, lalu klik Add

Kemudian Klik Share.
Terakhir, klik Done

Jika sudah, untuk sanggup mengaksesnya anda gunakan komputer 2, alasannya yakni komputer 1 dipakai sebagai Server.
Buka komputer anda

Klik \\192.168.1.2\Share Folder
Klik ENTER

Jika sudah, maka disitu anda sanggup kanal dan anda sanggup memasukan data yang diperlukan.

Jika muncul user name dan password maka anda harus setting ke Control Panel.
Langkahnya anda sanggup Klik DISINI

Demikian step by step dalam Membuat Sharing Folder Pada Windows 7. supaya bermanfat untuk anda.

Cara Mengatasi Muncul Password Pada Sharing Folder Windows 7

Pada tutorial Jaringan komputer kali ini, kami akan membahas ihwal "Cara Mengatasi Muncul Password Pada Sharing Folder Windows 7". Pertanyaan ini muncul dari rekan kita yang mengirim email ke kami dikarenakan saat menciptakan sharing folder pada windows 7 muncul user name dan password padahal berdasarkan informasinya sudah memperlihatkan hak susukan full ( read & write ) pada user everyone.

Jika anda pernah mengalami menyerupai ini, anda tidak perlu khawatir sebab menyerupai yang kami jelaskan pada Tutorial sebelumnya bahwa windows 7 memiliki security lebih bagus, dan anda perlu setting pada control panel di windows anda.

Silahkan gunakan komputer yang dipakai untuk menciptakan sharing Folder
Klik Control Panel

Klik Network and Sharing Center

Kemudian klik Change advanced sharing setting menyerupai gambar diatas

Kemudian, pastikan anda checklist menyerupai gambar diatas
dan yang terkahir, cari hidangan Password Protected Sharing.
Kemudian pilih Turn Off menyerupai gambar dibawah

Jika sudah klik Save Changes

Kemudian silahkan dicoba kembali. Dengan langkah diatas, seharusnya saat susukan Share Folder sudah tidak muncul user name dan password lagi.
Untuk menciptakan Share Folder didalam sebuah Jaringan anda dapat KLIK DISINI

Demikianlah Cara Mengatasi Muncul Password Pada Sharing Folder Windows 7, biar bermanfaat untuk anda :)

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 ialah menyerupai gambar dibawah ini :

Jika sudah silahkan Save lalu anda sanggup mengisi data menyerupai 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, aku menciptakan form dengan nama Form1, lalu terdapat DatagridView, TextBox1, TextBox2, TextBox3, TextBox4, Label, Button1 dan Button2

Jika sudah menciptakan form1 menyerupai 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 isyarat yang berwarna kuning dengan nama komputer anda

Tutorial diatas ialah memakai Visual Basic .NET database SQL Server. Dengan Tutorial diatas anda juga sanggup memakai 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 sanggup Klik Link Ini untuk mendapat index tutorial VB .NET dari JNM.

Vb .Net - Cara Edit Data Pada Database

Pada pembelajaran kali ini, kami akan membahas wacana Visual Basic .Net 2010 yaitu VB .NET - Cara Edit Data Pada Database. Database yang kami gunakan ialah memakai database SQL Server R2.

Berikut langkahnya :
Buka komputer anda
Buka SQL Server Management Studio.
Buatlah Database dengan nama : DBJNM
Buatlah tabel dengan nama : TBL_PEGAWAI.
Design TBL_PEGAWAI ialah menyerupai gambar dibawah ini :

Jika sudah silahkan Save lalu anda sanggup mengisi data menyerupai 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, aku menciptakan form dengan nama Form1, lalu terdapat DatagridView, TextBox1, TextBox2, TextBox3, TextBox4, Label, Button1 dan Button2

Jika sudah menciptakan form1 menyerupai 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 RD As SqlDataReader     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"))         DataGridView1.ReadOnly = True         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 edit As String = "update tbl_pegawai set nama_pegawai='" & TextBox2.Text & "',Alamat_Pegawai='" & TextBox3.Text & "',Telp_Pegawai='" & TextBox4.Text & "' where NIP='" & TextBox1.Text & "'"             CMD = New SqlCommand(edit, Conn)             CMD.ExecuteNonQuery()             MsgBox("Data berhasil di Edit", MsgBoxStyle.Information, "Information")             Call KondisiAwal()         End If     End Sub      Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click         End     End Sub     Private Sub DataGridView1_CellDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick         Call Koneksi()         Dim i As Integer         i = DataGridView1.CurrentRow.Index         CMD = New SqlCommand("Select * from TBL_PEGAWAI where NIP='" & DataGridView1.Item(0, i).Value & "'", Conn)         RD = CMD.ExecuteReader         RD.Read()         If Not RD.HasRows Then             TextBox2.Focus()         Else             TextBox1.Text = RD.Item("NIP")             TextBox2.Text = RD.Item("Nama_Pegawai")             TextBox3.Text = RD.Item("Alamat_pegawai")             TextBox4.Text = RD.Item("Telp_Pegawai")             TextBox2.Focus()         End If     End Sub End Class 

Jika sudah, silahkan anda run, lalu untuk cara editnya ialah :

Silahkan Double Klik pada datagrid view1, bila sudah muncul data, silahkan edit datanya. Jika sudah final maka anda sanggup Klik Edit.

Note :
Silahkan samakan aba-aba yang berwarna kuning dengan nama komputer anda

Demikianlah Tutorial VB .NET - Cara Edit Data Pada Database., agar bermanfaat untuk anda :)