Latest Entries »

tugas vb ke IV

kodebukunama

Private Sub cmdbatal_Click()

txtkodebuku.SetFocus

txtkodebuku.Text = “”

txtjudulbuku.Text = “”

txtpengarang.Text = “”

txttahunterbit.Text = “”

txtpenerbit.Text = “”

txtharga.Text = “”

End Sub

Private Sub cmdkeluar_Click()

Unload Me

End Sub

Private Sub cmdlagi_Click()

txtkodebuku.SetFocus

txtkodebuku.Text = “”

txtjudulbuku.Text = “”

txtpengarang.Text = “”

txttahunterbit.Text = “”

txtpenerbit.Text = “”

txtharga.Text = “”

End Sub

Private Sub cmdproses_Click()

Dim K As String

txttahunterbit.Text = “20” &Mid(txtkodebuku.Text, 5, 2)

K = Left(txtkodebuku.Text, 3)

If K = “SIM” Then

txtjudulbuku.Text = “SISTEM INFORMASI MANAJEMEN”

txtpengarang.Text = “FadiyaUlfa”

txtharga.Text = “75900 —> DILARANG BON !!”

ElseIf K = “EDP” Then

txtjudulbuku.Text = “Elektronik Data Processing”

txtpengarang.Text = “NurulAgustina”

txtharga.Text = “62000 —> DILARANG BON !!”

ElseIf K = “MNJ” Then

txtjudulbuku.Text = “Manajemen”

txtpengarang.Text = “RianHidayat”

txtharga.Text = “42000 —> DILARANG BON !!”

ElseIf K = “CDR” Then

txtjudulbuku.Text = “Corel Draw”

txtpengarang.Text = “SitiNurKhotimah”

txtharga.Text = “53000 —> DILARANG BON !!”

ElseIf K = “RPL” Then

txtjudulbuku.Text = “RekayasaPerangkatLunak”

txtpengarang.Text = “WindaErlianti”

txtharga.Text = “83000 —> DILARANG BON !!”

End If

K = Right(txtkodebuku.Text, 1)

If K = “A” Then

txtpenerbit.Text = “Andi Offset Yogyakarta”

ElseIf K = “I” Then

txtpenerbit.Text = “Indah Surabaya”

ElseIf K = “S” Then

txtpenerbit.Text = “SalembaEmpat”

ElseIf K = “E” Then

txtpenerbit.Text = “Elek Media Komputindo”

ElseIf K = “M” Then

txtpenerbit.Text = “Maxicom”

End If

End Sub

PTPULANG

PT.PULANG PERGi

Private Sub cmdbatal_Click()

txtnama.SetFocus

txtnama.Text = “”

txtnik.Text = “”

txtgol.Text = “”

txtkodestat.Text = “”

txtstat.Text = “”

txtthn.Text = “”

txtbag.Text = “”

txtjab.Text = “”

txtgapok.Text = “”

txttunj.Text = “”

txttot.Text = “”

End Sub

Private Sub cmdkeluar_Click()

Unload Me

End Sub

Private Sub cmdlagi_Click()

txtnama.SetFocus

txtnama.Text = “”

txtnik.Text = “”

txtgol.Text = “”

txtkodestat.Text = “”

txtstat.Text = “”

txtthn.Text = “”

txtbag.Text = “”

txtjab.Text = “”

txtgapok.Text = “”

txttunj.Text = “”

txttot.Text = “”

End Sub

Private Sub cmdproses_Click()

Dim k As String

txtthn.Text = “20” & Mid(txtnik.Text, 3, 2)

k = Mid(txtnik.Text, 7, 1)

If k = “S” Then

txtkodestat.Text = “S”

txtstat.Text = “Single”

ElseIf k = “M” Then

txtkodestat.Text = “M”

txtstat.Text = “Menikah”

ElseIf k = “J” Then

txtkodestat.Text = “J”

txtstat.Text = “Janda”

ElseIf k = “D” Then

txtkodestat.Text = “D”

txtstat.Text = “Duda”

End If

k = Mid(txtnik.Text, 5, 1)

If k = “A” Then

txtgol.Text = “A”

txtjab.Text = “Manager”

txtgapok.Text = “4000000”

txttunj.Text = “1025000”

ElseIf k = “B” Then

txtgol.Text = “B”

txtjab.Text = “Ka.Seksi”

txtgapok.Text = “3500000”

txttunj.Text = “975000”

ElseIf k = “C” Then

txtgol.Text = “C”

txtjab.Text = “Staff”

txtgapok.Text = “3000000”

txttunj.Text = “925000”

End If

k = Right(txtnik.Text, 3)

If k = “KEU” Then

txtbag.Text = “Accounting”

ElseIf k = “ADM” Then

txtbag.Text = “Administrasi”

ElseIf k = “SDM” Then

txtbag.Text = “General Affair”

ElseIf k = “EDP” Then

txtbag.Text = “IT Unit”

ElseIf k = “SPM” Then

txtbag.Text = “seccurity”

End If

txttot.Text = Val(txtgapok.Text) + Val(txttunj.Text)

End Sub

Private Sub txtnama_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

txtnik.SetFocus

End If

End Sub

cbokodebuku3

comboKODEBUKU

 

Private Sub form_load()

cbokodebuku.AddItem “A-SIM-01”

cbokodebuku.AddItem “I-EDP-02”

cbokodebuku.AddItem “S-MNJ-03”

cbokodebuku.AddItem “E-CDR-04”

cbokodebuku.AddItem “M-RPL-05”

End Sub

Private Sub cmdbatal_Click()

cbokodebuku.SetFocus

cbokodebuku.Text = “”

txtjudulbuku.Text = “”

txtpengarang.Text = “”

txttahunterbit.Text = “”

txtpenerbit.Text = “”

txtharga.Text = “”

End Sub

Private Sub cmdkeluar_Click()

Unload Me

End Sub

Private Sub cmdlagi_Click()

cbokodebuku.SetFocus

cbokodebuku.Text = “”

txtjudulbuku.Text = “”

txtpengarang.Text = “”

txttahunterbit.Text = “”

txtpenerbit.Text = “”

txtharga.Text = “”

End Sub

Private Sub cmdproses_Click()

Dim K As String

txttahunterbit.Text = “20” &Right(cbokodebuku.Text, 2)

K = Mid(cbokodebuku.Text, 3, 3)

If K = “SIM” Then

txtjudulbuku.Text = “SISTEM INFORMASI MANAJEMEN”

txtpengarang.Text = “FadiyaUlfa”

txtharga.Text = “75900 ”

ElseIf K = “EDP” Then

txtjudulbuku.Text = “Elektronik Data Processing”

txtpengarang.Text = “NurulAgustina”

txtharga.Text = “62000”

ElseIf K = “MNJ” Then

txtjudulbuku.Text = “Manajemen”

txtpengarang.Text = “RianHidayat”

txtharga.Text = “42000”

ElseIf K = “CDR” Then

txtjudulbuku.Text = “Corel Draw”

