UAS_REKAYASA PERANGKAT LUNAK

WEB FROM 1

Imports System.Data
Imports System.Data.OleDb



Public Class WebForm1
    Inherits System.Web.UI.Page

    Dim koneksi As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\HERU\Documents\LATIHAN01\dbjoran.accdb"
    Dim objekkoneksi As New OleDb.OleDbConnection(koneksi)
    Dim xReader As OleDb.OleDbDataReader

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

    End Sub

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

        Dim koneksi As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\HERU\Documents\LATIHAN01\dbjoran.accdb"
        Dim objekKoneksi As New OleDbConnection(koneksi)
        objekKoneksi.Open()
        Dim tambah As String = "INSERT INTO TabelJoran values ('" & kodejoran.Text & "','" & namabarang.Text & "','" & merk.Text & "','" & joran.Text & "','" & jenis.Text & "','" & harga.Text & "')"
        Dim oCmd = New OleDbCommand(tambah, objekKoneksi)
        oCmd.ExecuteNonQuery()
        objekKoneksi.Close()
        MsgBox("DATA BERHASIL DISIMPAN")

    End Sub



    Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Response.Redirect("formtabeljoran.aspx")
    End Sub

    Protected Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        kodejoran.Text = ""
        namabarang.Text = ""
        merk.Text = ""
        joran.Text = ""
        jenis.Text = ""
        harga.Text = ""


    End Sub

    Protected Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        If Not Len(kodebarangcari.Text) = 0 Then
            objekkoneksi.Close()
            objekkoneksi.Open()

            Dim ocmd As New OleDb.OleDbCommand(" SELECT * FROM TabelJoran where KODE_Barang='" + kodebarangcari.Text + "'", objekkoneksi)

            xReader = ocmd.ExecuteReader()
            If xReader.HasRows Then
                xReader.Read()
                kodejoran.Text = xReader("KODE_Barang")
                namabarang.Text = xReader("NAMA_Barang")
                merk.Text = xReader("MERK")
                joran.Text = xReader("Panjang_joran")
                jenis.Text = xReader("JENIS")
                harga.Text = xReader("HARGA")

            Else
                kodebarangcari.Text = "Joran tidak ada"

                Exit Sub
            End If
        End If
    End Sub

    Protected Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        Response.Redirect("transaksi.aspx")
    End Sub
End Class




TRANSAKSI



Imports System.Data
Imports System.Data.OleDb

Public Class transaksi
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim koneksi As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\HERU\Documents\LATIHAN01\dbjoran.accdb"
        Dim objekkoneksi As New OleDb.OleDbConnection(koneksi)
    End Sub

    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim bil1, bil2, hasil As Integer

        bil1 = harga2.Text
        bil2 = qty.Text
        hasil = harga2.Text * qty.Text
        total.Text = hasil
    End Sub

    Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim koneksi As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\HERU\Documents\LATIHAN01\dbjoran.accdb"
        Dim objekKoneksi As New OleDbConnection(koneksi)
        objekKoneksi.Open()
        Dim tambah As String = "INSERT INTO Transaksi values ('" & kodemobil2.Text & "','" & namamobil2.Text & "','" & merk2.Text & "','" & tahun2.Text & "','" & harga2.Text & "','" & qty.Text & "','" & total.Text & "')"
        Dim objCmd = New OleDbCommand(tambah, objekKoneksi)
        objCmd.ExecuteNonQuery()
        objekKoneksi.Close()
        MsgBox("DATA BERHASIL DISIMPAN")

    End Sub

    Protected Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Response.Redirect("WebForm1.aspx")
    End Sub

    Protected Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        kodemobil2.Text = ""
        namamobil2.Text = ""
        merk2.Text = ""
        tahun2.Text = ""
        qty.Text = ""
        harga2.Text = ""
        total.Text = ""
    End Sub
End Class

Rekayasa Perangkat Lunak

 gambar aplikasi

gambar pemesan tiket

