Showing posts with label Pemograman. Show all posts
Showing posts with label Pemograman. Show all posts
Source Code Sistim Informasi Izin Usaha Dengan Vb.Net Reviewed by Unknown Date March 26, 2019 Rating: 4,2
FaizarBlogspot Situs sharing-sharing informasi,tips,artikel,edukasi,download dan lainnya 4.4 stars, based on 89 reviews

Source Code Sistim Informasi Izin Usaha Dengan Vb.Net

Silahkan Download Aplikasi Sistim Informasi Izin Usaha Dengan Vb.Net. Berikut Gambaran Aplikasi nya.

                                                     
                                           














Cara Upload Gambar Ke Database Menggunakan Pemograman PHP Reviewed by Unknown Date March 26, 2019 Rating: 4,2
FaizarBlogspot Situs sharing-sharing informasi,tips,artikel,edukasi,download dan lainnya 4.4 stars, based on 89 reviews

Cara Upload Gambar Ke Database Menggunakan Pemograman PHP




1. Buat folder baru di htdocs dengan nama coba-gambar
2. Kemudian ekstrak file rar kedalam folder tersebut :
   kirim-gambar.html
   upload.php
   folder gambar
3. Buat database dalam mysql dengan nama db_gambar
4. Jika anda menggunakan phpmyadmin jalankan query berikut untuk membuat susunan tabelnya :

   DROP TABLE IF EXISTS `tb_gambar`;
   CREATE TABLE IF NOT EXISTS `tb_gambar` (
   `id` int(11) NOT NULL AUTO_INCREMENT,
   `judul_gambar` varchar(30) NOT NULL,
   `nama_file` varchar(50) NOT NULL,
   PRIMARY KEY (`id`)
   ) ENGINE=MyISAM DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

5. kemudian jalankan http://localhost/coba-gambar/kirim-gambar.html

Semua gambar yang diupload akan masuk folder htdocs/coba-gambar/gambar

Selamat mencoba



Cara Validasi TextBox Kosong Di Vb.Net Reviewed by Unknown Date January 22, 2019 Rating: 4,2
FaizarBlogspot Situs sharing-sharing informasi,tips,artikel,edukasi,download dan lainnya 4.4 stars, based on 89 reviews

Cara Validasi TextBox Kosong Di Vb.Net


 Berikut ini adalah cara validasi textbox kosong di vb.net. Tujuan script ini agar data di textbox atau di combo box tidak kosong saat di input.


If textbox1.Text = "" Or textbox2.Text = "" Or combobox1.Text = "" Then
MsgBox("Data Yang Anda Masukan Belum Lengkap...!", MsgBoxStyle.Information, "::Peringatan::")
end if 

Demikian cara validasi data kosong di vb.net terima kasih semoga bermanfaat
Cara Membuat Tabel Database Inventori di Oracle Reviewed by Unknown Date January 19, 2019 Rating: 4,2
FaizarBlogspot Situs sharing-sharing informasi,tips,artikel,edukasi,download dan lainnya 4.4 stars, based on 89 reviews

Cara Membuat Tabel Database Inventori di Oracle




Contoh Kasus
Database Inventori
Memiliki Tabel-Tabel: barang, supplier, customer, pasok dan pembelian
  1. Tabel Barang: menggambarkan entitas barang dan terdiri atas attribute-attribut yang berkaitan dengan entitas barang. Atribut pada tabel barang meliputi: *kode_barang, nama_barang, satuan_barang dan stok_barang
  2. Tabel Supplier: menggambarkan entitas supplier dan terdiri atas atribut-atribut berkaitan dengan entitas supplier. Atribut pada tabel suplier meliputi: *kode_supplier, nama_supplier, alamat_supplier, kota_supplier dan telepon_supplier
  3. Tabel Customer: menggambarkan entitas customer dan terdiri atas atribut-atribut yang berkaitan dengan entitas customer. Atribut pada tabel customer meliputi: *kode_customer, nama_customer, alamat_customer, kota_customer dan telepon_customer
  4. Tabel pasok: menggambarkan entitas pemasokan barang dan terdiri atas atribut-atribut yang berkaitan dengan entitas pasok. Atribut pada tabel pasok meliputi: *kode_pasok, **kode_barang, **kode_supplier, tanggal_pasok dan jumlah_pasok
  5. Tabel Pembelian: menggambarkan entitas pembelian barang dan terdiri atas atribut-atribut yang berkaitan dengan entitas pembelian. Atribut pada tabel pembelian meliputi:*kode_pembelian, **kode_barang, **kode_customer, tanggal_pembelian dan jumlah_pembelian