txtpengarang.Text = “SitiNurKhotimah”

txtharga.Text = “53000”

ElseIf K = “RPL” Then

txtjudulbuku.Text = “RekayasaPerangkatLunak”

txtpengarang.Text = “WindaErlianti”

txtharga.Text = “83000”

End If

K = Left(cbokodebuku.Text, 1)

If K = “A” Then

txtpenerbit.Text = “Andi Offset Yogyakarta”

ElseIf K = “I” Then

txtpenerbit.Text = “Indah Surabaya”

ElseIf K = “S” Then

txtpenerbit.Text = “SalembaEmpat”

ElseIf K = “E” Then

txtpenerbit.Text = “Elek Media Komputindo”

ElseIf K = “M” Then

txtpenerbit.Text = “Maxicom”

End If

End Sub

 

IKHSANNPM

NPM

 

Private Sub CMDPROSES_Click()

Dim K, J, PS As String

K = Mid(TXTNPM.Text, 4, 1)

If K = “1” Then

J = “SISTEM INFORMASI”

ElseIf K = “2” Then

J = “TEHNIK INFORMATIKA”

ElseIf K = “3” Then

J = “MANAJEMEN INFORMATIKA”

ElseIf K = “4” Then

J = “KOMPUTER AKUTANSI”

End If

TXTJURUSAN.Text = J

 

K = Mid(TXTNPM.Text, 6, 2)

If K = “01” Then

PS = “STRATA SATU”

ElseIf K = “02” Then

PS = “DIPLOMA EMPAT”

ElseIf K = “03” Then

PS = “DIPLOMA TIGA”

ElseIf K = “04” Then

PS = “DIPLOMA DUA”

End If

TXTPRODI.Text = PS

 

TXTTHNMASUK.Text = “20” & Left(TXTNPM.Text, 2)

TXTNOURUT.Text = Right(TXTNPM.Text, 3)

 

End Sub

Iklan

kalkulotar-sederhana

Source Code :

Private Sub Command1_Click()
C = Val(A.Text) + Val(B.Text)
End Sub

Private Sub Command2_Click()
C = Val(A.Text) – Val(B.Text)
End Sub

Private Sub Command3_Click()
C = Val(A.Text) * Val(B.Text)
End Sub

Private Sub Command4_Click()
C = Val(A.Text) / Val(B.Text)
End Sub

Private Sub Command5_Click()
C = Val(A.Text) ^ Val(B.Text)
End Sub

Private Sub Command6_Click()
A.Text = Clear
B.Text = Clear
C.Text = Clear
A.SetFocus
End Sub

Private Sub Command7_Click()
End
End Sub

properti-test

Source Kode :

Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Option1_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub

Private Sub Check1_Click()
Label2.FontBold = Check1.Value
End Sub

Private Sub Check2_Click()
Label2.FontItalic = Check2.Value
End Sub

md-font-color

Source Kode :

Private Sub chkBold_Click()
‘membuat teks tebal
If chkBold.Value = 1 Then
lblTeks.FontBold = True
Else
lblTeks.FontBold = False
End If
End Sub

Private Sub chkItalic_Click()
‘membuat teks miring
If chkItalic.Value = 1 Then
lblTeks.FontItalic = True
Else
lblTeks.FontItalic = False
End If
End Sub

Private Sub chkStrike_Click()
‘membuat teks bergaris tengah
If chkStrike.Value = 1 Then
lblTeks.FontStrikethru = True
Else
lblTeks.FontStrikethru = False
End If
End Sub

Private Sub chkUnder_Click()
‘membuat teks bergaris bawah
If chkUnder.Value = 1 Then
lblTeks.FontUnderline = True
Else
lblTeks.FontUnderline = False
End If
End Sub

Private Sub cmdExit_Click()
End
End Sub

data-nama-pasien

Source kode

Private Sub Form_Load()
Text3 = Format(Now, “DD-MMMM-YYYY”)
Text4 = Format(Now, “HH:MM”)
Text3.Enabled = False
Text4.Enabled = False

Combo1.AddItem “PRIA”
Combo1.AddItem “WANITA”
End Sub

Private Sub Text1_keypress(keyAscii As Integer)
If keyAscii = 13 Then
Text2.SetFocus
End If
End Sub

Private Sub Text5_keypress(keyAscii As Integer)
If keyAscii = 13 Then
Text6.SetFocus
End If
End Sub
End Sub

Private Sub Command1_Click()
Unload Me
End Sub

Private Sub Command2_Click()
Text1.Text = “”
Text2.Text = “”
Text5.Text = “”
Text6.Text = “”
Combo1.Text = “”
End Sub

5-md-perhitungan-diskon

ource Kode :

Private Sub Combo1_Click()
Combo1.AddItem “ABA”
Combo1.AddItem “AMIK”
Combo1.AddItem “AKA”
End Sub

Private Sub Combo2_Click()
If Combo2 = “MI-0101-KTI” Then
Text4.Text = “Konsep Teknologi Informasi”
Text5.Text = “4″
Text6.Text = “20000″
Text6.SetFocus
Else
End If

If Combo2 = “MI-0102-PA” Then
Text4.Text = “Penghantar Akutansi”
Text5.Text = “4″
Text6.Text = “25000″
Text6.SetFocus
Else
End If

If Combo2 = “MI-0103-LA” Then
Text4.Text = “Logika ALgoritma”
Text5.Text = “3″
Text6.Text = “30000″
Text6.SetFocus
Else
End If

If Combo2 = “MI-0104-MD” Then
Text4.Text = “Matematika Dasar”
Text5.Text = “2″
Text6.Text = “15000″
Text6.SetFocus
Else
End If

If Combo2 = “BA-0101-LS” Then
Text4.Text = “Listening”
Text5.Text = “4″
Text6.Text = “25000″
Text6.SetFocus
Else
End If

If Combo2 = “BA-0101-SP” Then
Text4.Text = “speaking”
Text5.Text = “3″
Text6.Text = “40000″
Text6.SetFocus
Else
End If

If Combo2 = “BA-0101-CV” Then
Text4.Text = “Conversation”
Text5.Text = “2″
Text6.Text = “35000″
Text6.SetFocus
Else
End If
End Sub

Private Sub Command1_Click()
Text9.Text = Val(Text7.Text) – Val(Text8.Text)
End Sub

Private Sub Form_Load()
Combo1.AddItem “ABA”
Combo1.AddItem “AMIK”
Combo1.AddItem “AKA”
Combo2.AddItem “MI-0101-KTI”
Combo2.AddItem “MI-0102-PA”
Combo2.AddItem “MI-0103-LA”
Combo2.AddItem “MI-0104-MD”
Combo2.AddItem “BA-0101-LS”
Combo2.AddItem “BA-0101-SP”
Combo2.AddItem “BA-0101-CV”
End Sub

Private Sub Option1_Click()
Text8.Text = Val(Text7.Text) * 0.5
End Sub

