java

SEJARAH

Java pertama lahir dari The Green Project, yang berjalan selama 18 bulan, dari awal tahun 1991 hingga musim panas 1992. Proyek tersebut belum menggunakan versi yang dinamakan Oak. Proyek ini dimotori oleh Patrick Naughton, Mike Sheridan, James Gosling dan Bill Joy, beserta sembilan pemrogram lainnya dari Sun Microsystems. Salah satu hasil proyek ini adalah maskot Duke yang dibuat oleh Joe Palrang.

Pertemuan proyek berlangsung di sebuah gedung perkantoran Sand Hill Road di Menlo Park. Sekitar musim panas 1992 proyek ini ditutup dengan menghasilkan sebuah program Java Oak pertama, yang ditujukan sebagai pengendali sebuah peralatan dengan teknologi layar sentuh (touch screen), seperti pada PDA sekarang ini. Teknologi baru ini dinamai "*7" (Star Seven).

Setelah era Star Seven selesai, sebuah anak perusahaan TV kabel tertarik ditambah beberapa orang dari proyek The Green Project. Mereka memusatkan kegiatannya pada sebuah ruangan kantor di 100 Hamilton Avenue, Palo Alto.

Perusahaan baru ini bertambah maju: jumlah karyawan meningkat dalam waktu singkat dari 13 menjadi 70 orang. Pada rentang waktu ini juga ditetapkan pemakaian Internet sebagai medium yang menjembatani kerja dan ide di antara mereka. Pada awal tahun 1990-an, Internet masih merupakan rintisan, yang dipakai hanya di kalangan akademisi dan militer.

Mereka menjadikan perambah (browser) Mosaic sebagai landasan awal untuk membuat perambah Java pertama yang dinamai Web Runner, terinsipirasi dari film 1980-an, Blade Runner. Pada perkembangan rilis pertama, Web Runner berganti nama menjadi Hot Java.

Pada sekitar bulan Maret 1995, untuk pertama kali kode sumber Java versi 1.0a2 dibuka. Kesuksesan mereka diikuti dengan untuk pemeritaan pertama kali pada surat kabar San Jose Mercury News pada tanggal 23 Mei 1995.

Sayang terjadi perpecahan di antara mereka suatu hari pada pukul 04.00 di sebuah ruangan hotel Sheraton Palace. Tiga dari pimpinan utama proyek, Eric Schmidt dan George Paolini dari Sun Microsystems bersama Marc Andreessen, membentuk Netscape.

Nama Oak, diambil dari pohon oak yang tumbuh di depan jendela ruangan kerja "bapak java", James Gosling. Nama Oak ini tidak dipakai untuk versi release Java karena sebuah perangkat lunak sudah terdaftar dengan merek dagang tersebut, sehingga diambil nama penggantinya menjadi "Java". Nama ini diambil dari kopi murni yang digiling langsung dari biji (kopi tubruk) kesukaan Gosling.

VERSI

Versi awal Java ditahun 1996 sudah merupakan versi release sehingga dinamakan Java Versi 1.0. Java versi ini menyertakan banyak paket standar awal yang terus dikembangkan pada versi selanjutnya:

· java.lang: Peruntukan kelas elemen-elemen dasar.

· java.io: Peruntukan kelas input dan output, termasuk penggunaan berkas.

· java.util: Peruntukan kelas pelengkap seperti kelas struktur data dan kelas kelas penanggalan.

· java.net: Peruntukan kelas TCP/IP, yang memungkinkan berkomunikasi dengan komputer lain menggunakan jaringan TCP/IP.

· java.awt: Kelas dasar untuk aplikasi antarmuka dengan pengguna (GUI)

· java.applet: Kelas dasar aplikasi antar muka untuk diterapkan pada penjelajah web.

KELEBIHAN

· Multiplatform. Kelebihan utama dari Java ialah dapat dijalankan di beberapa platform / sistem operasi komputer, sesuai dengan prinsip tulis sekali, jalankan di mana saja. Dengan kelebihan ini pemrogram cukup menulis sebuah program Java dan dikompilasi (diubah, dari bahasa yang dimengerti manusia menjadi bahasa mesin / bytecode) sekali lalu hasilnya dapat dijalankan di atas beberapa platform tanpa perubahan. Kelebihan ini memungkinkan sebuah program berbasis java dikerjakan diatas operating system Linux tetapi dijalankan dengan baik di atas Microsoft Windows. Platform yang didukung sampai saat ini adalah Microsoft Windows, Linux, Mac OS dan Sun Solaris. Penyebanya adalah setiap sistem operasi menggunakan programnya sendiri-sendiri (yang dapat diunduh dari situs Java) untuk meninterpretasikan bytecode tersebut.

· OOP (Object Oriented Programming - Pemrogram Berorientasi Objek) yang artinya semua aspek yang terdapat di Java adalah Objek. Java merupakan salah satu bahasa pemrograman berbasis oebjek secara murni. Semua tipe data diturunkan dari kelas dasar yang disebut Object. Hal ini sangat memudahkan pemrogram untuk mendesain, membuat, mengembangkan dan mengalokasi kesalahan sebuah program dengan basis Java secara cepat, tepat, mudah dan terorganisir. Kelebihan ini menjadikan Java sebagai salah satu bahasa pemograman termudah, bahkan untuk fungsi fungsi yang advance seperti komunikasi antara komputer sekalipun.

· Perpustakaan Kelas Yang Lengkap, Java terkenal dengan kelengkapan library/perpustakaan (kumpulan program program yang disertakan dalam pemrograman java) yang sangat memudahkan dalam penggunaan oleh para pemrogram untuk membangun aplikasinya. Kelengkapan perpustakaan ini ditambah dengan keberadaan komunitas Java yang besar yang terus menerus membuat perpustakaan-perpustakaan baru untuk melingkupi seluruh kebutuhan pembangunan aplikasi.