DATA MANIPULATION LANGUAGE (DDL)
Pada DML dibahas bagaimana cara memanipulasi tabel. Manipulasi yang dimaksud disini adalah meliputi bagaimana cara memasukkan data tau record ke dalam tabel (insert), memperbaharui data (update), menghapus data (delete) dan memilih atau menyeleksi data (select).

  1. Memasukkan Data (Insert)
Pada prinsipnya insert bertujuan mengisikan data/record ke dalam suatu tabel. Pengisian data ini bisa berlaku untuk satu record penuh. Artinya semua field dalam record tersebut akan diisi.
Bentuk umum sintak SQL untuk memasukkan data adalah sebagai berikut.
INSERT INTO nama_tabel (fieldke-1, . . . , field ke-n)
VALUES (nilai_field ke-1, . . . , nilai_field ke-n);
Soal: Isikan data-data berikut ke dalam tabel barang
KODE_BARANG
NAMA_BARANG
SATUAN_BARANG
STOK_BARANG
ELK-01
RICE COOKER
BUAH
20
ELK-02
LEMARI ES
UNIT
8
ELK-03
TELEVISI


ELK-04
RADIO/TAPE
BUAH
35

Jawab: Ketikkan berturut-turut sintak SQL berikut ini.
insert into barang(KODE_BARANG, NAMA_BARANG, SATUAN_BARANG, STOK_BARANG) values(‘ELK-01’, ‘RICE COOKER’, ‘BUAH’, 20);
 insert into barang(KODE_BARANG, NAMA_BARANG, SATUAN_BARANG, STOK_BARANG) values(‘ELK-02’, ‘LEMARI ES’, ‘UNIT’, 8);
insert into barang(KODE_BARANG, NAMA_BARANG) values(‘ELK-03’, ‘TELEVISI’);
insert into barang(KODE_BARANG, NAMA_BARANG, SATUAN_BARANG, STOK_BARANG) values(‘ELK-04’, ‘RADIO/TAPE’, ‘BUAH’, 25);

select * from barang;
Soal: Isikan empat buah record ke dalam tabel supplier sebagai berikut.
KODE_SUPLIER
NAMA_SUPLIER
ALAMAT_SUPLIER
KOTA_SUPLIER
TELEPON_SUPLIER
EJ-01
PT ACTRON
JL THAMRIN 12
BANDA ACEH
(0651) 21211
EJ-02
PT MULYA ELEKTRONIK
JL SUDIRMAN 45
BANDA ACEH
(0651) 21212
EB-01



(0651) 21213
EB-02
PT SUPERTRON
JL INDUSTRI 37
BIREUEN
(0654) 51515

Jawab: Ketikkan berturut-turut sintak SQL berikut ini.
insert into suplier(KODE_SUPLIER, NAMA_SUPLIER, ALAMAT_SUPLIER, KOTA_SUPLIER, TELEPON_SUPLIER) values(‘EJ-01’, ‘PT ACTRON’, ‘JL THAMRIN 12’, ‘BANDA ACEH’, ‘(0651) 21211’);
 insert into suplier(KODE_SUPLIER, NAMA_SUPLIER, ALAMAT_SUPLIER, KOTA_SUPLIER, TELEPON_SUPLIER) values(‘EJ-02’, ‘PT MULYA ELEKTRONIK’, ‘JL SUDIRMAN 45’, ‘BANDA ACEH’, ‘(0651) 21212’);
insert into suplier(KODE_SUPLIER, TELEPON_SUPLIER) values(‘EB-01’, ‘(0651) 21213’);
insert into suplier(KODE_SUPLIER, NAMA_SUPLIER, ALAMAT_SUPLIER, KOTA_SUPLIER, TELEPON_SUPLIER) values(‘EB-02’, ‘PTSUPERTRON’, ‘JL INDUSTRI 37’, ‘BIREUEN’, ‘(0654)51515’);

select * from suplier;


Soal: Isikan empat buah record ke dalam tabel customer sebagai berikut.
KODE_CUSTOMER
NAMA_CUSTOMER
ALAMAT_CUSTOMER
KOTA_CUSTOMER
TELEPON_CUSTOMER
J-001
TOKO KARISMA
JL PANGLIMA POLEM 23
BANDA ACEH
(0651) 61212
J-002
TOKO AYU
JL PANGLIMA POLEM 56
BANDA ACEH
(0651) 31212
B-001