Private Sub Option2_Click()
Text8.Text = Val(Text7.Text) * 0.1
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub

 

nilai-mutu

Source Kode :

Private Sub Form_Load()
Combo1.AddItem “12100515″
Combo1.AddItem “12100525″
Combo1.AddItem “12100535″
Combo1.AddItem “12100545″
Combo1.AddItem “12100555″
Combo1.AddItem “12100565″
Combo1.AddItem “12100575″
Combo1.AddItem “12100585″
Combo1.AddItem “12100595″
Combo1.AddItem “12100666″
End Sub

Private Sub Combo1_Click()
If Combo1 = “12100515″ Then
txtNama.Text = “Marchoni”
txtjurusan.Text = “Sistem Informasi”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100525″ Then
txtNama.Text = “Siti Kholijah”
txtjurusan.Text = “Sistem Informasi”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100535″ Then
txtNama.Text = “Adi Setiawan”
txtjurusan.Text = “Sistem Informasi”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100545″ Then
txtNama.Text = “Barnes Setiawan”
txtjurusan.Text = “Manajemen Informatika”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100555″ Then
txtNama.Text = “Adhy Pangestu”
txtjurusan.Text = “Manajemen Informatika”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100565″ Then
txtNama.Text = “Setiawan Adi”
txtjurusan.Text = “Design Grafis”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100575″ Then
txtNama.Text = “Sunardi”
txtjurusan.Text = “Manajemen Informatika”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100585″ Then
txtNama.Text = “Arif Lukman”
txtjurusan.Text = “Manajemen Informatika”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100595″ Then
txtNama.Text = “Alivia”
txtjurusan.Text = “Sistem Informasi”
txtQuis.SetFocus
Else
End If

If Combo1 = “12100666″ Then
txtNama.Text = “Adi Barnes Setiawan”
txtjurusan.Text = “Design Grafis”
txtQuis.SetFocus
Else
End If
End Sub

Private Sub txtQuis_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtTugas.SetFocus
End If
End Sub

Private Sub txtTugas_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtUts.SetFocus
End If
End Sub

Private Sub txtUas_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtNA.Text = (Val(txtQuis.Text) + Val(txtTugas.Text) + Val(txtUts.Text) + Val(txtUas.Text)) / 4
If Val(txtNA.Text) <= 50 Then txtHuruf.Text = “E”
If Val(txtNA.Text) >= 50 Then txtHuruf.Text = “D”
If Val(txtNA.Text) >= 60 Then txtHuruf.Text = “C”
If Val(txtNA.Text) >= 70 Then txtHuruf.Text = “B”
If Val(txtNA.Text) >= 80 Then txtHuruf.Text = “A”
End If
End Sub

Private Sub txtUts_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtUas.SetFocus
End If
End Sub

Private Sub cmdProses_Click()
txtNA.Text = (Val(txtQuis.Text) + Val(txtTugas.Text) + Val(txtUts.Text) + Val(txtUas.Text)) / 4
If Val(txtNA.Text) <= 50 Then txtHuruf.Text = “E”
If Val(txtNA.Text) >= 50 Then txtHuruf.Text = “D”
If Val(txtNA.Text) >= 60 Then txtHuruf.Text = “C”
If Val(txtNA.Text) >= 70 Then txtHuruf.Text = “B”
If Val(txtNA.Text) >= 80 Then txtHuruf.Text = “A”
End Sub

Private Sub cmdBatal_Click()
txtNama.Text = “”
txtjurusan.Text = “”
txtQuis.Text = “”
txtTugas.Text = “”
txtUts.Text = “”
txtUas.Text = “”
txtNA.Text = “”
txtHuruf.Text = “”
txtNama.SetFocus
End Sub

Private Sub cmdKeluar_Click()
End
End Sub

 

tugas vb kalkulator mini

kalkul

TUGAS VB TWITTER 12

NAMA  :  M.IKHSAN

NPM      : 12201340

source

Private Sub txtnilai1_keypress(keyascii As Integer)

If keyascii = 13 Then

txtnilai2.SetFocus

End If

End Sub

Private Sub txtnilai2_keypress(keyascii As Integer)

If keyascii = 13 Then

txthasilpenjumlahan.Text = Val(txtnilai1.Text) + Val(txtnilai2.Text)

txthasilperkalian.Text = Val(txtnilai1.Text) * Val(txtnilai2.Text)

txthasilpembagian.Text = Val(txtnilai1.Text) / Val(txtnilai2.Text)

txthasilpengurangan.Text = Val(txtnilai1.Text) – Val(txtnilai2.Text)

End If

End Sub

Private Sub cmdhitung_Click()

txthasilpenjumlahan.Text = Val(txtnilai1.Text) + Val(txtnilai2.Text)

txthasilperkalian.Text = Val(txtnilai1.Text) * Val(txtnilai2.Text)

txthasilpembagian.Text = Val(txtnilai1.Text) / Val(txtnilai2.Text)

txthasilpengurangan.Text = Val(txtnilai1.Text) – Val(txtnilai2.Text)

End Sub

Private Sub cmdkeluar_Click()

Unload Me

End Sub

Private Sub cmdlagi_Click()

txtnilai1.SetFocus

txtnilai1 = “”

txtnilai2 = “”

txthasilpenjumlahan = “”

txthasilperkalian = “”

txthasilpembagian = “”

txthasilpengurangan = “”

End Sub

ekama94 Blog– Bagi anda yang ingin membeli laptop/ notebook yang bagus dan ingin mendapatkan beberapa info tentang merk laptop yang bagus, saya akan mencoba menshare artikel yang saya dapatkan dari kaskus.us tentang 5 laptop terawet di dunia. Apakah laptop anda termasuk di dalamnya, baca saja artikel di bawah ini.

1. ASUS

Nama ASUS sepertinya cukup populer, baik dalam kalangan desktop maupun laptop. ASUS mendapat peringkat pertama karena dalam hasil uji coba, tingkat kerusakan dalam 2 tahun adalah dibawah 10%, sedangkan dalam 3 tahun adalah 15.6%. Walaupun ASUS berada di Peringkat 3 sebagai Top Vendor Dunia, namun tampaknya ASUS tidak akan kalah dalam hal kualitas daya tahan. Produk ASUS sendiri yang paling terkenal adalah ROG (Republic of Gamers) sebagai salah satu prasyarat Gaming Computer.

2. Toshiba
Toshiba tentunya sangat populer dengan tingkat keawetannya, dan juga harganya. Banyak yang beranggapan harga Toshiba sesuai dengan kualitasnya. Toshiba berada di peringkat kedua dengan persentase dibawah 10% dalam 2 tahun, dan 15.7% dalam 3 tahun. Perbedaan tipis dengan ASUS sebesar 0.01% tampaknya memang sudah membuktikan kalau Toshiba memang dirancang untuk tahan lama.