· Bergaya C++, memiliki sintaks seperti bahasa pemrograman [C++] sehingga menarik banyak pemrogram C++ untuk pindah ke Java. Saat ini pengguna Java sangat banyak, sebagian besar adalah pemrogram C++ yang pindah ke Java. Universitas-universitas di Amerika juga mulai berpindah dengan mengajarkan Java kepada murid-murid yang baru karena lebih mudah dipahami oleh murid dan dapat berguna juga bagi mereka yang bukan mengambil jurusan komputer.

· Pengumpulan sampah otomatis, memiliki fasilitas pengaturan penggunaan memori sehingga para pemrogram tidak perlu melakukan pengaturan memori secara langsung (seperti halnya dalam bahasa C++ yang dipakai secara luas).

KEKURANGAN

· Tulis sekali, perbaiki di mana saja - Masih ada beberapa hal yang tidak kompatibel antara platform satu dengan platform lain. Untuk J2SE, misalnya SWT-AWT bridge yang sampai sekarang tidak berfungsi pada Mac OS X.

· Mudah didekompilasi. Dekompilasi adalah proses membalikkan dari kode jadi menjadi kode sumber. Ini dimungkinkan karena koe jadi Java merupakan bytecode yang menyimpan banyak atribut bahasa tingkat tinggi, seperti nama-nama kelas, metode, dan tipe data. Hal yang sama juga terjadi pada Microsoft .NET Platform. Dengan demikian, algoritma yang digunakan program akan lebih sulit disembunyikan dan mudah dibajak/direverse-engineer.

· Penggunaan memori yang banyak. Penggunaan memori untuk program berbasis Java jauh lebih besar daripada bahasa tingkat tinggi generasi sebelumnya seperti C/C++ dan Pascal (lebih spesifik lagi, Delphi dan Object Pascal). Biasanya ini bukan merupakan masalah bagi pihak yang menggunakan teknologi terbaru (karena trend memori terpasang makin murah), tetapi menjadi masalah bagi mereka yang masih harus berkutat dengan mesin komputer berumur lebih dari 4 tahun.

Pengaruh Keturunan Terhadap Kadar Kolesterol Dan Lemak

Posted on December 2, 2010 by Artikel Kedokteran

Hasil studi para pakar ilmu kedokteran menunjukkan bahwa berbagai penyakit mempunyai hubungan dengan keturunan. Dalam suatu keluarga, ketahanan atau kerentanan seorang anggota keluarga terhadap penyakit kelihatannya mempunyai keterkaitan. Sebagai contoh, pada beberapa kasus, kolesterol darah menunjukkan peningkatan karena mengkonsumsi banyak lemak jenuh. Akan tetapi, berbagai penelitian memperlihatkan bahwa bagaimanapun banyaknya lemak jenuh diturunkan lewat diit, sebagian di antara mereka dalam studi populasi itu tidak dapat menurunkan tingkat kolesterol mereka dengan melakukan diit saja.

Keadaan di atas dapat dijelaskan oleh ilmu biologi atau genetika bahwa kromosom adalah bagian sel yang memuat sifat-sifat keturunan (genetika). Gen untuk sifat-sifat tertentu (specific-trait) diturunkan secara berpasangan, yaitu kita memerlukan satu gen dari ibu dan satu gen dari ayah.
Dalam kaitan antara keturunan dengan kadar kolesterol dan lemak yang abnormal, dikenal adanya beberapa fenomena yang di antaranya adalah:
- Kolesterol yang amat tinggi dalam satu keluarga (Familial Hypercholesterolemia – FH). Di sini kadar total kolesterol dan LDL amat tinggi jauh di atas kadar normal.
- HDL yang terlalu rendah dalam satu keluarga (Hypo-HDL). Dalam hal ini kadar HDL terlalu rendah, di bawah 35 mg/dl.
- Kombinasi lipida yang terlalu tinggi dalam satu keluarga (Famlial Combined Hyperlipidemia – FCH). Di sini terjadi kadar lipida yang terlalu tinggi dengan kombinasi yang berbeda-beda pada satu keluarga.
- Trigliserida yang terlalu tinggi dalam satu keluarga (Familial Hypertriglyceridemia – FHT). Dalam hal ini kadar trigliserida amat tinggi.
Meskipun faktor keturunan tidak dapat dicegah atau dihindari, tetapi dengan penanganan yang tepat, dampak negatif yang ditimbulkannya mungkin dapat dikurangi atau dibatasi.
Pustaka

Definisi Laptop Notebook Netbook

Definisi Laptop Notebook Netbook

Laptop / Notebook

Laptop / Notebook (Komputer jinjing) adalah komputer bergerak yang berukuran relatif kecil dan ringan, beratnya berkisar dari 1-6 kg, tergantung ukuran, bahan, dan spesifikasi laptop tersebut.

Sumber daya komputer jinjing berasal dari baterai atau adaptor A/C yang dapat digunakan untuk mengisi ulang baterai dan menyalakan laptop itu sendiri. Baterai laptop pada umumnya dapat bertahan sekitar 1 hingga 6 jam sebelum akhirnya habis, tergantung dari cara pemakaian, spesifikasi, dan ukuran baterai.