package penjualan.tiket.bioskop;

/**
 *
 * @author Tri Heru Wicaksono
 */
public class Frame_penjualan_tiket extends javax.swing.JFrame {

    /**
     * Creates new form Frame_penjualan_tiket
     */
    public Frame_penjualan_tiket() {
        initComponents();
    }

    /**
     * This method is called from within the constructor to initialize the form.
     * WARNING: Do NOT modify this code. The content of this method is always
     * regenerated by the Form Editor.
     */
    @SuppressWarnings("unchecked")
    // <editor-fold defaultstate="collapsed" desc="Generated Code">                       
    private void initComponents() {

        jLabel1 = new javax.swing.JLabel();
        jLabel2 = new javax.swing.JLabel();
        jLabel3 = new javax.swing.JLabel();
        jLabel4 = new javax.swing.JLabel();
        jLabel5 = new javax.swing.JLabel();
        jLabel6 = new javax.swing.JLabel();
        NoTiket = new javax.swing.JTextField();
        hargaSatuan = new javax.swing.JTextField();
        jumlahBeli = new javax.swing.JTextField();
        totalBayar = new javax.swing.JTextField();
        reguler = new javax.swing.JRadioButton();
        ultraXD = new javax.swing.JRadioButton();
        btnProses = new javax.swing.JButton();
        btnHapus = new javax.swing.JButton();
        ultraXDAtmos = new javax.swing.JRadioButton();
        gold = new javax.swing.JRadioButton();

        setDefaultCloseOperation(javax.swing.WindowConstants.EXIT_ON_CLOSE);
        setBackground(new java.awt.Color(102, 255, 255));

        jLabel1.setFont(new java.awt.Font("Tahoma", 1, 18)); // NOI18N
        jLabel1.setText("Program Penjualan Tiket Bioskop");

        jLabel2.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        jLabel2.setText("No Tiket");

        jLabel3.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        jLabel3.setText("Jenis Tiket");

        jLabel4.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        jLabel4.setText("Harga Satuan");

        jLabel5.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        jLabel5.setText("Jumlah Beli");

        jLabel6.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        jLabel6.setText("Total Bayar");

        NoTiket.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N

        hargaSatuan.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N

        jumlahBeli.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N

        totalBayar.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N

        reguler.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        reguler.setText("Reguler");
        reguler.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                regulerActionPerformed(evt);
            }
        });

        ultraXD.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        ultraXD.setText("Ultra XD");
        ultraXD.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                ultraXDActionPerformed(evt);
            }
        });

        btnProses.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        btnProses.setText("Proses");
        btnProses.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                btnProsesActionPerformed(evt);
            }
        });

        btnHapus.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        btnHapus.setText("Hapus");
        btnHapus.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                btnHapusActionPerformed(evt);
            }
        });

        ultraXDAtmos.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        ultraXDAtmos.setText("Ultra XD Atmos");
        ultraXDAtmos.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                ultraXDAtmosActionPerformed(evt);
            }
        });

        gold.setFont(new java.awt.Font("Tahoma", 1, 14)); // NOI18N
        gold.setText("Gold");
        gold.addActionListener(new java.awt.event.ActionListener() {
            public void actionPerformed(java.awt.event.ActionEvent evt) {
                goldActionPerformed(evt);
            }
        });

        javax.swing.GroupLayout layout = new javax.swing.GroupLayout(getContentPane());
        getContentPane().setLayout(layout);
        layout.setHorizontalGroup(
            layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
            .addGroup(layout.createSequentialGroup()
                .addContainerGap()
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
                    .addComponent(jLabel4)
                    .addComponent(jLabel5)
                    .addComponent(jLabel6)
                    .addComponent(jLabel3)
                    .addComponent(jLabel2, javax.swing.GroupLayout.PREFERRED_SIZE, 92, javax.swing.GroupLayout.PREFERRED_SIZE))
                .addGap(48, 48, 48)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
                    .addComponent(jumlahBeli)
                    .addComponent(hargaSatuan)
                    .addGroup(layout.createSequentialGroup()
                        .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
                            .addGroup(layout.createSequentialGroup()
                                .addComponent(btnProses)
                                .addPreferredGap(javax.swing.LayoutStyle.ComponentPlacement.RELATED)
                                .addComponent(btnHapus))
                            .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.TRAILING, false)
                                .addComponent(NoTiket, javax.swing.GroupLayout.PREFERRED_SIZE, 247, javax.swing.GroupLayout.PREFERRED_SIZE)
                                .addGroup(layout.createSequentialGroup()
                                    .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
                                        .addComponent(reguler)
                                        .addComponent(ultraXDAtmos))
                                    .addPreferredGap(javax.swing.LayoutStyle.ComponentPlacement.RELATED, javax.swing.GroupLayout.DEFAULT_SIZE, Short.MAX_VALUE)
                                    .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
                                        .addComponent(gold)
                                        .addComponent(ultraXD)))))
                        .addGap(0, 121, Short.MAX_VALUE))
                    .addComponent(totalBayar))
                .addContainerGap(42, javax.swing.GroupLayout.PREFERRED_SIZE))
            .addGroup(layout.createSequentialGroup()
                .addGap(117, 117, 117)
                .addComponent(jLabel1, javax.swing.GroupLayout.PREFERRED_SIZE, 324, javax.swing.GroupLayout.PREFERRED_SIZE)
                .addContainerGap(javax.swing.GroupLayout.DEFAULT_SIZE, Short.MAX_VALUE))
        );
        layout.setVerticalGroup(
            layout.createParallelGroup(javax.swing.GroupLayout.Alignment.LEADING)
            .addGroup(layout.createSequentialGroup()
                .addGap(33, 33, 33)
                .addComponent(jLabel1, javax.swing.GroupLayout.PREFERRED_SIZE, 29, javax.swing.GroupLayout.PREFERRED_SIZE)
                .addGap(50, 50, 50)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(jLabel2)
                    .addComponent(NoTiket, javax.swing.GroupLayout.PREFERRED_SIZE, javax.swing.GroupLayout.DEFAULT_SIZE, javax.swing.GroupLayout.PREFERRED_SIZE))
                .addGap(18, 18, 18)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(jLabel3)
                    .addComponent(reguler)
                    .addComponent(ultraXD))
                .addPreferredGap(javax.swing.LayoutStyle.ComponentPlacement.UNRELATED)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(ultraXDAtmos)
                    .addComponent(gold))
                .addGap(18, 18, 18)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(jLabel4)
                    .addComponent(hargaSatuan, javax.swing.GroupLayout.PREFERRED_SIZE, javax.swing.GroupLayout.DEFAULT_SIZE, javax.swing.GroupLayout.PREFERRED_SIZE))
                .addGap(18, 18, 18)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(jLabel5)
                    .addComponent(jumlahBeli, javax.swing.GroupLayout.PREFERRED_SIZE, javax.swing.GroupLayout.DEFAULT_SIZE, javax.swing.GroupLayout.PREFERRED_SIZE))
                .addGap(32, 32, 32)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(btnProses)
                    .addComponent(btnHapus))
                .addGap(18, 18, 18)
                .addGroup(layout.createParallelGroup(javax.swing.GroupLayout.Alignment.BASELINE)
                    .addComponent(jLabel6)
                    .addComponent(totalBayar, javax.swing.GroupLayout.PREFERRED_SIZE, javax.swing.GroupLayout.DEFAULT_SIZE, javax.swing.GroupLayout.PREFERRED_SIZE))
                .addContainerGap(75, Short.MAX_VALUE))
        );

        pack();
    }// </editor-fold>                     

    private void btnProsesActionPerformed(java.awt.event.ActionEvent evt) {                                       
        // TODO add your handling code here:
        int c = Integer.parseInt(hargaSatuan.getText());
        int d = Integer.parseInt(jumlahBeli.getText());
        int hasilnya = c*d;
        totalBayar.setText("Rp. "+hasilnya);
    }                                       

    private void btnHapusActionPerformed(java.awt.event.ActionEvent evt) {                                       
        // TODO add your handling code here:
        NoTiket.setText("");
        jumlahBeli.setText("");
        hargaSatuan.setText("");
        totalBayar.setText("");
        reguler.setSelected(false);
        ultraXD.setSelected(false);
        reguler.setEnabled(true);
        ultraXD.setEnabled(true);
    }                                     

    private void ultraXDActionPerformed(java.awt.event.ActionEvent evt) {                                     
        // TODO add your handling code here:
        hargaSatuan.setText("55000");
    }                                     

    private void regulerActionPerformed(java.awt.event.ActionEvent evt) {                                     
        // TODO add your handling code here:
        hargaSatuan.setText("50000");
    }                                     

    private void ultraXDAtmosActionPerformed(java.awt.event.ActionEvent evt) {                                           
        // TODO add your handling code here:
        hargaSatuan.setText("60000");
    }                                         

    private void goldActionPerformed(java.awt.event.ActionEvent evt) {                                   
        // TODO add your handling code here:
        hargaSatuan.setText("100000");
    }                                 

    /**
     * @param args the command line arguments
     */
    public static void main(String args[]) {
        /*
         * Set the Nimbus look and feel
         */
        //<editor-fold defaultstate="collapsed" desc=" Look and feel setting code (optional) ">
        /*
         * If Nimbus (introduced in Java SE 6) is not available, stay with the
         * default look and feel. For details see
         * http://download.oracle.com/javase/tutorial/uiswing/lookandfeel/plaf.html
         */
        try {
            for (javax.swing.UIManager.LookAndFeelInfo info : javax.swing.UIManager.getInstalledLookAndFeels()) {
                if ("Nimbus".equals(info.getName())) {
                    javax.swing.UIManager.setLookAndFeel(info.getClassName());
                    break;
                }
            }
        } catch (ClassNotFoundException ex) {
            java.util.logging.Logger.getLogger(Frame_penjualan_tiket.class.getName()).log(java.util.logging.Level.SEVERE, null, ex);
        } catch (InstantiationException ex) {
            java.util.logging.Logger.getLogger(Frame_penjualan_tiket.class.getName()).log(java.util.logging.Level.SEVERE, null, ex);
        } catch (IllegalAccessException ex) {
            java.util.logging.Logger.getLogger(Frame_penjualan_tiket.class.getName()).log(java.util.logging.Level.SEVERE, null, ex);
        } catch (javax.swing.UnsupportedLookAndFeelException ex) {
            java.util.logging.Logger.getLogger(Frame_penjualan_tiket.class.getName()).log(java.util.logging.Level.SEVERE, null, ex);
        }
        //</editor-fold>

        /*
         * Create and display the form
         */
        java.awt.EventQueue.invokeLater(new Runnable() {

            public void run() {
                new Frame_penjualan_tiket().setVisible(true);
            }
        });
    }
    // Variables declaration - do not modify                   
    private javax.swing.JTextField NoTiket;
    private javax.swing.JButton btnHapus;
    private javax.swing.JButton btnProses;
    private javax.swing.JRadioButton gold;
    private javax.swing.JTextField hargaSatuan;
    private javax.swing.JLabel jLabel1;
    private javax.swing.JLabel jLabel2;
    private javax.swing.JLabel jLabel3;
    private javax.swing.JLabel jLabel4;
    private javax.swing.JLabel jLabel5;
    private javax.swing.JLabel jLabel6;
    private javax.swing.JTextField jumlahBeli;
    private javax.swing.JRadioButton reguler;
    private javax.swing.JTextField totalBayar;
    private javax.swing.JRadioButton ultraXD;
    private javax.swing.JRadioButton ultraXDAtmos;
    // End of variables declaration                 
}