3. SONY
SONY cukup terkenal dengan salah satu produk laptopnya, yaitu VAIO. SONY menempati urutan ketiga dalam persentase tingkat kerusakan laptop. Dalam uji coba 2 tahun, SONY mendapatkan persentase diatas 10%, sedangkan dalam 3 tahun, persentasenya naik menjadi 16.8%. Walaupun tidak terpaut tipis dari ASUS dan Toshiba, SONY bisa dikatakan salah satu laptop terawet yang pernah ada.

4. Apple

Apple terkenal dengan sistem operasinya sendiri, yaitu Macintosh, serta merk laptopnya sendiri. Uji coba yang dilakukan pada merk ini menghasilkan persentase diatas 10% pada 2 tahun dan 17.4% dalam jangka waktu 3 tahun. Hal ini membuktikan bahwa Laptop Apple masih dapat dikatakan awet bagi penggunaan sistem operasi selain Windows.

5. DELL
DELL sepertinya lebih terkenal dengan salah satu produk gaming-nya, yaitu Alienware, suatu laptop yang benar-benar menawarkan performa gaming layaknya barang yang berasal dari luar bumi. Tingkat kerusakan DELL dalam 2 tahun adalah diatas 10%, sedangkan dalam 3 tahun, sudah mencapai 18.3%. Sepertinya, inilah Laptop yang paling menengah dalam tingkat kerusakannya.

Dari keterangan di atas, bagaimana dengan laptop anda atau anda ingin membeli merk laptop yang tertera di atas.Semoga bermanfaat!

Source: http://www.kaskus.us/showthread.php?t=10124023

5 Merk Laptop Terawet dan Tidak Gampang Rusak di Dunia

 

Command Prompt adalah sebuah perintah dos yang terdapat pada OS windows yang dapat memudahkan user dalam menjelajahi windows baik secara online maupun offline, dan aplikasi ini bisa juga disalahgunakan oleh seorang cracker untuk menjalankan aksi-aksinya hanya dengan menggunakan command prompt.

Maka dari itu sebagai langkah antisipasi bagi anda sebagai user adalah dengan mengenal lebih jauh tentang seluk beluk dari command prompt agar bisa memahami cara kerja dan manfaatnya,  salah satu dari sekian banyak manfaat dari command prompt adalah kemampuannya untuk mendeteksi adanya virus, memisahkan virus dengan file yang diinfeksinya, mencari file induk virus hanya dengan perintah ATTRIB . Berikut dibawah ini merupakan daftar perintah-perintah yang ada pada command prompt dari A-X :

 

a

ADDUSERS : Tambah  daftar pengguna untuk / dari file CSV
ARP : Address Resolution Protocol
Assoc : Ubah ekstensi file  asosiasi
ASSOCIAT : Salah satu langkah asosiasi file
Attrib : Ubah atribut berkas

b
Bootcfg : Edit Windows boot settings
BROWSTAT : Dapatkan domain, info browser dan PDC

c
CACLS : Ubah file permissions
CALL : Panggil satu program batch yang lain
CD : Mengganti Directory – pindah ke Folder tertentu
Change : Ganti Terminal Server Session properties
CHKDSK : Check Disk – memeriksa dan memperbaiki masalah disk
CHKNTFS : Periksa sistem file NTFS
CHOICE : Menerima input keyboard ke sebuah file batch
CIPHER : Encrypt atau Decrypt file / folder
CleanMgr : Ototmatis membersihkan Temperatur file, recycle bin
CLEARMEM : Hapus kebocoran memori
CLIP : Salin STDIN ke Windows clipboard.
CLS : Menghapus layar (Clear The Screen)
CLUSTER : Windows Clustering
CMD : Start a new CMD shell
COLOR : Mengubah warna dari jendela CMD
COMP : Membandingkan isi dari dua file atau set file
COMPACT : Compress file atau folder pada partisi NTFS
Compress : Compress tunggal file pada partisi NTFS
CON2PRT : Menghubungkan atau memutuskan sambungan dengan Printer
CONVERT : Konversi FAT ke drive NTFS
COPY : Menyalin satu atau lebih file ke lokasi lain
CSCcmd : clien-side caching (Offline Files)
CSVDE : Impor atau Ekspor  Active Directory data

d
DATE : Display atau mengatur tanggal
Defrag : Defragment hard drive
DEL : Menghapus satu atau lebih file
DELPROF : Hapus  profil pengguna NT
DELTREE : Menghapus folder dan semua subfolder
DevCon : Device Manager Command Line Utility
DIR : Menampilkan daftar file dan folder
DIRUSE : Tampilkan penggunaan disk
DISKCOMP : Bandingkan  isi dua floppy disk
Diskcopy : Salin isi dari satu disket ke yang lain
DISKPART : Disk Administrasi
DNSSTAT : DNS Statistik
DOSKEY : Edit baris perintah, ingat perintah, dan membuat macro
DSADD : Tambah User (komputer, group ..) ke direktori aktif
DSQUERY : Daftar item dalam direktori aktif
DSMOD : Ubah user (computer, group ..) di direktori aktif
DSRM : Hapus item dari Active Directory

e
ECHO : Menampilkan pesan di layar
ENDLOCAL : Akhir localisation  perubahan lingkungan dalam file batch
ERASE : Menghapus satu atau lebih file
EVENTCREATE : Tambahkan pesan ke Windows event log
EXIT : Keluar dari skrip arus / rutin dan menetapkan errorlevel
EXPAND : uncompress file
Ekstrak : uncompress file CAB

f
FC : Bandingkan dua file
FIND : Mencari string teks dalam sebuah file
FINDSTR : Cari  string dalam file
FOR / F : pengulangan perintah terhadap satu set file
FOR / F : pengulangan perintah terhadap hasil perintah lain
FOR : pengulangan perintah terhadap semua options Files, Directory, List
FORFILES : Proses Batch beberapa file
FORMAT : Format disk
FREEDISK : Periksa free disk space/disk yang tersisa (dalam bytes)
FSUTIL : File dan Volume utilitas
FTP : File Transfer Protocol
FTYPE : Tampilkan atau memodifikasi jenis file yang digunakan dalam asosiasi ekstensi file

g
GLOBAL : Display keanggotaan kelompok global
GOTO : Direct a batch program untuk melompat ke baris berlabel
GPUPDATE : Update pengaturan Kebijakan Grup

h
HELP : Online Help

i
ICACLS : Ubah file dan folder permissions
IF : kondisional melakukan perintah
IFMEMBER : Apakah pengguna saat ini dalam sebuah NT Workgroup
IPCONFIG : Configure IP

k
KILL : Remove program dari memori

l
LABEL : Edit disk label
LOCAL : Display keanggotaan kelompok-kelompok lokal
LOGEVENT : Menulis teks ke NT event viewer
Logoff : user log off
LOGTIME : log tanggal dan waktu dalam file