Sebagai komputer pribadi, laptop memiliki fungsi yang sama dengan komputer destop (desktop computers) pada umumnya. Komponen yang terdapat di dalamnya sama persis dengan komponen pada destop, hanya saja ukurannya diperkecil, dijadikan lebih ringan, lebih tidak panas, dan lebih hemat daya. Komputer jinjing kebanyakan menggunakan layar LCD (Liquid Crystal Display) berukuran 10 inci hingga 17 inci tergantung dari ukuran laptop itu sendiri. Selain itu papan ketik yang terdapat pada laptop juga kadang-kadang dilengkapi dengan papan sentuh yang berfungsi sebagai "pengganti" mouse Papan ketik dan mouse tambahan dapat dipasang melalui soket USB maupun PS/2 jika tersedia.

Berbeda dengan komputer desktop, komputer jinjing memiliki komponen pendukung yang didesain secara khusus untuk mengakomodasi sifat komputer jinjing yang portabel. Sifat utama yang dimiliki oleh komponen penyusun laptop adalah ukuran yang kecil, hemat konsumsi energi, dan efisien. Komputer jinjing biasanya berharga lebih mahal, tergantung dari merek dan spesifikasi komponen penyusunnya, walaupun demikian harga komputer jinjing pun semakin mendekati desktop seiring dengan semakin tingginya tingkat permintaan konsumen.

Netbook 

Netbook merupakan salah satu varian dari komputer jinjing yang dirancang untuk memenuhi kebutuhan komunikasi nirkabel dan mengakses internet. Dengan rancangan utama untuk digunakan sebagai perangkat dalam merambah web, dan menulis surat elektronik, netbook sangat bergantung pada keberadaan internet untuk akses jarak jauh terhadap aplikasi berbasis web untuk pengguna yang tidak membutuhkan keberadaan komputer berspesifikasi tinggi. Netbook biasanya menggunakan Windows XP ataupun Linux sebagai basis sistem operasi daripada sistem operasi yang memakan sumber daya komputer yang lebih besar seperti Windows Vista. Ukuran perangkat ini berkisar 4.8 inci hingga lebih dari 13 inci umumnya memiliki berat antara 2 hingga 3 pond (~1 kg) dan biasanya lebih murah dari pada laptop.

Demikian semoga berguna informasi ini.

Program Kalkulator Sederhana

uses wincrt;
var x,y,hasil:real;
jawab:char;
begin
  write ('masukan angka ke-1:');readln (x);
  write ('pilih operator: (+)/(-)/(*)/(/)');readln (jawab);
  write ('masukan angka ke-2:');readln (y);
  if ( jawab= '+') then
  begin
    hasil:= x+y
  end;
  if ( jawab = '-') then
  begin
    hasil:= x-y
  end;
  if ( jawab = '*') then
  begin
    hasil:= x*y
  end;
  if (jawab='/') then
  begin
    hasil:= x/y
  end;
  write ('hasilnya: ',(hasil):5:2);
end.

Cara Membuat Kalkulator dengan Visual Basic 6.0

Program kalkulator adalah program standar yang sudah tersedia di Microsoft Windows. Tetapi, tak ada salahnya jika kita mencoba membuat kalkulator sendiri dengan Microsoft Visual Basic 6.0.
Pertama-tama, buatlah sebuah form sesuai selera Anda, yang bentuknya kurang lebih seperti
kalkulator standar Windows, seperti ini:




Untuk properties dari masing-masing objek, saya contohkan seperti dibawah ini, dengan letak
masing-masing objek disesuaikan dengan gambar diatas.
Textbox 1:
(Name) : txtDisplay
Alignment: 1-Right Justify
Text : (kosongkan)
Maxlength : 12

Command Button 1:
(Name) : cmdAngka
Index : 1
Caption : 1

Command Button 2:
(Name) : cmdAngka
Index : 2
Caption : 2

Command Button 3:
(Name) : cmdAngka
Index : 3
Caption : 3

Command Button 4:
(Name) : cmdAngka
Index : 4
Caption : 4

Command Button 5:
(Name) : cmdAngka
Index : 5
Caption : 5

Command Button 6:
(Name) : cmdAngka
Index : 6
Caption : 6

Command Button 7:
(Name) : cmdAngka
Index : 7
Caption : 7

Command Button 8:
(Name) : cmdAngka
Index : 8
Caption : 8

Command Button 9:
(Name) : cmdAngka
Index : 9
Caption : 9

Command Button 10:
(Name) : cmdAngka
Index : 0
Caption : 0

Command Button 11:
(Name) : cmdPlusMinus
Caption : +/-

Command Button 12:
(Name) : cmdKoma
Caption : .

Command Button 13:
(Name) : cmdOperator
Index : 1
Caption : +

Command Button 14:
(Name) : cmdOperator
Index : 2
Caption : -

Command Button 15:
(Name) : cmdOperator
Index : 3
Caption : x

Command Button 16:
(Name) : cmdOperator
Index : 4
Caption : /

Command Button 17:
(Name) : cmdClearEntry
Caption : CE

Command Button 18:
(Name) : cmdClear
Caption : C

Command Button 19:
(Name) : cmdSamaDengan
Caption : =

Berikutnya, Anda tinggal membuat coding dari kalkulator tersebut. Jika Anda mengikuti semua
setting properties seperti diatas, maka codingnya saya contohkan seperti ini:

Option Explicit
Private Hasil As Double
Private Const opNol = 0
Private Const opTambah = 1
Private Const opKurang = 2
Private Const opKali = 3
Private Const opBagi = 4
Private Operator As Integer
Private NilaiBaru As Boolean

' untuk menghapus karakter terakhir
Private Sub Hapus()
Dim txt As String
Dim min_len As Integer
txt = txtDisplay.Text
If Left$(txt, 1) = "-" Then
min_len = 2
Else
min_len = 1
End If
If Len(txt) > min_len Then
txtDisplay.Text = Left$(txt, Len(txt) - 1)
Else
txtDisplay.Text = "0"
End If
End Sub