(0651) 41212
B-002
TOKO SURYA
JL ISKANDAR MUDA 55
BIREUEN
(0654) 43433

Jawab: Ketikkan berturut-turut sintak SQL berikut ini.
insert into customer(KODE_CUSTOMER, NAMA_CUSTOMER, ALAMAT_CUSTOMER, KOTA_CUSTOMER, TELEPON_CUSTOMER) values(‘J-001’, ‘TOKO KARISMA’, ‘JL PANGLIMA POLEM 23’, ‘BANDA ACEH’, ‘(0651) 61212’);
insert into customer(KODE_CUSTOMER, NAMA_CUSTOMER, ALAMAT_CUSTOMER, KOTA_CUSTOMER, TELEPON_CUSTOMER) values(‘J-002’, ‘TOKO AYU’, ‘JL PANGLIMA POLEM 56’, ‘BANDA ACEH’, ‘(0651) 31212’);
insert into customer(KODE_CUSTOMER, TELEPON_CUSTOMER) values(‘B-001’, ‘(0651) 41212’);
insert into customer(KODE_CUSTOMER, NAMA_CUSTOMER, ALAMAT_CUSTOMER, KOTA_CUSTOMER, TELEPON_CUSTOMER) values(‘B-002’, ‘TOKO SURYA’, ‘JL ISKANDAR MUDA 55’, ‘BIREUEN’, ‘(0654)43433’);

select * from customer;


Soal: Isilah tabel pasok dengan data berikut.
KODE_PASOK
KODE_BARANG
KODE_SUPLIER
TANGGAL_PASOK
JUMLAH_PASOK
PAS-E001
ELK-01
EJ-01
01-JAN-2012
8
PAS-E002
ELK-01
EJ-02
01-JAN-2012
5
PAS-E003
ELK-02
EJ-01
01-FEB-2012
2
PAS-E004
ELK-02
EJ-02
02-FEB-2012
3
PAS-E005
ELK-02
EB-02
01-JAN-2012
2
PAS-E006
ELK-03
EJ-01
03-MAR-2012
5
PAS-E007
ELK-03
EJ-01
04-MAR-2012
2
PAS-E008
ELK-03
EJ-01
03-MAR-2012
3
PAS-E009
ELK-03
EB-01
13-MAR-2012
4
PAS-E010
ELK-03
EB-01
13-MAR-2012
3
PAS-E011
ELK-04
EB-01
22-APR-2012
12
PAS-E012
ELK-04
EB-02
30-APR-2012
9

Jawab: Ketikkan berturut-turut sintak SQL berikut ini.
insert into pasok values(‘PAS-E001’, ‘ELK-01’, ‘EJ-01’, to_date(’01-01-2012’,’dd-mm-yyyy’), 8);
insert into pasok values(‘PAS-E002’, ‘ELK-01’, ‘EJ-02’, to_date(’01-01-2012’,’dd-mm-yyyy’), 5);
insert into pasok values(‘PAS-E003’, ‘ELK-02’, ‘EJ-01’, to_date(’01-02-2012’,’dd-mm-yyyy’), 2);
insert into pasok values(‘PAS-E004’, ‘ELK-02’, ‘EJ-02’, to_date(’02-02-2012’,’dd-mm-yyyy’), 3);
insert into pasok values(‘PAS-E005’, ‘ELK-02’, ‘EB-02’, to_date(’01-01-2012’,’dd-mm-yyyy’), 2);
insert into pasok values(‘PAS-E006’, ‘ELK-03’, ‘EJ-01’, to_date(’03-03-2012’,’dd-mm-yyyy’), 5);
insert into pasok values(‘PAS-E007’, ‘ELK-03’, ‘EJ-01’, to_date(’04-03-2012’,’dd-mm-yyyy’), 2);
insert into pasok values(‘PAS-E008’, ‘ELK-03’, ‘EJ-01’, to_date(’03-03-2012’,’dd-mm-yyyy’), 3);
insert into pasok values(‘PAS-E009’, ‘ELK-03’, ‘EB-01’, to_date(’13-03-2012’,’dd-mm-yyyy’), 4);
insert into pasok values(‘PAS-E010’, ‘ELK-03’, ‘EB-01’, to_date(’13-03-2012’,’dd-mm-yyyy’), 3);
insert into pasok values(‘PAS-E011’, ‘ELK-04’, ‘EB-01’, to_date(’22-04-2012’,’dd-mm-yyyy’), 12);
insert into pasok values(‘PAS-E012’, ‘ELK-04’, ‘EB-02’, to_date(’30-04-2012’,’dd-mm-yyyy’), 9);