m
MAPISEND : Kirim email dari baris perintah
MBSAcli : Baseline Security Analyzer
MEM : Display penggunaan memori
MD : Buat folder baru
MKLINK : Buat link simbolik (linkd)
MODE : Mengkonfigurasi perangkat sistem
MORE : Display output, satu layar pada satu waktu
MOUNTVOL : mengelola volume mount point
MOVE : Pindahkan file dari satu folder ke yang lain
MOVEUSER : Pindahkan pengguna dari satu domain ke domain lainnya
MSG : mengirim pesan atau message
MSIEXEC : Microsoft Windows Installer
MSINFO : Windows NT diagnostics
MSTSC : Terminal Server Connection (Remote Desktop Protocol)
MUNGE : Cari dan Ganti teks dalam file (s)
MV : Copy in-menggunakan file

n
NET : Kelola sumber daya jaringan
NETDOM : Domain Manager
Netsh : Configure Network Interfaces, Windows Firewall & Remote akses
NETSVC : Command-line Service Controller
NBTSTAT : Tampilkan statistik jaringan (NetBIOS over TCP / IP)
NETSTAT : Display networking statistics (TCP / IP)
NOW : Tampilan  saat ini Tanggal dan Waktu
NSLOOKUP : Nama server lookup
NTBACKUP : Backup  folder ke tape
NTRIGHTS : Edit hak user account

p
PATH : Menampilkan atau menetapkan path pencarian untuk file executable
PATHPING : jejak jalur jaringan ditambah paket latensi dan kerugian
PAUSE : memenjarakan(suspend) pengolahan file batch dan menampilkan pesan
perms : Tampilkan izin untuk pengguna
PERFMON : Kinerja Monitor
PING : Menguji koneksi jaringan
POPD : Mengembalikan nilai sebelumnya dari direktori sekarang yang disimpan oleh PUSHD
PORTQRY : Tampilan status ports dan services
Powercfg : Mengkonfigurasi pengaturan daya
PRINT : Mencetak file teks
PRNCNFG : Display, mengkonfigurasi atau mengubah nama printer
PRNMNGR : Tambah, menghapus, daftar printer menetapkan printer default
PROMPT : Mengubah command prompt
PsExec : Proses Execute jarak jauh
PsFile : menampilkan file dibuka dari jarak jauh (remote)
PsGetSid : Menampilkan SID sebuah komputer atau pengguna
PsInfo : Daftar informasi tentang sistem
PsKill : proses mematikan berdasarkan nama atau ID proses
PsList : Daftar informasi rinci tentang proses-proses
PsLoggedOn : siapa saja yang log on (lokal atau melalui resource sharing)
PsLogList : catatan kejadian log
PsPasswd : Ubah sandi account
PsService : Melihat dan mengatur layanan
PsShutdown : Shutdown atau reboot komputer
PsSuspend : proses Suspend
PUSHD : Simpan dan kemudian mengubah direktori sekarang

q
QGREP : Cari file(s) untuk baris yang cocok dengan pola tertentu

r
RASDIAL : Mengelola koneksi RAS
RASPHONE : Mengelola koneksi RAS
Recover : perbaikan file yang rusak dari disk yang rusak
REG : Registry = Read, Set, Export, Hapus kunci dan nilai-nilai
REGEDIT : Impor atau ekspor  pengaturan registry
Regsvr32 : Register atau unregister sebuah DLL
REGINI : Ubah Registry Permissions
REM : Record comments (komentar) di sebuah file batch
REN : Mengubah nama file atau file
REPLACE : Ganti atau memperbarui satu file dengan yang lain
RD : Hapus folder (s)
RMTSHARE : Share folder atau printer
Robocopy : Copy File dan Folder secara sempurna
RUTE : Memanipulasi tabel routing jaringan
RUNAS : Jalankan program di bawah account pengguna yang berbeda
RUNDLL32 : Jalankan perintah DLL (add / remove print connections)

s
SC : Control Layanan
SCHTASKS : Jadwal perintah untuk dijalankan pada waktu tertentu
SCLIST : Tampilkan Layanan NT
SET : Display, set, atau menghapus variabel environment
SETLOCAL : Pengendalian environment visibilitas variabel
SETX : Set variabel environment secara permanen
SFC : Pemeriksa Berkas Sistem
SHARE :  Daftar atau mengedit file share atau share print
SHIFT : Shift posisi digantikan parameter dalam sebuah file batch
SHORTCUT : jendela Buat shortcut (. LNK file)
SHOWGRPS : Daftar NT Workgroups seorang pengguna telah bergabung
SHOWMBRS : Daftar Pengguna yang menjadi anggota dari sebuah Workgroup
SHUTDOWN : Shutdown komputer
SLEEP : Tunggu untuk x detik
SLMGR : Software Licensing Management (Vista/2008)
SOON : Jadwal perintah untuk menjalankan dalam waktu dekat
SORT : Sort input
START : memulai sebuah program atau perintah dalam jendela terpisah
SU : Switch User
SUBINACL : Edit file dan folder Permissions, Kepemilikan dan Domain
SUBST : Associate jalan dengan huruf drive
Systeminfo : Daftar konfigurasi sistem

t
TASKLIST : Daftar menjalankan aplikasi dan services
TASKKILL : Hapus proses yang berjalan dari memori
TIME : Menampilkan atau mengatur waktu sistem
TIMEOUT : penundaan pemrosesan dari sebuah batch file
TITLE : Mengatur judul window untuk sesi cmd.exe
TLIST : daftar tugas dengan path lengkap
TOUCH : mengganti file timestamps
Tracert : Trace route ke sebuah remote host
TREE : tampilan grafis struktur folder
TYPE : Menampilkan isi dari file teks

u
USRSTAT : Daftar domain nama pengguna dan terakhir login

v
VER : Tampilkan versi informasi
VERIFY : Pastikan bahwa file sudah disimpan
VOL : Menampilkan sebuah label disk

w
WHERE : Menempatkan dan menampilkan file dalam sebuah pohon direktori
wHOAMI : Output UserName saat ini dan manajemen domain
WINDIFF : Bandingkan isi dua file atau set file
WINMSD : Sistem Windows diagnostik
WINMSDP : Sistem Windows diagnostik II
WMIC : Perintah WMI

x
XCACLS : Ubah file dan folder permissions
XCOPY : Menyalin file dan folder

Sumber : http://www.ss64.com

 
 
 

2012-hp-pavilionLaptop merupakan barang mewah yang lagi digandrungi oleh banyak orang didunia, fungsinya pun beragam bisa sebagai media hiburan, untuk bekerja, untuk sekolah dan lain sebagainya.

Perusahaan yang memproduksi laptop pun semakin menambah performa pada laptop yang mereka produksi, mulai dari segi desain laptop, harga yang kompetitif, kecepatan prosesor, kapasitas memori dan harddisk, sampai kualitas layar yang semakin baik.

Semua itu dilakukan agar bisa merebut perhatian calon konsumen, diakhir tahun 2011 ini beberapa produsen laptop mulai memproduksi laptop terbarunya untuk dipasarkan pada tahun 2012.