' hapus angka, hasil terakhir dan operator
Private Sub cmdClear_Click()
cmdClearEntry_Click
Hasil = 0
Operator = opNol
End Sub
' hapus angka
Private Sub cmdClearEntry_Click()
txtDisplay.Text = ""
End Sub
' menambahkan koma (desimal)
Private Sub cmdKoma_Click()
If InStr(txtDisplay.Text, ".") Then
Beep
Else
If NilaiBaru Then
txtDisplay.Text = "."
NilaiBaru = False
Else
txtDisplay.Text = txtDisplay.Text & "."
End If
End If
End Sub

' Menghitung
Private Sub cmdSamaDengan_Click()
Dim HasilBaru As Double
If txtDisplay.Text = "" Then
HasilBaru = 0
Else
HasilBaru = CDbl(txtDisplay.Text)
End If
Select Case Operator
Case opNol
Hasil = HasilBaru
Case opTambah
Hasil = Hasil + HasilBaru
Case opKurang
Hasil = Hasil - HasilBaru
Case opKali
Hasil = Hasil * HasilBaru
Case opBagi
'Tidak bisa dibagi nol
If HasilBaru = 0 Then
MsgBox "Tidak bisa dibagi 0", vbOKOnly + vbCritical, "Kalku ERROR"
Call cmdClear_Click
Else
Hasil = Hasil / HasilBaru
End If
End Select
Operator = opNol
NilaiBaru = True
txtDisplay.Text = Format$(Hasil)
End Sub

' menuliskan angka
Private Sub cmdAngka_Click(Index As Integer)
If NilaiBaru Then
txtDisplay.Text = Format$(Index)
NilaiBaru = False
Else
txtDisplay.Text = _
txtDisplay.Text & Format$(Index)
End If
End Sub
' tombol tambah/kurang/bagi/kali
Private Sub cmdOperator_Click(Index As Integer)
cmdSamaDengan_Click
Operator = Index
NilaiBaru = True
End Sub

' merubah tanda +/-
Private Sub cmdPlusMinus_Click()
If NilaiBaru Then
txtDisplay.Text = "-"
ElseIf Left$(txtDisplay.Text, 1) = "-" Then
txtDisplay.Text = Right$(txtDisplay.Text, 2)
Else
txtDisplay.Text = "-" & txtDisplay.Text
End If
End Sub

' filter untuk angka saja yg dapat diketikkan
Private Sub Form_KeyPress(KeyAscii As Integer)
txtDisplay_KeyPress KeyAscii
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
txtDisplay_KeyUp KeyCode, Shift
End Sub
' supaya kursor tetap di kanan
Private Sub txtDisplay_Change()
txtDisplay.SelStart = Len(txtDisplay.Text)
End Sub
Private Sub txtDisplay_GotFocus()
txtDisplay_Change
End Sub

' untuk mengetikkan angka di keyboard
Private Sub txtDisplay_KeyPress(KeyAscii As Integer)
Dim ch As String
ch = Chr$(KeyAscii)
Select Case ch
Case "0"
cmdAngka_Click 0
Case "1"
cmdAngka_Click 1
Case "2"
cmdAngka_Click 2
Case "3"
cmdAngka_Click 3
Case "4"
cmdAngka_Click 4
Case "5"
cmdAngka_Click 5
Case "6"
cmdAngka_Click 6
Case "7"
cmdAngka_Click 7
Case "8"
cmdAngka_Click 8
Case "9"
cmdAngka_Click 9
Case "*", "x", "X"
cmdOperator_Click opKali
Case "+"
cmdOperator_Click opTambah
Case vbCrLf, vbCr, "="
cmdSamaDengan_Click
Case "-"
cmdOperator_Click opKurang
Case "."
cmdKoma_Click
Case "/"
cmdOperator_Click opBagi
Case "C", "c"
cmdClearEntry_Click
End Select
KeyAscii = 0
End Sub

' untuk ketikan angka di numpad
Private Sub txtDisplay_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyNumpad0
cmdAngka_Click 0
Case vbKeyNumpad1
cmdAngka_Click 1
Case vbKeyNumpad2
cmdAngka_Click 2
Case vbKeyNumpad3
cmdAngka_Click 3
Case vbKeyNumpad4
cmdAngka_Click 4
Case vbKeyNumpad5
cmdAngka_Click 5
Case vbKeyNumpad6
cmdAngka_Click 6
Case vbKeyNumpad7
cmdAngka_Click 7
Case vbKeyNumpad8
cmdAngka_Click 8
Case vbKeyNumpad9
cmdAngka_Click 9
Case vbKeyMultiply
cmdOperator_Click opKali
Case vbKeyAdd
cmdOperator_Click opTambah
Case vbKeySeparator
cmdSamaDengan_Click
Case vbKeySubtract
cmdOperator_Click opKurang
Case vbKeyDivide
cmdOperator_Click opBagi
Case vbKeyDecimal
cmdKoma_Click
Case vbKeyBack, vbKeyDelete
Hapus
End Select
KeyCode = 0
End Sub

program KASIR. dengan vb

Pada tutorial ini anda akan belajar bagaimana membuat aplikasi client server menggunakan visual basic & MYSQL Untuk lebih memperjelas pemahaman anda akan digunakan studi kasus program KASIR. Dimana pada implemantasinya nanti, aplikasi yang dibuat akan terpisah dengan database. Database akan ditempatkan pada sebuah server dan aplikasi dapat ditempatkan pada beberapa komputer client. Untuk pengembangan / pembuatan aplikasinya sendiri dapat dilakukan di komputer lokal terlebih dahulu. Adapun yang anda perlukan pada tutorial ini, yaitu visual basic, MYSQL, dan Mysql Connector-ODBC. MYSQL dan MYSQL Connector ODBC dapat anda download di www.mysql.com. MYSQL Connector ODBC dibutuhkan agar dapat melakukan koneksi database MYSQL dari VB
Setelahnya semuanya terinstall mulailah membuat database MYSQL beserta tabel - tabelnya. Buatlah sebuah database dengan nama kasir, dan buat 5 tabel seperti di bawah:
Tabel user_login

