Jumat, 28 Desember 2018

CRUD VB NET DATA BASE ACCESS

TERLEBIH DAHULU KITA SIAPKAN TABEL ACCESS DAN TABEL VB NET BESERTA DESAIGN NYA AGAR ACCESS DAN VB NET DAPAT TERKONEKSI KE DATA BASE TERSEBUT.

SESUDAH ITU BARU KITA HUBUNGKAN ACCESS KE VB NET AGAR DAPAT TERKONEKSI KE DATA BASE NYA KITA SIAPKAN KODINGANNYA 


MESSAGE` BOX NYA KITA BIKIN (OK BOS)...KETIKA DI RUNN KITA MASUKKAN DATA KITA SESUAI NAMA,NO HANDPHONE,DAN, EMAIL KITA KLIK SAVE MUNCUL NANTI ADA BACAAN OK BOSS KLIK OK..


ADAPUN TABEL YANG SUDAH KITA SIAPKAN UNTUK MEMBUAT DATA BASE TERSEBUT


KODINGAN PUN SELESAI COBA KITA RUNN HASILNYA 



BISA DILIHAT DI ATAS KETIKA KITA MASUKKAN DATA KETIKA KITA KLIK SAVE ADA BACAAN OK BOSS DI MESSAGE BOX 
SELANJUTNYA KITA MASUKKIN DATA-DATA NAMA , NO HANDPHONE , EMAIL , FACEBOOK SESUAI BIODATA TERUS DATA PUN AKAN TERSIMPAN KE DALAM DATA BASE YANG TELAH KITA BUAT 


DEMIKIAN LAH TUTORIAL DARI SAYA SEMOGA BERMANFAAT SELAMAT BELAJAR TEMAN-TEMAN SEMANGAT KODINGAN PROGRAMMER

Senin, 12 November 2018

Gambar Postingan Vb net coneksi ke access

ADAPUN SEBUAH PROJECK VB NET DATA INPUT WARGA DOMISILI TERKONEKSI KE ACCESS 

➤PERTAMA KITA MELAKUKAN DESAIGN PADA SUATU PROJECK
   ADA LABEL
            ⧪ TEXTBOOX
            ⧪ BUTTON 
            ⧪ DATAGRIDVIEW1
             



➤SETELAH DESAIGN SELESAI KITA MELAKUKAN CODINGAN DI SUATU PROJECK AGAR TERKONEKSI KE DATA BASE TERSEBUT





SETELAH CODINGAN PUN SELESAI KITA RUUN DAN HASIL PUN LANGSUNG MUNCUL SEBUAH FROM LOGIN  
➤KODE USER
➤USER NAME
➤PASSWORD
KETIK SESUAI KODE USER ,USER NAME,DAN PASSWORD YANG ADA DI SEBUAH PROJECK ATAUPUN DATA YANG TELAH DI TENTUKAN



➤SETELAH DI KETIK FROM LOGINNYA MAKA MUNCUL PROJECK YANG TELAH SAYA BUAT ADA 
➤NIK
➤NAMA
➤ALAMAT
➤STATUS
➤PEKERJAAN
KITA KETIK SESUAI DAFTAR WARGANYA KETIK SIMPAN MAKA DATA WARGA YANG KITA KETIK TERSIMPAN LAH DI SEBUAH DATA BASE ACCESS YANG TELAH KITA BUAT JADI TERKONEKSI



➤DAN HASILPUN SEPERTI INI DATA INPUT WARGA PUN TERSIMPAN DI SEBUAH PROJECK DATA BASE ACCESS YANG TELAH KITA INPUT .....
CUKUP SEKIAN DARI SEBUAH PROJECK SAYA SEMOGA BERMANFAAT SAYA AKHIRI WALAIKUM SALAM WR.WB 


SALAM SEMANGAT CODINGAN








Sabtu, 10 November 2018

BIODATA PEGAWAI GAJI KARYAWAN



➤INI LAH SEBUAH PROJECK JAVA NETBENS BIODATA PEGAWAI DAN SELIP GAJI PEGAWAI

⧪DESKRIPSI
1.JFRAME DESAIGN DULU PROJECKNYA TERLEBIH DAHULU ADA LABEL, TEXTFIELD,BUTTON DAN PANNEL SESUDAH ITU BARU CODINGANNYA SECARA TERATUR DAN SUDAH ADA DI KODE TERSEBUT YANG TELAH DI TENTUKAN

2. SETELAH CODINGAN SELESAI ....
COBA KITA RUUN DAN HASILNYA PUN CUKUP MEMUASKAN KETIK NIK , NAMA , TEMPAT TANGGAL LAHIR , ALAMAT , STATUS, GAJI , DAN JABATAN

3. SETELAH ITU KLIK ENTER MAKA AKAN TERBACA DI SEBUAH DATA BASE YANG TELAH KITA SIAPKAN YAITU PANEL

ITU LAH SEBUAH PROJECK JAVA NETBEENS SAYA SEMOGA BERMANFAAT UNTUK KALIAN TERIMA KASIH

SEMANGAT KODINGAN........






Sabtu, 03 November 2018

DATA INPUT WARGA MICROSOFT WORD TUGAS UTS




DATA BASE WORD DAN EXCEL INPUT DATA WARGA
Desain from 1 menjadi input data warga1
·        Label 5 buah , Textbook 5 buah , dan Button 2 buah

PERTAMA KITA MEMBUAT DESAIGN DI FROM INPUT DATA WARGA1



KEDUA UDAH SELESAI DESAIGN FROM INPUT DATA WARGA1 KITA MULAI MENCODING SESUAI APA YANG KITA INGINKAN



SETELAH SELESAI CODINGAN KITA RUUN TERKONEKSI VB NET DENGAN MICROSOFT WORD 


HASILNYA CUKUP BAGUS DAN TERBACA OLEH MICROSOFT WORD 

ADAPUN CODINGAN NYA DATA BASE INPUT DATA WARGA1 SEBAGAI BERIKUT...?


Imports word = Microsoft.Office.Interop.Word


Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim aplikasi As New word.Application
        Dim dokumen As word.Document

        dokumen = aplikasi.Documents.Open("C:\Users\RIZKI PRATAMA\Documents\INPUT DATA WARGA1.docx")

        dokumen.Bookmarks("NIK").Select()
        aplikasi.Selection.TypeText(Textnik.Text)

        dokumen.Bookmarks("NAMA").Select()
        aplikasi.Selection.TypeText(Textnama.Text)

        dokumen.Bookmarks("ALAMAT").Select()
        aplikasi.Selection.TypeText(Textalamat.Text)

        dokumen.Bookmarks("STATUS").Select()
        aplikasi.Selection.TypeText(Textstatus.Text)

        dokumen.Bookmarks("PEKERJAAN").Select()
        aplikasi.Selection.TypeText(Textpekerjaan.Text)

        dokumen.SaveAs("C:\Users\RIZKI PRATAMA\Documents\LAPORAN\INPUT DATA WARGA1.docx")
        aplikasi.Visible = True


        End


    End Sub
End Class

SELAMAT BELAJAR CODINGAN DAN SELAMAT MENCOBA PROGRAMMER IT CYBER VB. NET SEMANGAT.....






Rabu, 31 Oktober 2018

aplikasi cek data input warga











 Ø  Langkah Kedua kita susun codingannya data ole db form 1 input data warga




 Ø  Ketiga , benar teliti melihat codingannya agar tidak terjadi suatu error pada data base nya tersebut




 Ø  Keempat codingan harus terlihat dari segi desain yang telah di tentukan agar bisa terkoneksi dengan data basenya





 Ø  Akhirnya data base pun selesai kita klik ruun hasilnya input data pun terbaca dengan baik dan bener