Laptop yang akan saya paparkan ini bukan laptop gaming yang memiliki spesifikasi untuk memainkan game yang super berat, dan membutuhkan spesifikasi nomor satu, tetapi laptop yang biasanya digunakan untuk aktifitas umum, seperti kuliah, bekerja dikantor, menonton film, dan lain sebagainya.

Berikut Dibawah ini 10 Laptop Terbaik Tahun 2012

1. HP ENVY 17

Spesifikasi:

Design:

  • Screen Resolution: 1920 x 1080
  • Screen Size: 17,3 in

Performance:

  • Processor: Intel Core  i7
  • Processor Speed: 2.2 GHz
  • Video Card: AMD Radeon
  • Audio: Integrated
  • Operating System: Windows 7 Home

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 8 GB
  • Hard Drive: 750 GB

Battery/Warranty:

  • Battery: 7 Hours
  • Warranty: 2 Year
Price:
  • USD 1,499.99 = Rp 13.499.910 (USD 1 = Rp 9.000)
 
2. Sony Vaio S Series
 
 

Spesifikasi:

Design:

  • Screen Resolution: 1600 x 900
  • Screen Size: 13.3 in

Performance:

  • Processor: Intel Core i3-2310M
  • Processor Speed: 2.1 GHz
  • Video Card: AMD Radeon HD 6630M
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 4 GB
  • Hard Drive: 320 GB

Battery/Warranty:

  • Battery: 7 Hours
  • Warranty: 1 Year
 Price:
  • USD 1,099.00 = Rp 9.891.000 (USD 1 = Rp 9.000)
 
 

3. Dell XPS 15z

Spesifikasi:

Design:

  • Screen Resolution: 1366 x 768
  • Screen Size: 15.6 in

Performance:

  • Processor: Intel Core i5-2410M
  • Processor Speed: 2.3 GHz
  • Video Card: NVIDIA GeForce GT 525M
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 6 GB
  • Hard Drive: 750 GB

Battery/Warranty:

  • Battery: 8 Hours
  • Warranty: 1 Year
Price:
  • USD 1,148.99 = Rp 10.340.910 (USD 1 = Rp 9.000)
 

4. Apple Macbook Air

apple macbook airSpesifikasi:

Design:

  • Screen Resolution: 1440 x 900
  • Screen Size: 13.3 in

Performance:

  • Processor: Intel Core i5-2557M
  • Processor Speed: 1.8 GHz
  • Video Card: Intel HD Graphics 3000
  • Audio: Integrated
  • Operating System: Mac OS X Lion

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 4 GB
  • Hard Drive: – GB

Battery/Warranty:

  • Battery: 7 Hours
  • Warranty: 1 Year
Price:
  • USD 928.99 = Rp 8.360.910 (USD 1 = Rp 9.000)
 

5. Acer Aspire Ethos

acer aspire ethosSpesifikasi:

Design:

  • Screen Resolution: 1920 x 1080
  • Screen Size: 15.6 in

Performance:

  • Processor: Intel Core i7-2630QM
  • Processor Speed: 2.0 GHz
  • Video Card: NVIDIA GeForce GT 555M
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 6 GB
  • Hard Drive: 750 GB

Battery/Warranty:

  • Battery: 7 Hours
  • Warranty: 1 Year
Price:
  • USD 1,269.95 = Rp 11.429.550 (USD 1 = Rp 9.000)
 

6. HP Pavilion dv7t Series

hp pavilion dv7t seriesSpesifikasi:

Design:

  • Screen Resolution: 1600 x 900
  • Screen Size: 17.3 in

Performance:

  • Processor: Intel Core i3-310M
  • Processor Speed: 2.1 GHz
  • Video Card: Intel HD Graphics 3000
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 6 GB
  • Hard Drive: 500 GB

Battery/Warranty:

  • Battery: 5 Hours
  • Warranty: 2 Year
Price:
  • USD 1,149.95 = Rp 10.349.550 (USD 1 = Rp 9.000)
 

7. Apple Macbook Pro

apple macbook proSpesifikasi:

Design:

  • Screen Resolution: 1440 x 900
  • Screen Size: 15.4 in

Performance:

  • Processor: Intel Core i7
  • Processor Speed: 2.2 GHz
  • Video Card: Intel HD Graphics 3000
  • Audio: Integrated
  • Operating System: Mac OS X 10.6

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 4 GB
  • Hard Drive: 500 GB

Battery/Warranty:

  • Battery: 7 Hours
  • Warranty: 1 Year
Price:
  • USD 2,099.99 = Rp 18.899.910 (USD 1 = Rp 9.000)

8. Toshiba Portege R835-P56X

Toshiba Portege R835-P56xSpesifikasi:

Design:

  • Screen Resolution: 1366 x 768
  • Screen Size: 13.3 in

Performance:

  • Processor: Intel Core i5-2410M
  • Processor Speed: 2.3 GHz
  • Video Card: Mobile Intel HD Graphics
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic

Memory/HDD:

  • Memory RAM: 4 GB
  • Hard Drive: 640 GB

Battery/Warranty:

  • Battery: 9 Hours
  • Warranty: 1 Year
Price:
  • USD 744.98 = Rp 6.704.820 (USD 1 = Rp 9.000)
 

9. Lenovo Thinkpad X220

Lenovo ThinkPad X220Spesifikasi:

Design:

  • Screen Resolution: 1366 x 768
  • Screen Size: 12.5 in

Performance:

  • Processor: Intel Core i5-2420M
  • Processor Speed: 2.5 GHz
  • Video Card: Intel HD Graphics 3000
  • Audio: Integrated
  • Operating System: Windows 7 Professional

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 2 GB
  • Hard Drive: 320 GB

Battery/Warranty:

  • Battery: 8 Hours
  • Warranty: 1 Year
Price:
  • USD 1,149.00 = Rp 10.341.000 (USD 1 = Rp 9.000)
 

10. HP ENVY 14 Series

HP ENVY 14 seriesSpesifikasi:

Design:

  • Screen Resolution: 1366 x 768
  • Screen Size: 14.5 in

Performance:

  • Processor: Intel Core i5-2410M
  • Processor Speed: 2.3 GHz
  • Video Card: Radeon HD 6630
  • Audio: Integrated
  • Operating System: Windows 7 Home Premium

Feature:

  • Wifi
  • Webcam
  • Memory Card Reader
  • Built-in Mic
  • Bluetooth

Memory/HDD:

  • Memory RAM: 6 GB
  • Hard Drive: 500 GB

Battery/Warranty:

  • Battery: 6 Hours
  • Warranty: 2 Year
Price:
  • USD 999.99 = Rp 8.999.910 (USD 1 = Rp 9.000)
 

Sumber: TopTenReviews.com

 

The Core i7 brand remains the high-end for Intel’s desktop and mobile processors, featuring the Sandy Bridge models with the largest amount of L3 cache and the highest clock frequency. Most of these models are very similar to their smaller Core i5 siblings. The quad-core mobile Core i7-2xxxQM/XM processors follow the previous “Clarksfield” Core i7-xxxQM/XM processors, but now also include integrated graphics.