Field	Tipe Data
user_login_id	varchar(50) *
user_name	varchar(100)
user_psw	varchar(20)

Tabel product

Field	Tipe Data
product_id	varchar(40) *
product_name	varchar(100)
price	double
stock	integer

Tabel transaksi

Fields	Tipe Data
no_transaksi	integer (auto increment) *
tgl_transaksi	datetime
total_barang	integer
total_harga	double
kasir	varchar(50)

Tabel detail_transaksi

Fields	Tipe Data
no_transaksi	integer
product_id	varchar(40)
jumlah	integer
harga_satuan	double

Tabel transaksi_temp

Fields	Tipe Data
no_transaksi	integer
product_id	varchar(40)
jumlah	integer
harga_satuan	double

* Primary Key

Tabel user_login digunakan untuk menyimpan data pengguna aplikasi, tabel product digunakan untuk menyimpan data product yang dijual. Tabel transaksi untuk menyimpan data transaksi dan tabel detail_transaksi untuk menyimpan detail dari transaksi yang dilakukan. Sedangkan tabel traksaksi_temp digunakan untuk mencatat secara sementara detail traksaksi yang dilakukan, setelah transaksi selesai dilakukan baru dipindahkan ke tabel transaksi.
Setelah database dan kasir selesai dibuat tambahkan data (insert data) pada tabel user dengan data berikut:

user_login_id	user_name	user_psw
admin	Administrator	admin

langkah selanjutnya adalah mempersiapkan koneksi ke database. Ikutilah langkah-langkah di bawah ini.

1. Buka control panel, double klik pada Administrative Tools, kemudian double klik pada Data Sources (ODBC). Dan akan muncul window kurang lebih seperti berikut:
   
2. Klik pada System DSN, dan klik tombol Add, dan akan muncul window seperti berikut:
   
3. Pilih MySQL ODBC 3.5.1 Driver, dan klik tombol Finish, dan akan tampil window berikut :
   
4. Kemudian isi form di atas dengan data seperti berikut:
   
5. Klik tombol Test, jika muncul kotak dialog yang menyatakan sukses, tekan OK dan tekan OK sekali lagi.

Setelah selesai sekarang anda telah siap untuk membuat Aplikasi KASIR..

Membuat Form Utama Administrator dan Form Login

Buka microsoft visual basic anda dan buat Standar EXE project. Setelah project dibuat akan langsung terbentuk sebuah form. Tambahkan label dan tombol serta atur propertiesnya seperti berikut :

Komponent	Properties
Form1	Name : main_form Caption : Administration
Label1	Caption : Welcome,
Label2	Name : label_user Caption : User
Command1	Name : btn_user Caption : User
Command2	Name : btn_product Caption : Product
Command3	Name : btn_trans Caption : Transaksi
Command4	Name : btn_report Caption : Report

Setelah diatur propertinya maka hasilnya adalah seperti berikut:

Admin Form
Kemudian Buat Form baru dengan cara, klik Menu Project, Add Form. Akan tampil window Add Form dan pilih Log In Dialog serta klik tombol open. Hasilnya seperti di bawah:

Form Login
Sekarang buka notepad dan ketik kode di bawah:

[Data]
DB=kasir
SERVER=localhost
Uid=root
Password=root

Kemudian simpan di direktori c:\windows dengan nama koneksi.ini, file koneksi.ini berfungsi untuk menyimpan data yang diperlukan untuk koneksi ke database. Pada bagian DB berisi nama database yang akan digunakan, SERVER berisi IP address Server tempat database disimpan (untuk sementara gunakan lokalhost). Uid berisi database user name dan Password adalah password database.
Sekarang Kembali ke Editor Visual Studio. Pilih Menu Project, Add Module untuk membuat module. Pada window Add Module klik Open. Download File berikut ini, kemudian copy dan paste isi file tersebut pada module yang sedang dibuat. Setelah selesai simpan module tersebut. Kemudian Klik menu Project, References dan akan muncul window project reference. Centang pada bagian Micosoft ActiveX Data Objects 2.0 Library dan tekan tombol OK.
Sekarang beralih ke form login, double click pada tombol OK, Hapus script yang telah ada dan ganti dengan script di bawah:

Private Sub cmdOK_Click()
Call Koneksi
Dim RS As ADODB.Recordset
Set RS = New ADODB.Recordset
Dim SQL As String
'query untuk login
SQL = "select * from user_login where user_login_id='" & txtUserName.Text & "'"
'membuka koneksi ke databse
RS.CursorLocation = adUseClient
RS.Open SQL, conn, adOpenDynamic, adLockOptimistic
'cek kebenaran user_login_id
If (RS.RecordCount > 0) Then
'cek kebenaran password
If (RS!user_psw = txtPassword.Text) Then
user_login_id = txtUserName.Text
user_name = RS!user_name
Load main_form
main_form.Show
Unload Me
Else
MsgBox "Maaf Password Salah"
End If
Else
MsgBox "Maaf User Name Salah"
End If
End Sub

Kemudian double click pada tombol Cancel, hapus script yang telah ada dan ganti dengan script berikut:

Private Sub cmdCancel_Click()
Dim pil As VbMsgBoxResult
pil = MsgBox("Anda Yakin untuk keluar?", vbQuestion + vbYesNo, "Exit")
If (pil = vbYes) Then Unload Me
End Sub

Setelah selesai pilih menu Project, properties. Pada window Project Properties di bagian Startup Object pilih frmLogin. Kemudian tekan tombol OK.
Sekarang beralih ke admin_form, double click pada form dan ketik script berikut :

Private Sub Form_Load()
label_user.Caption = user_name
End Sub

Setelah selesai simpan project anda dengan nama kasir dan coba untuk menjalankanya dengan menekan tombol F5 pada keybord.

---

Pada tutorial Membuat Aplikasi Client Server dengan VB & MYSQL ini anda telah belajar bagimana menginstall MySQL connector ODBC, melakukan koneksi ke database MySQL dengan ADODB, serta membuat system login.  Pada tutorial selanjutnya akan dijelaskan Proses membaca data dari tabel, menampilkan data, menambahkan data ke tabel, mengedit record pada tabel dan menghapus record. Jika ada suatu pertanyaan atau ada yang tidak anda mengerti dari tutorial ini silahkan tanyakan ke forum.

Referensi

• Download MySQL Connector ODBC
• Download MySQL Database Server

 

Menghadapi era globalisasi ekonomi, ancaman bahaya laten terorisme, komunisme dan fundamentalisme merupakan sebuah tantangan tersendiri bagi bangsa Indonesia. Disamping itu yang patut diwaspadai adalah pengelompokan suku bangsa di Indonesia yang kini semakin kuat. Ketika bangsa ini kembali dicoba oleh pengaruh asing untuk dikotak kotakan tidak saja oleh konflik vertikal tetapi juga oleh pandangan terhadap ke Tuhanan Yang Maha Esa.

Pemahaman Nasionalisme yang berkurang

Di saat negara membutuhkan soliditas dan persatuan hingga sikap gotong royong, sebagian kecil masyarakat terutama justru yang ada di perkotaan justru lebih mengutamakan kelompoknya, golonganya bahkan negara lain dibandingkan kepentingan negaranya. Untuk itu sebaiknya setiap komponen masyarakat saling berinterospeksi diri untuk dikemudian bersatu bahu membahu membawa bangsa ini dari keterpurukan dan krisis multidimensi.

Menghadapi era globalisasi ekonomi, ancaman bahaya laten terorisme, komunisme dan fundamentalisme merupakan sebuah tantangan tersendiri bagi bangsa Indonesia. Disamping itu yang patut diwaspadai adalah pengelompokan suku bangsa di Indonesia yang kini semakin kuat. Ketika bangsa ini kembali dicoba oleh pengaruh asing untuk dikotak kotakan tidak saja oleh konflik vertikal tetapi juga oleh pandangan terhadap ke Tuhanan Yang Maha Esa.

Pemahaman Nasionalisme yang berkurang

Di saat negara membutuhkan soliditas dan persatuan hingga sikap gotong royong, sebagian kecil masyarakat terutama justru yang ada di perkotaan justru lebih mengutamakan kelompoknya, golonganya bahkan negara lain dibandingkan kepentingan negaranya. Untuk itu sebaiknya setiap komponen masyarakat saling berinterospeksi diri untuk dikemudian bersatu bahu membahu membawa bangsa ini dari keterpurukan dan krisis multidimensi.

Salah satu persyaratan mutlak harus dimiliki oleh sebuah negara adalah wilayah kedaulatan, di samping rakyat dan pemerintahan yang diakui. Konsep dasar wilayah negara kepulauan telah diletakkan melalui Deklarasi Djuanda 13 Desember 1957. Deklarasi tersebut memiliki nilai sangat strategis bagi bangsa Indonesia, karena telah melahirkan konsep Wawasan Nusantara yang menyatukan wilayah Indonesia. Laut Nusantara bukan lagi sebagai pemisah, akan tetapi sebagai pemersatu bangsa Indonesia yang disikapi sebagai wilayah kedaulatan mutlak Negara Kesatuan Republik Indonesia.

Ada bangsa yang secara eksplisit mempunyai cara bagaimana ia memandang tanah airnya beserta lingkungannya. Cara pandang itu biasa dinamakan wawasan nasional. Sebagai contoh, Inggris dengan pandangan nasionalnya berbunyi: “Brittain rules the waves”. Ini berarti tanah Inggris bukan hanya sebatas pulaunya, tetapi juga lautnya.

Tetapi cukup banyak juga negara yang tidak mempunyai wawasan, seperti: Thailand, Perancis, Myanmar dan sebagainya. Indonesia wawasan nasionalnya adalah wawasan nusantara yang disingkat wasantara. Wasantara ialah cara pandang bangsa Indonesia berdasarkan Pancasila dan Undang-Undang Dasar 1945 tentang diri dan lingkungannya dalam eksistensinya yang sarwa nusantara dan penekanannya dalam mengekspresikan diri sebagai bangsa Indonesia di tengah-tengah lingkungannya yang sarwa nusantara itu. Unsur-unsur dasar wasantara itu ialah: wadah (contour atau organisasi), isi, dan tata laku. Dari wadah dan isi wasantara itu, tampak adanya bidang-bidang usaha untuk mencapai kesatuan dan keserasian dalam bidang-bidang:

• Satu kesatuan Wilayah
• Satu kesatuan Bangsa
• Satu kesatuan Budaya
• Satu kesatuan Ekonomi
• Satu kesatuan Hankam

