Jumat, 17 Mei 2013

Andro IT SMK BPPI Baleendah Juara Lomba Programming & Web Desain

kabar bandung
kamis, 16 mei 2013 20:04 WIB
 
 
ist
PARA pemenang lomba "Web Desain, Programming & Fotografi Competition" yang diselenggarakan Akademi Manajemen Komputer (Amik Hass) berfoto bersama di kampus perguruan tinggi tersebut seusai menerima tropy dan hadiah, Kamis (16/5/2013)
JLN. BLK FACTORY (GM) - Andro IT dari SMK BPPI Baleendah, Kab. Bandung, berhasil menjadi juara 2 programing & web desain pada lomba "Web Desain, Programming & Fotografi Competition" yang diselenggarakan Akademi Manajemen Komputer (Amik Hass). SMK BPPI berhasil lolos menjadi juara setelah menyisihkan puluhan peserta yang berasal dari sekolah lainnya pada lomba tersebut.

Sesusai menerima hadiah, Kamis (16/5/2013), Muhammad Purnama Alam dari Tim Andro IT, mengatakan, timnya yang terdiri dari dirinya juga Masdan Suryo P., dan Deni Perta Wijaya Sinaga yang kebetulan pada Sesi Programming & Web Desain harus mengalahkan 85 pesaing lainnya. "Alhamdulillah dengan kesungguhan, kita bisa meraih prestasi pada lomba ini meski tidak menjadi juara pertama," ungkap Alam, panggilan Muhammad Purnama Alam.

Rasa bangga juga terpancar dari wajah Masdan Suryo P dan Deni Perta Wijaya Sinaga. Keduanya merasa, hasil lomba ini menjadi motivasi untuk lebih meningkatkan hasil karyanya. "Ini benar-benar menjadi pendorong kami untuk lebih berprestasi lagi. Terlebih pihak SMK BPPI sangat mendukung sekali kegiatan siswanya dalam lomba-lomba seperti ini," ujar Masdan.

Kepala SMK BPPI Baleendah, Kab. Bandung, Drs. Retmono, M.Si., mengatakan, pihaknya memang memberika ruang bagi siswa-siswa yang berpotensi untuk mengembangkan bakat yang dimilikinya."Kreatifitas siswa disini memang terus kita dorong sehingga kelihatan bakat maupun potensi yang dimilikinya," ungkap Retmono.

Katanya, di BPPI sering ditemukan siswa-siswa yang saat di SMP-nya tidak menunjukan prestasi, namun setelah sekolah disini seperti mendapatkan kebebasan untuk berkreatifitas sehingga terlihat potensinya. "Bukan hanya pada bidang IT, juga pada bidang lainnya. Bahkan kami punya siswa yang sampai juara karate nasional," ujarnya sambil tersenyum bangga.
asd
 

Rabu, 06 Februari 2013

Login Database sederhana


CARA MEMBUAT LOGIN DENGAN DATABASE SEDERHANA
1.     Buat database loginnya(dblogin) tabelnya(t_login) dan disave dengan format 2002-2003
Ket : untuk database dan program vb nya di buat 1 folder
Fieldname
Type data/size
Username
Text(100)
Password
Text(50)
Lalu buat 1 record pada username dan password
Lihat gambar dibawah ini :
2.     Buka vb nya sahabat
3.     Buat 2 form
Form1
Properties
Value
Name
F_login
Caption
Login
Form2
Properties
Value
Name
F_reset
Caption
Reset
Jika sudah save lalu close database dan ms. Acess nya
4.     Sekarang masukan control 3 label, 3 button, 2 textbox pada f_login
Desain seperti gambar di bawah ini :

5.     Aduh hamper lupa membuat koneksi ke databasenya
Yo sekarang kita buat koneksinya caranya
Klik menu Projectà pilih dataenvironment
6.     Di dataenvironment connection1 klik kanan àpropertiesàpilih M.s Jet 4.0 ole DB Provider next àbrows database yang kita buatà lalu test connection
Ket : bila sudah ada pesan Test connection Succeeded tanda database sudah terhubung
7.     Klik kanan di connection1 lalu pilih command1
Klik kanan di command1àproperties setting seperti dibawah ini :
Jangan di ok dulu kawan sekarang kita klik tab advanced (liat pada gambar di atas yang paling ujung)
Ubah Lock type pada tab advanced nya jadi Optimistic
Lalu apply à ok
8.     Nah sekarang kita ke F_reset
9.     Drag dan drop kan Logindb yang ada pada Dataenvironment1 ke F_Reset
10.                  Buat 2 button pada F_Reset
Seting seperti dibawah ini
Command1
Caption      :           Reset
Command2
Caption      :           Kembali
11.                  Lalu sekarang masukan script di bawah ini ke form Reset
Private Sub Command1_Click()
DataEnvironment1.rsLogindb.Update
MsgBox "Data berhasil direset", vbInformation, "Sukses"
End Sub

Private Sub Command2_Click()
f_login.Show
Me.Hide
End Sub
12.                  Lalu masukan script dibawah ini pada f_Login
Private Sub Command1_Click()
If Text1 = f_reset.txtUsername.Text And Text2 = f_reset.txtPassword.Text Then
MsgBox "Login berhasil"
Menu.Show
Me.Hide
Else
MsgBox "USer dan Pass yang anda masukan kurang tepat", vbCritical, "Try again"
Text1 = ""
Text2 = ""
End If
End Sub

Private Sub Command2_Click()
f_reset.Show
Me.Hide
End Sub

Private Sub Command3_Click()
End
End Sub

Nah itu adalah scripnya
Ouh iyah lupa tambahkan 1 form lagi dan setting namenya jadi Menu
nah sekarang coba anda save 1 folder dengan tempat databasenya
lalu jalankan :D
Mungkin cukup sekian tutorial dari saya
Semoga bermanfaat bagi sahabat oke :D

Bila sahabt masih bingung silakan Download tutorialnya

GOOD LUCK >>>
Teknologismkbppibaleendah.blogspot.com