Codename
(main article)
Brand name (list) Cores L3 Cache Socket TDP Process I/O Bus Release
Date
Ivy Bridge (Desktop) Core i7-37xx 4 8 MB LGA 1155 77 W 22 nm Direct Media Interface,
Integrated GPU
April 2012
Core i7-37xxK
Core i7-37xxS 65 W
Core i7-37xxT 45 W
Sandy Bridge-E (Desktop) Core i7-39xxX 6 15 MB LGA 2011 130 W 32 nm Direct Media Interface November 2011
Core i7-39xxK 12 MB
Core i7-38xx 4 10 MB
Sandy Bridge (Desktop) Core i7-2xxxK, i7-2xxx 8 MB LGA 1155 95 W Direct Media Interface,
Integrated GPU
January 2011
Core i7-2xxxS 65 W
Ivy Bridge (Mobile) Core i7-3xx0QM, i7-3xx0QE rPGA-988B
BGA-1023
45 W 22 nm April 2012
Core i7-3xx2QM, i7-3xx2QE 35 W
Core i7-3xxxXM 55 W
Sandy Bridge (Mobile) Core i7-2xxxXM 32 nm January 2011
Core i7-2xxxQM 6 or 8 MB 45 W
Core i7-2xxxQE 6 MB
Core i7-2xx0M 2 4 MB 35 W February 2011
Core i7-2xx9M BGA-1023 25 W
Core i7-2xx7M 17 W
TRIBUNLAMPUNG.CO.ID – Gangguan listrik PLN beberapa waktu ini yang terjadi di Kota Bandar Lampung disebabkan cuaca buruk berupa angin kencang. Demikian diungkapkan Risky Mohammad, Asisten Manajer Jaringan PLN Area Tanjungkarang saat diwawancara via telepon, Minggu (13/1/2013) malam.

“Ya benar, kondisi gangguan listrik di wilayah Bandar Lampung akhir-akhir ini diakibatkan gangguan cuaca buruk berupa angin kencang. Sehingga, mengakibatkan beberapa pohon tumbang dan menggangu jaringan listrik,” paparnya.

Untuk potensi gangguan kelistrikan di wilayah Bandar Lampung, sambung Risky, kerap terjadi di seputaran wilayah Kemiling, Batu Putu, dan beberapa lokasi di Soekarno-Hatta.

“Kebetulan semalam saya di lokasi (Soekarno-Hatta) karena ada beberapa pohon tumbang akibat sapuan angin kencang sekitar satu-dua pohon,” terangnya.(eka)

Bupati-Pairin-dan-Wali-Kota-Lukman-Teken-Penyelesaian-Aset.jpg
dokumentasi
TRIBUNLAMPUNG.CO.ID – Memiliki potensi dan sumber daya alam berlimpah, rupanya belum menjadi modal yang cukup bagi pemerintah di 14 kabupaten/kota di Provinsi Lampung untuk maju dan mandiri dalam bidang keuangan.Betapa tidak. Hingga memasuki tahun ke-14 sejak sistem otonomi daerah diterapkan pada 1999,  mayoritas pemerintah kota maupun kabupaten (pemkot/pemkab) di Bumi Ruwa Jurai masih bergantung kepada dana bantuan dari pemerintah pusat untuk menyukseskan berbagai program pembangunan.

“Mayoritas organisasi pemerintahan di Lampung tidak kreatif, terutama untuk memaksimalkan potensi pendapatan asli daerah (PAD),” kata dosen Fakultas Ekonomi Bisnis Universitas Lampung Habibullah Jimad SE MSi kepada Tribun, Sabtu (5/1).

Habibullah mengatakan, dalam kurun waktu lima tahun terakhir, tidak satu pun bupati atau wali kota yang memiliki terobosan berarti untuk memaksimalkan potensi dan sumber daya yang dapat menggenjot PAD. Minimnya kreatifitas tersebut, akhirnya bermuara pada sikap dependensi atau ketergantungan keuangan kepada pemerintah pusat.

Bentuk ketergantungan tersebut terlihat jelas dari target PAD sejumlah kabupaten/kota yang jauh lebih rendah dibandingkan penerimaan dana alokasi umum (DAU) setiap tahunnya, termasuk pada tahun 2012.

Dari data yang dikumpulkan Tribun, nampak jurang ketimpangan nilai nominal antara PAD dan dana transfer pemerintah pusat terlampau besar. Bahkan, target PAD kabupaten/kota tahun 2012 lalu, secara rerata tidak mencapai 10 persen dari total penerimaan DAU mereka pada tahun yang sama.

Misalnya, Kota Bandar Lampung menargetkan PAD sebesar Rp 289 miliar, sedangkan total DAU yang diterimanya mencapai Rp 762 miliar. Lampung Selatan, memiliki target PAD Rp 68,65 miliar atau hanya 10 persen dari total penerimaan DAU sebesar Rp 686 miliar.

Selanjutnya, Lampung Barat dan Metro memasang target PAD 2012, masing-masing senilai Rp 23 miliar dan Rp 32 miliar. Target tersebut, jauh lebih rendah dari total DAU yang mereka terima masing- masing yakni Rp 486 miliar dan Rp 330 miliar.

Kejomplangan mencolok nampak di Kabupaten Way Kanan. Daerah tersebut hanya menargetkan Rp 12 miliar. Padahal, mereka mendapat Rp 450 miliar DAU dari Kementerian Keuangan RI.

Hal yang sama terjadi di Kabupaten Lampung Utara, Tanggamus, dan Pesawaran. Ketiga daerah itu menargetkan PAD dalam angka belasan miliar rupiah saja, tepatnya Rp 13 miliar, Rp 16 miliar, dan Rp 14 miliar. Sedangkan total DAU yang diterima bernilai ratusan miliar rupiah, yakni Rp 661 miliar, Rp 530 miliar, dan Rp 476 miliar.

Ironi juga terjadi di Kabupaten Lampung Tengah. Daerah ini, hanya menargetkan PAD sebesar Rp 45 miliar. Padahal, mereka mendapat gelontoran DAU hampir mencapai satu triliun rupiah, tepatnya Rp 954 miliar.

Jurang yang lebar antara PAD dan DAU juga terjadi di tiga daerah otonomi baru (DOB) yakni Tulangbawang Barat, Mesuji, dan Pringsewu. Pemerintah ketiga daerah, masing-masing mematok PAD senilai Rp 5 miliar, Rp 7 miliar, dan Rp 24 miliar. Target itu jauh lebih kecil dari DAU yang mereka terima, yakni Rp 323 miliar, Rp 294 miliar, dan Rp 443 miliar.

Inkompetensi Birokrasi
Menurut Habibullah Jimad, selain kepala daerah minim kreatifitas, kertergantungan keuangan kepada pusat juga disebabkan tidak kompetennya sumber daya manusia dalam birokrasi pemerintahan. “Inkompetensi birokrasi itu ditunjukkan dengan kuantitas PNS di setiap daerah yang cenderung banyak dan gemuk di setiap levelnya, tapi job description-nya tidak jelas. Manajemen organisasi seperti itu bukannya menambah, tapi justru menghabiskan banyak uang daerah,” tukasnya.