Jelaslah disini bahwa wasantara adalah pengejawantahan falsafah Pancasila dan UUD 1945 dalam wadah negara Republik Indonesia. Kelengkapan dan keutuhan pelaksanaan wasantara akan terwujud dalam terselenggaranya ketahanan nasional Indonesia yang senantiasa harus ditingkatkan sesuai dengan tuntutan zaman. Ketahanan nasional itu akan dapat meningkat jika ada pembangunan yang meningkat, dalam “koridor” wasantara.

Hakekat Wawasan Nusantara

Wawasan Nusantara adalah cara pandang Bangsa Indonesia terhadap rakyat, bangsa dan wilayah Negara Kesatuan Republik Indonesia yang meliputi darat, laut dan udara di atasnya sebagai satu kesatuan Politik, Ekonomi, Sosial, Budaya dan Pertahanan Keamanan.

Seperti yang sudah sudah, kini mulai timbul segelintir kelompok yang menginginkan perubahan dasar negara indonesia yang selama ini menggunakan azaz tunggal Pancasila menjadi sebuah negara yang berdasarkan Khilafah atau untuk kalangan awam disebut Syariat Islam.

Kini pertanyaanya adalah apakah memang sistem tersebut sangat sempurna sehingga patut mengganti azas Pancasila yang selama ini telah menjadi rumah yang nyaman bagi berbagai umat beragama. Sebagai contoh yang paling kongkret adalah keadialan sistem itu sendiri. Sebagai contoh paling mudah adalah definisi benar salah menurut agama tertentu bukan definisi bersama berdasarkan Pancasila yang mengakui lima agama. Apakah itu yang kita inginkan? dimana semua kebenaran, kesalahan dan standar moral di nilai hanya berdasarkan standar satu agama mayoritas? Apakah nasib penganut agama minoritas akan disingkirkan atau tersingkirkan dengan sendirinya?

Ingat, “Keharusan Partai Berazaskan Pancasila” yang kini digadang oleh partai Golkar dan PDI Perjuangan telah membuat kepanasan partai partai Islam radikal yang pada dasarnya ingin menghancurkan kebhinekaan dan keberagaman budaya Indonesia dengan menggantinya menjadi sistem Syariat Islam. Jika memang ingin merubah PANCASIlA kami siap membela PANCASILA sampai titik darah penghabisan.

Pikirkan jika suatu kebenaran, kesalahan maupun etika moral ditentukan oleh sebuah definisi sebuah agama dalam hal ini agama Islam. Sedangkan ketika anda terlibat didalamnya anda adalah seseorang yang memeluk agama diluar Islam! Apakah yang anda pikirkan dan bagai mana perasaan di hati anda ketika sebuah kebenaran dan moralitas pada hati nurani anda ditentukan oleh agama lain yang bukan anda anut?

Sekarang dibeberapa provinsi telah terjadi, dengan alasan moral dan budaya maka diterapkanlah aturan tersebut. Sebagai contoh, kini di sebuah provinsi semua wanita harus menggunakan jilbab. Mungkin bagi sebagian kecil orang yang tinggal di Indonesia merupakan keindahan namun bagai mana dengan budaya yang selama ini telah ada? Jangankan di tanah Papua, pakaian Kebaya pun artinya dilarang dipakai olah putri daerah. Bukankah ini merupakan penghianatan terhadap kebhinekaan bangsa Indonesia yang begitu heterogen. Jika anda masih ragu, silahkan lihat apa yang terjadi di Saudi Arabia dengan aliran Salafy Wahabinya. Tidak ada pemilu, tidak ada kesetaraan gender dan lihat betapa tersisihnya kaum wanita dan penganut agama minoritas disana. Jika memang anda cinta dengan Adat, Budaya dan Toleransi umat beragama di Indonesia dukung dan jagalah kesucian Pancasila sebagai ideologi pemersatu bangsa.

Seperti yang telah kita ketahui bahwa di Indonesia terdapat berbagai macam suku bangsa, adat istiadat hingga berbagai macam agama dan aliran kepercayaan. Dengan kondisi sosiokultur yang begitu heterogen dibutuhkan sebuah ideologi yang netral namun dapat mengayomi berbagai keragaman yang ada di Indonesia.

Karena itu dipilihlah Pancasila sebagai dasar negara. Namun saat ini yang menjadi permasalahan adalah bunyi dan butir pada sila pertama. Sedangkan sejauh ini tidak ada pihak manapun yang secara terang terangan menentang bunyi dan butir pada sila kedua hingga ke lima, kecuali Hizbut Tahrir Indonesia yang secara terang terangan menentang pasal ke 4. Namun hal itu akan dibahas lain kali.

Sila pertama yang berbunyi “ketuhanan yang maha esa” pada saat perumusan pernah diusulkan oleh PDU PPP dan FDU (kini PKS) ditambah dengan kata kata “… dengan kewajiban menjalankan syariat islam bagi pemeluknya“ sejak saat itu dikenal sebagai Piagam Jakarta. Namun dua ormas Islam terbesar saat itu – hingga kini yaitu Nahdatul Ulama dan Muahmmadiyah menentang penerapan Piagam Jakarta tersebut, karena dua ormas Islam tersebut menyadari bahwa jika penerapan syariat Islam diterapkan secara tidak langsung namun pasti akan menjadikan indonesia sebagai negara Islam dan secara “fair” hal tersebut dapat memojokan umat beragama lain. Yang lebih buruk lagi adalah dapat memicu disintegrasi bangsa terutama bagi profinsi yang mayoritas beragama non Islam. Karena itulah sampai detik ini bunyi sila pertama adalah “ketuhanan yang maha esa” yang berarti bahwa Pancasila mengakui dan menyakralkan keberadaan Agama, tidak hanya Islam namun termasuk juga Kristen, Katholic, Budha dan Hindu sebagai agama resmi negara.

