Posts

Tugas Pengganti UAS PSQL

Image
Assalamu'alaikum wr.wb
Hai guys, kali ini kita membahas tentang sebuah aplikasi yang berbasis dekstop.

Judul : Sistem Informasi Pendataan Kematian

Disini akan menjelaskan bagaimana tampilan programnya serta cara menjalankannya

1. Desain Form Login


Isikan ussername dengan admin dan passwordnya isi dengan 12345678
2. Form Menu .

Selanjutnya ketika sudah berhasil memasukkan ussername dan password maka akan langsung masuk ke form menu, dan ketika diklik data akan mencul tampilan sebagai berikut :

3. Form Data Ibu


Ini merupakan form data ibu yang terdiri dari NIK ibu, Nama ibu, Alamat, Tanggal Lahir dan       No.Hp , kemudia di lengkapi dengan tombol simpan ubah dan hapus untuk menjalankan sistemnya.
4. Form Data Ayah

Form ini hampir sama dengan form data ibu, cara menjalankannyapun juga sama.
5. Form Data Jenazah

Form ini terdiri dari no kematian, nama jenazah, jenis kelamin, alamat, penyebab kematian, pelapor, tanggal kematian, nik ibu, nama ibu, tanggal lahir ibu, nik ayah,nama ayah,  t…

Tugas Akhir Praktek Pemrograman SQL "Kerangka Sistem Informarasi Puskesmas"

Image
Assalmu'alaikum..
Hai guys, meski dalam keadaan puasa jangan pernah lelah dan tetap semangat  terutama saat ada tugas akhir. Untuk membuat sebuah aplikasi kita harus membuat kerangkanya terlebih dahulu, berikut merupakan kerangka untuk membuat sebuah aplikasi puskesmas.

1. Deain Tabel serta relasinya




2. Desain HIPO (Hirarki Input Process Output)

Semoga bermanfaat :)




Praktek 7 - Praktek Pemrograman SQL

Image
Assalamu'alaikum kawan.. kali ini akan membuat tabel retur penjualan, berikut merupakan script sqlnya :
Tabel Retur ini berpacu pada tabel penjualan 










1. Isi data, ambil dari tabel penjualan, 2 record unutk diretur. Namun sebelumnya kita membuat Tabel Retur       terlebih dahulu Membuat Tabel:
create table retur(     NoRetur varchar(10) primary key,     NoNota varchar(10),     TanggalRetur date,     JumlahRetur int,     KeteranganCacat varchar(50),     foreign key(Nonota) references penjualan(Nonota))
Mengisi Tabel Retur : insert into retur     values     ('R001','JUAL002','2017/03/22',5,'Kadaluarsa'),     ('R002','JUAL001','2017/03/20',3,'Kemasan rusak')





3. Update stok barang
    update Barang set jumlah=150-50 where kdbrg='005'
    update Barang set jumlah=80-20 where kdbrg='010'















6. Tambahkan 5 data retur insert into retur values ('R003','JUAL003','2017/04/20',7,'Kemasan Rusak'), ('…

Aplikasi Toko Menggunakan vb.net dan SQL Server

Image
Tugas Kelompok

Hay guys, kali ini kita akan belajar membuat sebuah aplikasi menggunakan vb.net sebagai bahasa pemrogramannya dan SQL server sebagai databasenya.

Cara mengkoneksikan vb.net dengan database SQL server :

#Module Imports System.Data.SqlClient Modulekoneksi Public comSQL AsNew SqlClient.SqlCommand Public Sql AsString Public conn AsNewSqlConnection Public str AsString = "Data Source = LENOVO ;initial catalog =201553072 ;trusted_connection = true" PublicSub buka_koneksi() If conn.State = ConnectionState.Closed Then             conn.ConnectionString = str Try                 conn.Open() Catch ex AsException