Menurut Jimad, setiap pemkab/pemkot seharusnya memiliki standar kompetensi tersendiri untuk pegawainya. Dengan begitu, setiap pegawai bisa diberdayakan maksimal untuk berkreasi dan berinovasi demi meningkatkan PAD. “Seperti manajemen perusahaan swasta, mereka memiliki sejumlah standar kompetensi yang disesuaikan dengan kebutuhannya demi mendapat laba besar. Dengan begitu, pegawainya tetap sedikit sehingga menghemat pengeluaran, tapi bisa menghasilkan keuntungan maksimal,” tuturnya.

Masih Sentralistik
Koordinator Maarif Institute Bandar Lampung Nur Rakhman Yusuf mengungkapkan, banyaknya daerah tak mampu mandiri disebabkan sikap pemerintah pusat yang belum sepenuhnya menerapkan otonomi daerah (otda). “Semangat otda belum sampai pada tingkat pendapatan. Kemampuan ekonomi belum menjadi pertimbangan,” kata Yusuf, Sabtu (5/1).

Padahal, tujuan otda adalah untuk mempercepat kesejahteraan masyarakat. Yusuf menilai, hal itu bisa terjadi apabila pemerintah daerah terlebih dahulu bisa mandiri secara keuangan sehingga kebijakannya akan langsung menyentuh masyarakat. “Semangat otda baru pada tataran meningkatkan pengelolaan pemerintahan. Belum sampai pada upaya mandiri secara keuangan,” ungkap Yusuf. “Kondisi tersebut tampak dalam penetapan target PAD.”

PAD merupakan pemasukan ke kas daerah yang berasal dari sumber-sumber keuangan di daerah.
Selain PAD, sumber pemasukan daerah berasal dari dana perimbangan yang diberikan pemerintah pusat. Alokasi terbesar dana perimbangan disalurkan melalui DAU. “Daerah yang mandiri seharusnya memiliki PAD lebih besar dibandingkan dana yang diberikan pemerintah pusat,” ucap Yusuf.

PAD kabupaten/kota di Lampung yang sangat rendah, Yusuf menerangkan, terjadi karena pemerintah pusat belum menerapkan otda dalam sektor ekonomi. Pemerintah daerah hanya memiliki kebijakan pengelolaan yang terbatas dalam sektor ekonomi. “Katakanlah di Tulangbawang atau Lampung Tengah. Di sana, banyak industri besar berdiri. Tetapi, sejauh mana kontribusinya pada daerah. Pajak- pajak ditarik dulu ke pusat, baru dibagikan ke daerah,” terang Yusuf.

Hal itu menjadikan rentang kendali pengelolaan keuangan menjadi panjang. Sementara, masyarakat harus merasakan imbas negatif dari keberadaan perusahaan-perusahaan tersebut. “Kendaraan pabrik yang bolak-balik membuat jalan rusak. Masyarakat yang melewati jalan yang sama turut terkena imbas. Banyak perusahaan besar tetapi masyarakat sekitarnya masih hidup pas-pasan,” papar Yusuf.

Rentang kendali sektor keuangan yang mayoritas masih sentralistik, Yusuf menjelaskan, menjadikan daerah terus tergantung pada pemerintah pusat secara ekonomi. “Kalau seperti itu, bagaimana pemerintah daerah bisa optimal melayani masyarakat,” kata Yusuf.(rid/rez)

Perampokan Merajalela di Lampung Timur

RAMAN UTARA (Lampost.co): Perampok bertopeng beraksi di Lampung Timur. Kali ini pelaku menyatroni rumah Suyadi (38) di Desa Rejokaton, Kecamatan Raman Utara, Selasa (29-1) dini hari.

Dari rumah petani tersebut, pelaku menyikat uang Rp200 juta dan perhiasan emas seberat 40 gram. Dua hari sebelumnya, Minggu (27-1), kawanan perampok bertopeng juga menyatroni rumah Bahaudin (40) di Desa Sukadanailir, Kecamatan Sukadana. Dari rumah bos rongsokan itu, pelaku menyikat harta senilai ratusan juta rupiah.
Menurut Suyadi, sekitar pukul 03.00 ia mendengar suara pintu belakang rumahnya didobrak. Ia lalu menuju pintu belakang. Sampai di dapur, pelaku yang diperkirakan lima orang sudah di dalam.

“Semuanya menggunakan penutup muka sehingga saya tidak bisa mengenali,” kata Suyadi.

Pelaku lalu menempelkan senjata api ke kepala petani tersebut serta memintanya jangan berteriak dan melawan. Pelaku juga meminta korban menunjukkan hartanya.
Awalnya, Suyadi tidak mengakui kalau di rumah ada uang dan perhiasan. Akan tetapi, karena istri dan anak semata wayangnya juga diancam dengan senjata tajam, ia pun menunjukkan simpanannya berupa uang Rp200 juta dan emas 40 gram.

Setelah itu, pelaku mengikat tangan dan menutup mulut Suyadi dan keluarganya. “Kami bertiga diikat dengan tali plastik dan mulut kami dilakban sehingga tidak bisa berteriak,” kata Suyadi.

Modus Sama
Dengan modus yang sama, perampok bertopeng menyatroni rumah Bahaudin (40) di Desa Sukadanailir, Kecamatan Sukadana, Minggu (27-1) dini hari. Bahaudin terbangun karena mendengar pintu samping rumahnya didobrak sekitar pukul 02.00.

Pelaku yang diperkirakan berjumlah enam orang lalu masuk. Bahaudin bersama istri dan kedua anaknya diikat dengan tali plastik serta mulut ditutup lakban.
Seorang pelaku menodongkan pistol ke kepala Bahaudin dan istrinya Supartun. Ia kemudian menunjukkan hartanya setelah kepalanya dipukul hingga mengeluarkan darah. “Kami tidak bisa mengenali mereka karena pelaku mengenakan penutup wajah,” kata Bahaudin saat ditemui di rumahnya.

Dari rumah korban, pelaku menyikat uang tunai sekitar Rp100 juta, perhiasan emas 23 gram, dan 8 unit telepon seluler berbagai merek. Pelaku lalu meninggalkan para korban dengan tangan dan kakinya diikat serta mulut ditutup rapat. Keberadaan korban baru diketahui oleh para pekerja yang datang ke tempat Bahaudin sekitar pukul 06.30.

Kanit Reskrim Polsek Sukadana Iptu Syaipullah mengatakan pihaknya masih menyelidiki kasus tersebut. Dari lokasi kejadian, polisi menyita barang bukti besi sepanjang 1,5 meter yang diduga digunakan pelaku untuk mendobrak pintu korban, lakban untuk menutup mulut, seutas tali rafia hitam untuk mengikat para korban, dan sandal jepit yang diduga milik pelaku. (GUS/R-3)