Akibat maraknya parpol dan ormas Islam yang tidak mengakui keberadaan Pancasila dengan menjual nama Syariat islam dapat mengakibatkan disintegrasi bangsa. Bagi kebanyakan masyarakat indonesia yang cinta atas keutuhan NKRI maka banyak dari mereka yang mengatasnamakan diri mereka Islam Panca


Hizbut Tahrir Indoesia Anti Demokrasi

Setelah berlangsungnya konfrensi khilafah sedunia yang berlangsung pada hari minggu 12 agustus 2007 terbetik berita yang sangat valid bahwa HTI tidak menutup kemungkinan untuk menjadi sebuah partai politik anti demokrasi.

Setelah memberikan pernyataanya kepada publik, jubir HTI Muhamad Ismail Yusanto mengatakan bahwa HTI tidak menutup kemungkinan untuk menjadi parpol. Namun menurut Yusanto pihak HTI tidak sependapat dengan semangat demokrasi yang dianut parpol islam lainya. Karena menurut pendapat HTI yang tentunya tidak mengakui keberadaan PANCASILA sebagai sebuah dasar negara apalagi ideologi. Demokrasi membawa jargon dari rakyat oleh rakyat untuk rakyat. Tidak sesuai dengan dasar ideologi HTI yang menganggap Khilafah Islamiyah (kepemimpinan islam dan hanya mengakui keberadaan islam) bahwa kekuasaan hanya pada Allah dan kepada kemaslahatan Ummat.

HTI anti Demokrasi dan Pancasila

Semangat hari kemerdekaan justru tidak disinggung sama sekali oleh HTI yang ada justru penentanganya terhadap ideologi pemersatu PANCASILA dan Demokrasi. Sebuah organisasi yang dikenal dengan tindakan brutal dan anarkis ini sama sekali tidak merasa perlu menghormati PANCASILA. Bahkan banyak dari mereka enggan melakukan hormat kepada sang merah putih. Tidak terbayangkan bahwa sebuah organisasi RADIKAL yang telah mencoreng nama Islam akan menjadi partai politik penebar teror. Hanya satu kata, satu himbauan, Jika memang anda mencintai Indonesia, dan menginginkan Indonesia menjadi rumah bagi berbagai umat beragama dan menjaga keutuhan Indonesia dari Sabang sampai Merauke maka dukunglah PANCASILA dan hindari organisasi radikal seperti HTI. Merdakaaa !!!  

Link : http://www.eramuslim.com/berita/nas/7812152936-hti-tak-tutup-kemungkinan-jadi-parpol.htm
Link: http://www.detiknews.com/indexfr.php

• Ketuhanan Yang Maha Esa
• Bangsa Indonesia menyatakan kepercayaanya dan ketaqwaanya kepada Tuhan Yang Maha Esa.
• Manusia Indonesia percaya dan taqwa terhadap Tuhan Yang Maha Esa, sesuai dengan agama dan kepercayaannya masing-masing menurut dasar kemanusiaan yang adil dan beradab.
• Mengembangkan sikap hormat menghormati dan bekerjasama antra pemeluk agama dengan penganut kepercayaan yang berbeda-beda terhadap Tuhan Yang Maha Esa.
• Membina kerukunan hidup di antara sesama umat beragama dan kepercayaan terhadap Tuhan Yang Maha Esa
• Agama dan kepercayaan terhadap Tuhan Yang Maha Esa adalah masalah yang
  menyangkut hubungan pribadi manusia dengan Tuhan Yang Maha Esa.
• Mengembangkan sikap saling menghormati kebebasan menjalankan ibadah sesuai dengan agama dan kepercayaanya masing masing
• Tidak memaksakan suatu agama dan kepercayaan terhadap Tuhan Yang Maha Esa kepada orang lain.

Pemahaman dan Pelanggaran terhadap Pancasila saat ini

• Artinya Ideologi Pancasila merupakan dasar negara yang mengakui dan mengagungkan keberadaan agama dalam pemerintahan. Sehingga kita sebagai warga negara Indonesia tidak perlu meragukan konsistensi atas Ideologi Pancasila terhadap agama. Tidak perlu berusaha mengganti ideologi Pancasila dengan ideologi berbasis agama dengan alasan bahwa ideologi Pancasila bukan ideologi beragama. Ideologi Pancasila adalah ideologi beragama.
• Sesama umat beragama seharusnya kita saling tolong menolong. Tidak perlu melakukan permusuhan ataupun diskriminasi terhadap umat yang berbeda agama, berbeda keyakinan maupun berbeda adat istiadat.
• Hanya karena merasa berasal dari agama mayoritas tidak seharusnya kita merendahkan umat yang berbeda agama ataupun membuat aturan yang secara langsung dan tidak langsung memaksakan aturan agama yang dianut atau standar agama tertentu kepada pemeluk agama lainya dengan dalih moralitas.
• Hendaknya kita tidak menggunakan standar sebuah agama tertentu untuk dijadikan tolak ukur nilai moralitas bangsa Indonesia. Sesungguhnya tidak ada agama yang salah dan mengajarkan permusuhan.
• Agama yang diakui di Indonesia ada 5, yaitu Islam, Kristen, Katolik, Budha dan Hindu.
• Sebuah kesalahan fatal bila menjadikan salah satu agama sebagai standar tolak ukur benar salah dan moralitas bangsa. Karena akan terjadi chaos dan timbul gesekan antar agama. kalaupun penggunaan dasar agama haruslah mengakomodir standar dari Islam, Kristen, Katolik, Budha dan Hindu bukan berdasarkan salah satu agama entah agama mayoritas ataupun minoritas.

Bila ada koreksi silahakan kirim komentar ataupun mengirim email (komentar pilihan)