HomeNet

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\LENOVO\Desktop\DBKORBAN.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 Button2_Click(sender As Object, e As EventArgs) Handles BTNLIHAT.Click Response.Redirect("WebFormView.aspx") End Sub Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles BTNSIMPAN.Click objekKoneksi.Open() Dim tambah As String = "INSERT INTO TableKorban values('" & TextNAMA.Text & "','" & TextALAMAT.Text & "','" & TextKELAMIN.Text & "','" & TextUSIA.Text & "','" ...

selamat datang di blogger gua guys Disini saya membuat aplikasi Penjualan Berbagai jenis Vespa, aplikasi ini digunakan untuk kasir atau membantu mempermudah pembayaran dalam membeli Berbagai jenis vespa. Ini Hasilnya Sourcode nya Imports excel = Microsoft.Office.Interop.Excel Imports word = Microsoft.Office.Interop.Word Public Class Form1 Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged PictureBox1.Image = System.Drawing.Image.FromFile("E:\baum\vespa\PX150.jpg") TxtProdik.Text = "PX150" Txtharga.Text = "3.000.000" Txtmesin.Text = "150 CC" TxtProduk.Text = "00001" CheckBox1.Checked = True End Sub Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox2.CheckedChanged PictureBox1.Image = System.Drawing.Image.FromFile("E:\baum\vespa\excel.jpg") TxtProdik.Text = ...

Pada awalnya dulu saya daftar kuliah di sebuah kampus yang ada di tanggerang, tepatnya di pamulang. tadinya saya tidak ada niat untuk mengambil jurusan SI, cuman karena hari itu saya tidak lolos seleksi untuk kuliah di unpam, akhirnya saya dilempar dari unpam ke eresha setelah di lempar ke eresha, saya dikasih kesempatan satu kali lagi untuk memilih jurusan. ada dua jurusan waktu itu TI ( TEHNIK INFORMATIKA ),SI ( SISTEM INFORMASI ). setelah itu saya mikir untuk manakah yang saya mau ambil TI ataukah SI. dan ternyata saya memilih TI tapi dikarenakan saya pada waktu itu saya salah menceklkis yang tadinya mau milih TI tapi yang saya ceklis malah SI mungkin itu sudah jalan saya untuk kedepannnya untuk kuliah di eresha dan mengambil jurusan SI. motivasi saya kuliah di eresha dan mengambil jurusan SI motivasinya mudah2han yang saya pelajari sekarang bisa menjadi ilmu yang bermanfaat didunia dan diakhirat nanti

Islam merupakan salah satu agama yang berkembang pesat di seluruh dunia. Tidak menjadi rahasia umum lagi bahwa Negara Indonesia adalah Negara dengan penduduk muslim terbanyak di dunia. Setiap umat islam wajib menjalankan segala perintah dan menjahui larangan dalam syariat islam, tidak terkecuali. Walaupun mereka seorang pemimpin Negara, pengusaha, orang kaya,orang miskin mereka semua tetap berkewajiban untuk menjalankan perintah dalam agama islam. Kata mutiara islam ini digunakan untuk menjadikan seorang muslim agar lebih taat lagi dalam menjalankan syariat islam. Dalam artikel kali ini saya akan sedikit berbagai beberapa kata mutiara islam yang isyaallah akan menambah semagat kalian dalam beribadah. Dalam artikel ini setidaknya kalian akan menjumpai sekitar 500 kata mutiara islami. Langsung saja berikut beberapa contoh kata mutiara islami yang menginspirasi hidup kali contoh nya seperti ini : “Kamu tidak berhak mengeluarkan air mata untuk seseorang yang belum halal bagimu” “Jang...

untuk codingan nya dibawah ini : /*  * To change this license header, choose License Headers in Project Properties.  * To change this template file, choose Tools | Templates  * and open the template in the editor.  */ package ujian.akhir.semester; import java.awt.EventQueue; import java.beans.Beans; import java.util.ArrayList; import java.util.List; import javax.persistence.RollbackException; import javax.swing.JFrame; import javax.swing.JPanel; /**  *  * @author User  */ public class dbhewankurban extends JPanel {         public dbhewankurban() {         initComponents();         if (!Beans.isDesignTime()) {             entityManager.getTransaction().begin();         }     }     /**   ...

Ini Source Code Untuk Program Diatas /*  * To change this license header, choose License Headers in Project Properties.  * To change this template file, choose Tools | Templates  * and open the template in the editor.  */ /**  * @author User  */ public class HomenetHilman extends javax.swing.JFrame {     /**      * Creates new form HomenetHilman      */     public HomenetHilman() {         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"> ...