select * from pasok;


Soal: Isilah tabel pembelian dengan data berikut.
KODE_PEMBELIAN
KODE_BARANG
KODE_CUSTOMER
TANGGAL_PEMBELIAN
JUMLAH_PEMBELIAN
BEL-E001
ELK-01
J-0001
20-MAY-2012
3
BEL-E002
ELK-01
J-0001
21-MAY-2012
4
BEL-E003
ELK-01
J-0002
20-MAY-2012
2
BEL-E004
ELK-01
B-0001
20-MAY-2012
2
BEL-E005
ELK-01
B-0002
22-MAY-2012
3
BEL-E006
ELK-02
J-0001
24-JUNI-2012
1
BEL-E007
ELK-02
J-0002
24-JUNI-2012
1
BEL-E008
ELK-02
B-0001
25-JUNI-2012
2
BEL-E009
ELK-02
B-0002
25-JUNI-2012
2
BEL-E010
ELK-03
J-0001
20-JUNI-2012
5
BEL-E011
ELK-03
J-0002
02-JULI-2012
4
BEL-E012
ELK-03
B-0001
04-JULI-2012
6

Jawab: Ketikkan berturut-turut sintak SQL berikut ini.
insert into pembelian values(‘BEL-E001’, ‘ELK-01’, ‘J-0001’, to_date(’20-05-2012’,’dd-mm-yyyy’), 3);
insert into pembelian values(‘BEL-E002’, ‘ELK-01’, ‘J-0001’, to_date(’21-05-2012’,’dd-mm-yyyy’), 4);
insert into pembelian values(‘BEL-E003’, ‘ELK-01’, ‘J-0002’, to_date(’20-05-2012’,’dd-mm-yyyy’), 2);
insert into pembelian values(‘BEL-E004’, ‘ELK-01’, ‘B-0001’, to_date(’20-05-2012’,’dd-mm-yyyy’), 2);
insert into pembelian values(‘BEL-E005’, ‘ELK-01’, ‘B-0002’, to_date(’22-05-2012’,’dd-mm-yyyy’), 3);
insert into pembelian values(‘BEL-E006’, ‘ELK-02’, ‘J-0001’, to_date(’24-06-2012’,’dd-mm-yyyy’), 1);
insert into pembelian values(‘BEL-E007’, ‘ELK-02’, ‘J-0002’, to_date(’24-06-2012’,’dd-mm-yyyy’), 1);
insert into pembelian values(‘BEL-E008’, ‘ELK-02’, ‘B-0001’, to_date(’25-06-2012’,’dd-mm-yyyy’), 2);
insert into pembelian values(‘BEL-E009’, ‘ELK-02’, ‘B-0002’, to_date(’25-06-2012’,’dd-mm-yyyy’), 2);
insert into pembelian values(‘BEL-E010’, ‘ELK-03’, ‘J-0001’, to_date(’20-06-2012’,’dd-mm-yyyy’), 5);
insert into pembelian values(‘BEL-E011’, ‘ELK-03’, ‘J-0002’, to_date(’02-07-2012’,’dd-mm-yyyy’), 4);
insert into pembelian values(‘BEL-E012’, ‘ELK-04’, ‘J-0001’, to_date(’04-07-2012’,’dd-mm-yyyy’), 6);
insert into pembelian values(‘BEL-E013’, ‘ELK-04’, ‘J-0002’, to_date(’10-07-2012’,’dd-mm-yyyy’), 5);


select * from pembelian;

  1. Memperbaharui Data (Update)
Pada prinsipnya update adalah memperbaharui data lama dengan data yang baru atau data terkini. Jadi perintah update ini digunakan apabila sudah ada suatu data atau record, namun record tersebut ternyata salah. Kesalahan pada satu record ini bisa terjadi hanya pada satu field saja atau seluruh field pada record tersebut.
Sintak update adalah sebagai berikut.
UPDATE  nama_tabel
SET           nama_field = data_baru
WHERE    nama_field = data_lama

Soal: Pada tabel barang yaitu pada field satuan barang dan field stok barang untuk kode barang ELK-03 terlihat kosong (tidak ada isinya). Isikan pada field satuan_barang dengan UNIT dan field stok_barang dengan 30.

Jawab: Ketikkan sintak sql berikut ini.
update barang
set SATUAN_BARANG = ‘UNIT’
where KODE_BARANG= ‘ELK-03’;

update barang
set STOK_BARANG = ‘30’
where KODE_BARANG= ‘ELK-03’;

select * from barang;

Seo Komentar