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, tangg
Post a Comment
Read more

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 :)
Post a Comment
Read more

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. Tamb
Post a Comment
Read more

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 Module koneksi     Public comSQL As New SqlClient. SqlCommand     Public Sql As String     Public conn As New SqlConnection     Public str As String = "Data Source = LENOVO ;initial catalog =201553072 ;trusted_connection = true"     Public Sub buka_koneksi()         If conn.State = ConnectionState .Closed Then             conn.ConnectionString = str             Try                 conn.Open()             Catch ex As Exception                 MsgBox( "Koneksi gagal :" & ex.ToString)             End Try         End If     End Sub     Public Sub tutup_koneksi()         If conn.State = ConnectionState .Open Then             Try               
Post a Comment
Read more