Cara mengkoneksiskan VB 6.0 dan Access
Hai semua.. Apa kabar?? Semooga sehat dan baik selalu yaa.. Pertama, makasih buat teman-teman yang udah berkunjung ke blog saya. Kali ini saya akan memberikan tutorial bagaimana caranya mengkoneksikan visual basic 6.0 dengan microsoft access. Disini saya menggunakan Access tahun 2010 walaupun sebenarnya tahun atau versi berapapun ga masalah kok, sama saja, sama-sama digunakan untuk menyimpan suatu record atau data yang telah kita inputkan. Yupp langsung saja :
- Buka aplikasi vb 6
- klik Add-ins -> Visual data manager
Maka akan muncul tampilan seperti gambar dibawah ini!!
- Lalu pilih file -> new -> Microsoft Access ->
* Pilih version 7.0 untuk microsoft access 2003 ke atas
* Pilih version 2.0 untuk microsoft access 2003 ke bawah (Jadul atau jarang digunakan
- Teman-teman akan memasuki tempat dimana anda akan menyimpan file
database tersebut. Ketikan nama file lalu simpan.
Maka tampilannya akan berubah menjadi seperti ini!!
- Lalu pada tulisan properties klik kanan pilih new table hingga muncul tampilan seperti ini :
- Isi table name dengan nama tabel yang akan anda buat semisal
tabel_mahasiswa (*Penamaan tabel tanpa spasi)
- Lalu klik Add Field hingga tampilannya menjadi seperti ini
- Isikan field yang anda inginkan mulai dari nama, type maupun size lalu klik
ok. Buatlah hal ini berulang sampai field yang anda inginkan sudah dibuat
semuanya. Setelah selesai klik close.
- Klik build the table.
- Dengan mengucap Alhamdulillah Database teman-teman telah selesai dibuat.
=================================================
Untuk Informasi Lebih Lanjut bisa menghubungi :
Email : javashare29@gmail.com
Facebook : Java Share
Twitter : @baihaqiannazili atau lewat kolom komentar dibawah ini.
>> Terima Kasih <<
Download Microsoft Visual Basic 6
Microsoft Visual Basic 6.0 merupakan sebuah software enginer dimana dengan aplikasi ini teman-teman semua bisa membuat sebuah program sesuai keinginan teman-teman sekalian. Bahasa yang digunakan tentu bukan bahasa daerah masing-masing melainkan memakai bahasa pemograman vb (visual basic). Untuk mempelajarinya mudah kok, banyak tutorial yang disediakan oleh para penyedia website untuk belajar vb dari dasar hingga mahir. Disini saya menyediakan aplikasi tersebut yang bisa teman-teman unduh atau download secara gratis selama ada wifi atau paket yaaa :D
Cara Instal :
- Download aplikasi Microsoft Visual Basic di Javasae.blogspot.co.id
- Buka file rar yang telah diunduh tadi
- Buka folder visual basic 6
- Cari file "setup.exe" lalu Instal
- Buka file vb 6 serial.txt, Silahkan aktfasi dengan menggunakan serial tersebut
- Selesai
Microsoft Visual Basic >> Download Disini <<
Cara Membuat Form Login Sederhana Dengan VB6
Selamat datang kembali untuk teman-teman semua. Disini saya akan memberikan cara untuk membuat form login sederhana menggunakan vb 6 dengan database microsoft access 2010. Gambar - gambar diatas bisa teman-teman jadikan referensi tampilan yang akan dibuat.
Toolbox yang digunakan :
- Label
- TextBox
- Timer
- Frame
- Command Button
- Menu Editor
Berikut adalah source code untuk aplikasi tersebut :
- Module1
Public con As New ADODB.Connection
Public rst As New ADODB.Recordset
Public strcon As String
Public strsql As String
Public Sub buka()
On Error GoTo pesan
strcon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\buku.mdb;Persist Security Info=False"
If con.State = adStateOpen Then
con.Close
Set con = New ADODB.Connection
con.Open strcon
Else
con.Open strcon
End If
Exit Sub
pesan:
MsgBox "Tidak ada koneksi ke database..!", vbInformation, "Informasi"
End Sub
Public Sub tutup()
con.Close
End Sub
- Form 1 (Menu Utama)
- Form 1 (Menu Utama)
Private Sub Form_Load()
LOGOUT.Visible = False
DATA.Enabled = False
PROSES.Enabled = False
LAPORAN.Enabled = False
End Sub
Private Sub KELUAR_Click()
konfirmasi = MsgBox("Apakah Anda Yakin Ingin Keluar??? ", vbYesNo + vbInformation)
If konfirmasi = vbYes Then
End
End If
End Sub
Private Sub LOGIN_Click()
Form2.Show
End Sub
Private Sub LOGOUT_Click()
tutup
Form2.Show
Unload Me
End Sub
Private Sub Timer1_Timer()
Label3.Caption = Format(Now, "hh:mm:ss")
Label4.Caption = Format(Now, "dddd, d mmmm, yyyy")
End Sub
- Form2 (Login)
- Form2 (Login)
Sub bersih()
Text1.Text = ""
Text2.Text = ""
End Sub
Private Sub Command1_Click()
buka
Dim sql As String
Dim cari As New ADODB.Recordset
sql = "select * from TABEL_LOGIN where username ='" & LCase(Text1.Text) & "' and password = '" & LCase(Text2.Text) & "'"
Set cari = con.Execute(sql)
If cari.EOF Then
MsgBox "Maaf User atau Password anda salah !", vbInformation, "Informasi"
Text1.SetFocus
Call bersih
Else
MsgBox "Anda berhasil login !", vbInformation, "Informasi"
Dim akses As String
Label3.Caption = cari!akses
If Label3.Caption = "admin" Then
Form1.LOGOUT.Visible = True
Form1.LOGIN.Visible = False
Form1.DATA.Enabled = True
Form1.PROSES.Enabled = True
Form1.LAPORAN.Enabled = True
Form1.Show
Unload Me
ElseIf Label3.Caption = "user" Then
Form1.LOGOUT.Visible = True
Form1.LOGIN.Visible = False
Form1.DATA.Enabled = False
Form1.PROSES.Enabled = False
Form1.LAPORAN.Enabled = True
Form1.Show
Unload Me
End If
End If
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Form_Load()
Call bersih
End Sub
=================================================
Untuk Informasi Lebih Lanjut bisa menghubungi :
Email : javashare29@gmail.com
Facebook : Java Share
Twitter : @baihaqiannazili atau lewat kolom komentar dibawah ini.
>> Terima Kasih <<
Cara Membuat Aplikasi Data Buku Sederhana Dengan VB6
Untuk membuat software tersebut saya menggunakan program Microsoft Visual Studio yang bisa teman-teman download secara free dari google tinggal di search aja :D. Database yang saya gunakan adalah Microsoft Access.
Toolbox yang digunakan adalah :
- Label
- Frame
- TextBox
- Command Button
- Data Grid
- Adodc
Berikut adalah source code dari program tersebut :
Sub bersih()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command1_Click()
If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Then
MsgBox ("Data Belum Terisi atau Lengkap")
Else
Adodc1.Recordset.AddNew
Adodc1.Recordset!kode_buku = Text1.Text
Adodc1.Recordset!nama_buku = Text2.Text
Adodc1.Recordset!harga = Text3.Text
Call bersih
End If
End Sub
Private Sub Command2_Click()
If Adodc1.Recordset!kode_buku = Text1.Text Then
Adodc1.Recordset.Update
Adodc1.Recordset!kode_buku = Text1.Text
Adodc1.Recordset!nama_buku = Text2.Text
Adodc1.Recordset!harga = Text3.Text
Call bersih
Command1.Enabled = True
Command3.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Command6.Enabled = True
ElseIf Text1.Text = "" Then
MsgBox ("Anda Harus Mencari Kode Buku di Kolom Search")
Text4.SetFocus
End If
End Sub
Private Sub Command3_Click()
Call bersih
End Sub
Private Sub Command4_Click()
konfirmasi = MsgBox("Yakin Akan Dihapus???", vbYesNo + vbInformation, "Konfirmasi")
If konfirmasi = vbYes Then
Adodc1.Recordset.Delete
End If
End Sub
Private Sub Command5_Click()
konfirmasi = MsgBox("Yakin Mau Keluar???", vbYesNo + vbInformation, "Keluar")
If konfirmasi = vbYes Then
End
End If
End Sub
Private Sub Command6_Click()
Adodc1.Recordset.Find "kode_buku ='" & Text4.Text & "'", , adSearchForward, 1
If Not Adodc1.Recordset.EOF Then
Text1.Text = Adodc1.Recordset!kode_buku
Text2.Text = Adodc1.Recordset!nama_buku
Text3.Text = Adodc1.Recordset!harga
Command1.Enabled = False
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = False
Else
MsgBox ("Data Tidak Ditemukan")
Text4.Text = ""
Text4.SetFocus
End If
End Sub
Private Sub Form_Load()
Call bersih
End Sub
Private Sub Timer1_Timer()
Label5.Caption = Format(Now, "hh:mm:ss")
Label6.Caption = Format(Now, "dddd:d mmmm:yyyy")
End Sub
========================================================================
Untuk Informasi Lebih Lanjut bisa menghubungi :
javashare29@gmail.com atau Komentar di bagian bawah postingan ini.
>> Terima Kasih <<
Download One Piece 730 Subtitle Indonesia
Sinopsis :
Zoro dan Franky berusaha untuk menghentikan sangkar burung!. Tapi, sangkar burung itu semakin menyempitseolah-olah menghancurkan harapan mereka. Dan sesaat sebelum kehancuran, Luffy berhasil pulih dan cahaya keajaiban bersinar di Dressrosa!
Mau tau cerita selengkapnya segera download dan saksikan Episode One Piece selanjutnya :
"Tangisan Keajaiban! Pertarungan Mansherry"
Mini HD 480P : >> Download disini <<
HD 720P : >> Download disini <<
S-HD 480P : >> Download disini <<
Thanks to OPLOVERZ.NET
Materi Semester 2 Raharja
File
|
Download
|
Bahasa Indonesia.rar
|
>> Disini <<
|
Bahasa Inggris 2.rar
|
>> Disini <<
|
Pemograman Terstruktur.rar
|
>> Disini <<
|
Elektronika.rar
|
>> Disini <<
|
Fisika 1.rar
|
>> Disini <<
|
Kalkulus.rar
|
>> Disini <<
|
Keamanan Komputer.rar
|
>> Disini <<
|
Logika Matematika.rar
|
>> Disini <<
|
Organisasi Komputer.rar
|
>> Disini <<
|
*Fisika1 , Keamanan Komputer, Logika Matematika , Organisasi Komputer (Update)
Materi Semester 1 Raharja
One Piece Spesial 3D2Y Subtitle Indonesia
Sinopsis :
Episode special ini menceritakan peristiwa setelah perang besar antara Bajak Laut Shirohige dengan Angkatan Laut di Marineford. Disini diceritakan Luffy belajar jurus atau tehnik baru yakni bernama haki. Luffy sendiri sebetulnya sudah bisa mengeluarkan haki miliknya namun ia belum bisa untuk mengontrol haki tersebut. Terlebih lagi Luffy mampu memiliki Haki aura penakluk yakni Hao soku no Haki. Jenis haki ini merupakan tehnik yang tidak dimiliki setiap orang melainkan hanya kepada orang-orang yang memiliki semangat yang tinggi saja.
Dalam kisah kali ini Luffy sedang berlatih penguasaan haki dengan gurunya atau wakil kapten raja bajak laut Gold D. Roger yakni Mei'o Rayleigh. Namun pada saat berlatih tanpa sengaja bertemu dengan mantan tahanan Imple Down "Byrnndi World" dengan kekuatan moa moa no mi yang bisa merubah benda menjadi 10 kali lipat dari ukuran semula.
World ingin sekali menghancurkan markas besar angkatan laut. Ia berencana menembakkan meriam dengan kekuatan buah iblisnya menjadi 10 kali lebih besar dari biasanya sehingga mampu meluluhlantahkan Marine Ford. Usahanya ini dimulai dengan menjebak Ouka Shicibukai Boa Hanncock untuk dijadikan sandera olehnya. Namun yang ia dapati hanya saudara dari Hanncock. Hal ini membuat Luffy marah hingga ingin menghajar World. Luffy dan Hanncock berencana melawan Byrnndi World sendiri dengan kekuatan haki yang baru 50% dikuasainya. Apakah Luffy dan Boa Hancock mampu untuk mengalahkan Byrnndi World?? Saksikan cerita selengkapnya dengan mendownload link yang telah disediakan...
Dalam kisah kali ini Luffy sedang berlatih penguasaan haki dengan gurunya atau wakil kapten raja bajak laut Gold D. Roger yakni Mei'o Rayleigh. Namun pada saat berlatih tanpa sengaja bertemu dengan mantan tahanan Imple Down "Byrnndi World" dengan kekuatan moa moa no mi yang bisa merubah benda menjadi 10 kali lipat dari ukuran semula.
World ingin sekali menghancurkan markas besar angkatan laut. Ia berencana menembakkan meriam dengan kekuatan buah iblisnya menjadi 10 kali lebih besar dari biasanya sehingga mampu meluluhlantahkan Marine Ford. Usahanya ini dimulai dengan menjebak Ouka Shicibukai Boa Hanncock untuk dijadikan sandera olehnya. Namun yang ia dapati hanya saudara dari Hanncock. Hal ini membuat Luffy marah hingga ingin menghajar World. Luffy dan Hanncock berencana melawan Byrnndi World sendiri dengan kekuatan haki yang baru 50% dikuasainya. Apakah Luffy dan Boa Hancock mampu untuk mengalahkan Byrnndi World?? Saksikan cerita selengkapnya dengan mendownload link yang telah disediakan...
Mau tau cerita selengkapnya segera download dan saksikan Episode One Piece :
"3D2Y"
LangMaster Toefl Practice Tests CD2
LangMaster The Heineman Toefl "Practice Tests" adalah kelanjutan dari CD sebelumnya, hanya saja pada sesi kali ini lebih banyak test toeflnya dibandingkan sebelumnya. Sangat cocok bagi kalian yang ingin latihan toefl secara mudah. Merupakan suatu pembelajaran toefl atau software untuk memahami toefl itu seperti apa. Disini kita dapat mensimulasikan latihan-latihan toefl secara mudah dan kita dapat langsung mengetahui hasil dari latihan atau tes kita.
Software ini menjadi begitu penting terutama bagi pribadi Raharja Informatika (STMIK Raharja) karena biasanya keluar di dalam soal-soal UAS/UTS Pribadi Raharja. Dari sini kita dapat mengukur sejauh mana nilai atau score yang kita raih. Untuk Pribadi Raharja sendiri, target minimal yang harus dipenuhi yakni 450 yang didapat dari nilai Listening, Structure dan Reading.
Mudah-mudahan software ini dapat membantu teman-teman semua untuk belajar Toefl. Dan khususnya kepada teman-teman STMIK Raharja dapat membantu untuk belajar software ini dikomputer/laptop masing-masing sehingga tidak perlu repot-repot ke lab kampus.
Untuk Softwarenya dapat didownload >>Disini<<
Untuk panduan download dapat dilihat >>Disini<<
Cara penggunaan :
1. Buka Daemon Tools jika belum punya silahkan download >>Disini<<
2. Setelah dibuka klik tombol "Quick Mount" yang terdapat di pojok kanan
Cara penggunaan :
1. Buka Daemon Tools jika belum punya silahkan download >>Disini<<
2. Setelah dibuka klik tombol "Quick Mount" yang terdapat di pojok kanan
bawah.
3. Pilih file .iso atau file LangMaster yang telah di download tadi. Lalu klik
open.
4. Buka folder Computer. Biasanya terdapat direktori tambahan (E:) untuk file
3. Pilih file .iso atau file LangMaster yang telah di download tadi. Lalu klik
open.
4. Buka folder Computer. Biasanya terdapat direktori tambahan (E:) untuk file
tersebut.
5. Klik direktori tersebut. Cari file bernama run. Klik kanan pada file tersebut
5. Klik direktori tersebut. Cari file bernama run. Klik kanan pada file tersebut
lalu klik run as administrator.
6. Selamat Mencoba
6. Selamat Mencoba
LangMaster Toefl Preparation Course CD1
LangMaster The Heineman Toefl "Preparation Course" merupakan suatu pembelajaran toefl atau software untuk memahami toefl itu seperti apa. Disini kita dapat mensimulasikan latihan-latihan toefl secara mudah dan kita dapat langsung mengetahui hasil dari latihan atau tes kita.
Software ini menjadi begitu penting terutama bagi pribadi Raharja Informatika (STMIK Raharja) karena biasanya keluar di dalam soal-soal UAS/UTS Pribadi Raharja. Dari sini kita dapat mengukur sejauh mana nilai atau score yang kita raih. Untuk Pribadi Raharja sendiri, target minimal yang harus dipenuhi yakni 450 yang didapat dari nilai Listening, Structure dan Reading.
Mudah-mudahan software ini dapat membantu teman-teman semua untuk belajar Toefl. Dan khususnya kepada teman-teman STMIK Raharja dapat membantu untuk belajar software ini dikomputer/laptop masing-masing sehingga tidak perlu repot-repot ke lab kampus.
Untuk Softwarenya dapat didownload >>Disini<<
Untuk panduan download dapat dilihat >>Disini<<
Cara penggunaan :
1. Buka Daemon Tools jika belum punya silahkan download >>Disini<<
2. Setelah dibuka klik tombol "Quick Mount" yang terdapat di pojok kanan
Cara penggunaan :
1. Buka Daemon Tools jika belum punya silahkan download >>Disini<<
2. Setelah dibuka klik tombol "Quick Mount" yang terdapat di pojok kanan
bawah.
3. Pilih file .iso atau file LangMaster yang telah di download tadi. Lalu klik
open.
4. Buka folder Computer. Biasanya terdapat direktori tambahan (E:) untuk file
3. Pilih file .iso atau file LangMaster yang telah di download tadi. Lalu klik
open.
4. Buka folder Computer. Biasanya terdapat direktori tambahan (E:) untuk file
tersebut.
5. Klik direktori tersebut. Cari file bernama run. Klik kanan pada file tersebut
5. Klik direktori tersebut. Cari file bernama run. Klik kanan pada file tersebut
lalu klik run as administrator.
6. Selamat Mencoba
6. Selamat Mencoba
Cara Mudah Download
Assalamu'alaikum ..
Buat teman-teman semua saya ucapkan terima kasih sudah berkunjung di Java Sae. Mohon maaf sebelumnya jika ribet atau mengalami kendala saat ingin mendownload. Hal ini semata-mata untuk menambah efektifitas dari Java Sae. Berikut ini saya berikan info untuk cara download (disarankan jika terpasang adblock agar dimatikan sementara selama mendownload) :
1. Klik link download yang disediakan biasanya terdapat pada kata "Disini".
2. Anda akan memasuki link iklan adf.ly. Tunggu sekitar 5 detik hingga
muncul tulisan Lewati/Skip pada pojok kanan atas. Lalu kli kata tersebut.
muncul tulisan Lewati/Skip pada pojok kanan atas. Lalu kli kata tersebut.
3. Anda akan memasuki link iklan adfoc.us. Tunggu sekitar 6 detik hingga
muncul tulisan Skip pada pojok kanan atas. Lalu klik kata tersebut.
4. Anda mulai masuk kedalam media penyimpanan / download. Cari kata
download lalu klik.
5. Selamat mencoba.
Jika masih terdapat masalah segera berkomentar atau menghubungi saya di twitter : @baihaqiannazili
Download Daemon Tools Lite
Dengan Daemon Tools Kamu dapat membuat cadangan CD fisik Kamu / DVD / HD DVD / Blu-ray disc ke "disk virtual" atau disebut "disk image" file, yg berjalan secara langsung pada hard drive kamu. kamu juga dapat bekerja dengan gambar yg dibuat oleh program pembakaran lain! Daemon Tools mendukung berbagai jenis gambar. Gunakan CD / DVD konverter gambar untuk memiliki gambar format satu di Katalog Gambar kamu!
1. Mengemulasikan virtual CD / DVD-ROM / HD DVD dan Blu-ray drive
Daemon Tools Lite [Commercial] memungkinkan kamu untuk meniru hingga 4 CD / DVD drive virtual pada PC kamu. Virtual drive akan muncul pada OS seperti yg nyata. Pilih drive virtual kemudian memilih gambar disk kamu ingin me-mount. Temukan virtual drive yg dibuat dengan gambar disk dipasang di My Computer. Mulai bekerja! Sepertinya bekerja dengan drive nyata dan disk nyata, bukan? Ya, tetapi jauh lebih cepat!
2. Buat gambar disk
Dengan Daemon Tools Lite [Commercial] kamu dapat membuat ISO dan file gambar MDS dari cakram asli dimasukkan di fisik CD / DVD / HD DVD / Blu-ray drive. Atau gunakan gambar yg telah kamu buat sebelumnya dengan program lainnya. Daemon Tools produk bekerja dengan berbagai jenis gambar.
Fitur Utama :
- menciptakan *. iso dan *. MDS foto;
- mengemulasi sampai dengan 4 virtual CD / DVD drive;
- melakukan mounting dan unmounting gambar;
- mendukung b5t *., *. b6t, bwt *., *. ccd, *. CDI, *. cue, *. NRG, *. pdi, *. isz;
- menawarkan antarmuka baris perintah handal.
