Aplikasi Penjualan Toko Elektro

   Assalamu'alaikum Warahmatullahi Wabarakatuh

   Salah satu tugas Ujian Akhir Semester, dan untuk memenuhi kelengkapan nilai mata kuliah Pemograman 1 di STMIK ERESHA. Untuk penjelasannya penulis sudah membuat perancangannya di pekan uas lalu. 
   Progam yang telah di buat adalah Aplikasi Toko Elektro, mungkin ini hanya program sederhana saja atau bisa dibilang program untuk progamer pemula. Deskripsi dari program ini adalah untuk user sudah bisa menyimpan data, menghapus data ,dan mengedit data yang sudah tersimpan. Dalam artian program yang saya sudah buat ini, user sudah bisa memanipulasi semua data yang akan di input/diberikan user dan sesuai keinginan nya.

Untuk pengoprasian nya ;
- Input data Toko Elektro,
- Simpan
- Beli
- Tampil
- Cari

- Data yang sudah di simpan , sudah terkoneksi oleh database Ms. Acces

Yang akan saya berikan di Blog ini :
- Contoh Design
- Source code
- Hasil Run

*Contoh Design*

*Grid View*

 

*Data Base*

- Hasil RUN

- Button Cari -

- Button Beli -

-Button Tampil-

-Button Simpan-

- Source Code untuk deklarasi nya

Imports System.Data

Imports System.Data.SqlClient

Imports System.Data.OleDb

Public Class FromBeli

    Inherits System.Web.UI.Page

    Private constring As String = ConfigurationManager.ConnectionStrings("ConnectionString4").ConnectionString

    Private oConn As New OleDbConnection(constring)

    Private xReader As OleDbDataReader

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

End Sub

    Protected Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click

        oConn.Close()

        oConn.Open()

        Dim ocmd As New OleDb.OleDbCommand("SELECT * FROM TableLaptop where KODE =" & DropDownList1.SelectedValue() & "", oConn)

        xReader = ocmd.ExecuteReader

        If xReader.HasRows Then

            xReader.Read()

            tbBarang.Text = xReader("NamaBarang")

            tbHarga.Text = xReader("Harga")

        Else

            tbBarang.Text = "barang Tidak ada"

        End If

        xReader.Close()

    End Sub

    Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

        tbTotal.Text = tbHarga.Text * tbJumlah.Text

    End Sub

    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim sql As String = "INSERT INTO TableToko VALUES ('" & tbNama.Text & "','" & DropDownList1.Text & "','" & tbBarang.Text & "','" & tbHarga.Text & "','" & tbJumlah.Text & "','" & tbTotal.Text & "')"

        Dim oCmd As New OleDbCommand

        oConn.Open()

        oCmd.Connection = oConn

        oCmd.CommandText = sql

        oCmd.ExecuteNonQuery()

    End Sub

    Protected Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Response.Redirect("FromPembeli.aspx")

    End Sub

End Class

Toko Elektro - Netbeans 8.2, XAMPP, ireport

Juli 21, 2017

Assalammualaikum wr. wrb.

                       Untuk memenuhi salah satu tugas UAS di STMIK ERESHA-UNPAM VIKTOR. Saya telah membuat gambarannya di soal uas kemarin dan saya sudah implementasikannya ,Program yang telah saya buat adalah Daftar Mahasiswa.Untuk menjalakannya user hanya menginput nim,nama,fakultas,dll. Data yang di input sudah masuk ke database . Berikut tampilan ,formula, dan screenshot program yang telah dibuat.

1.Buat database MYSQL di XAMPP.

2.Buat Design nya di netbeans

3.Tambah kan jar 

Objek yang digunakan : 1. TextBox 2. DropDownList 3. Button 4. JLabel

Aplikasi Penjualan Menggunakan Microsoft Visual Studio 2012

April 25, 2018

Assalammualaikum wr. wrb.

  Untuk memenuhi kelengkapan nilai mata kuliah pemograman1 di STMIK ERESHA, sebelumnya saya sudah membuat perancangannya di pekan uts lalu.  Progam yang telah saya buat adalah Aplikasi penjualan alat - alat olahraga, mungkin ini hanya program sederhana saja atau bisa dibilang program untuk progamer pemula.
oke lanjutt, untuk pengoprasiannya ;
- User hanya memilih kode barang yang sudah dibuat, kode yang dipilih sudah mengautomatiskan nama dan harga
- Harga yang dibeli oleh user , di kalikan dengan jumlah yang akan dibeli
- Setiap total bayar akan dikenakan pajak sekitar 5%
- Nah, Jumlah uang tunai user yang diberikan akan dikurangi dengan, jumlah total bayar yang sudah dikenai pajak tadi.(Uang kembalian)
- Data yang sudah di hitung tadi, user bisa menyimpannya di Ms.Word atau Ms.Excel


Yang akan saya berikan di Blog ini :
- Contoh Design
- Source code
- Hasil Run