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                 
}

Motivasi Saya Masuk Jurusan SISTEM INFORMASI

Kenapa  saya masuk SISTEM INFORMATIKA  karena saya ingin mengetahui perkembangaan teknologi computer. Karena saya dulu asal dari sekolah SMK Otomotif dan semua sekarang otomotif telah menjadi satu dengan system computer maka prinsip saya atau analisa saya sendiri saya harus bias menjalani atau mengetahui system computer .

Sekarang dijaman teknologi ini seseorang yang tidak biasa mengoperasikan computer akan ketinggalan jaman,maka dari itu saya ini sekali mendalami atau ingin mengetahu bagaimana cara mengoperasikan computer ini. Dalam bidang otomotif semua mobil terbaru sudah menggunakan sistim computer dan pada mesin mobil sekarang semuanya  bias dicek menggunakan computer.

Saya sendiri pernah melihat di Bengkel TOYOTA dalam pemeriksaan suatu mesin kita biasa melihat kerusakaan atau ke ausan suatu kendaraan menggunakan computer dengan menggunakan kabel data yang ada pada kita biasa melihat kerusakan pada kendaraan. Maka dari situ saya ingin dan mau tau cara pengoperasian computer dalam aplikasi.

Tapi kita tak perlu khawatir mengenai pekerjaan, peranan sistem informasi sangat dibutuhkan di semua bidang. Perusahaan pasti membutuhkan pekerja yang ahli dalam bidang computer, entah dalam merancang sebuah system, mengelola database, atau membuat aplikasi untuk suatu proyeknya. Walaupun begitu, tidak jarang juga pekerja yang akhirnya bekerja tidak pada jurusan awalnya. Mereka yang lebih memilih jalan ini menjadi pengusaha, akuntan, dan sebagainya bukan berarti salah memilih jurusan, pemikiran dimasa perkuliahan akan membentuk ide baru yang berbeda dari biasanya dan akan menentukan jalan sukses kehidupan seseorang.

Demikian pengalaman saya mengenai perkuliahan tentang jurusan informasi. Bagi kalian yang ingin memasuki sekolah tinggi dan terjamin bisa memilih seperti jurusan komputer, karena pada dasarnya sebuah teknologi pasti akan terus dicari dan dikembangkan. Lalu saran saya selanjutnya adalah gunakan hati nurani. Apabila kalian telah memasuki pilihan yang dipilih, ikhlaslah dalam menjalankannya, tekuni serta pelajari isinya. Jangan mengeluh adalah kunci kesuksesan jangka panjang. Mohon maaf apabila ada salah kata yang kurang berkenan. Terimakasih.