RB Jaringan

Jumat, 17 Oktober 2014
Posted by Unknown
server adalah



Server adalah suatu sistem komputer yang menyediakan jenis layanan tertentu untuk client dalam suatu jaringan komputer.  Server dilengkapi dengan sistem operasi khusus untuk mengontrol akses dan sumber daya yang ada di dalamnya biasanya sistem operasi khusus tersebut disebut sistem operasi jaringan atau network operating system. Selain itu Server didukung dengan dan RAM yang besar dan prosesor yang bersifat scalable.
Server didukung dengan prosesor yang bersifat scalable dan RAM yang besar, juga dilengkapi dengan sistem operasi khusus, yang disebut sebagai sistem operasi jaringan. Server juga menjalankan perangkat lunak administratif yang mengontrol akses terhadap jaringan dan sumber daya yang terdapat di dalamnya, seperti halnya berkas atau pencetak, dan memberikan akses kepada stasiun kerja anggota jaringan.
Itulah Pengertian Server semoga mudah dimengerti.
 DNS
Pengertian DNS Domain Name System adalah sebuah layanan internet yang menerjemahkan nama domain menjadi alamat Internet Protocol (IP). DNS secara otomatis mengkonversi nama ketika ada mengeketik alamat di adress bar web browesr ke alamat IP dari server Web hosting situs tersebut. Contohnya ketika anda mengetik www.pacarita.com maka secara otomatis DNS akan mengganti domain www.pacarita.com ke ip 192.211.48.254. inilah fungsi dari Domain Name System atau DNS. 
DNS menerapkan database terdistribusi untuk menyimpan nama dan informasi alamat untuk semua host publik di internet. Database DNS berada pada database server khusus. Ketika sebuah clien seperti browser Web melakukan permintaan dan ternyata bermasalah yang melibatkan nama host Internet, maka sebuah software yang disebut DNS resolver (biasanya dibangun ke dalam sistem operasi jaringan) akan mengkontak server DNS untuk menentukan alamat IP server.
Jika server DNS tidak berisi pemetaan yang dibutuhkan, maka pada gilirannya akan meneruskan permintaan ke server DNS yang berbeda pada tingkat yang lebih tinggi dalam hirarki. Setelah beberapa berpotensi untuk forward dan pesan delegasi dikirim dalam hirarki DNS, alamat IP untuk host yang diberikan akhirnya tiba di resolver, yang pada gilirannya melengkapi permintaan over Internet Protocol.
Setiap kali Anda mengunjungi sebuah website, Anda berinteraksi dengan didistribusikan database terbesar di dunia ada beberapa contoh dns yang paling umu sering digunakan seperti DNS google atau Open DNS silahkan baca pada artikel Antara OpenDNS dan Google DNS. database besar secara kolektif dikenal sebagai DNS, atau Domain Name System. Sebuah server DNS tidak bekerja dengan mudah dan instan. Pelajari lebih lanjut tentang apa itu DNS, bagaimana cara kerjanya.
Alamat IP dan Nama Domain
untuk memahami pengertian DNS adalah dengan mengetahi bagaimana cara kerja DNS, Anda harus memiliki pemahaman dasar tentang alamat IP dan nama domain. Sebuah alamat IP, atau alamat Internet Protocol, adalah rangkaian angka yang bertindak sebagai pengidentifikasi biner untuk perangkat di Internet. Singkatnya, alamat IP adalah alamat sebuah komputer, server dan perangkat lain digunakan untuk mengidentifikasi satu sama lain secara online. Sebagian besar alamat IP disusun menjadi empat set angka – yaitu, 12.34.56.78.
domain adalah informasi yang Anda masukkan ke web browser untuk menuju situs web tertentu. Ketika Anda memasukkan URL seperti www.pacarita.com/index ke web browser, nama domain adalah pacarita.com. Pada dasarnya, nama domain adalah sebuah sistem yang memudahkan manusia mengingat alamat IP.
Menerjemahkan Nama Domain ke Alamat IP
Walaupun sebenarnya ketika memasukkan alamat IP address ke sebuah web browser seperti 192.211.48.254 tetap akan mengarahkan anda ke website www.pacarita.com tetapi akan jauh lebih mudah mengetik sebuah domain dari pada sebuah ip address.disinilah fungsi utama dari DNS,yaitu untuk mengambil nama domain dan menerjemahkannya ke alamat IP yang memungkinkan mesin untuk berkomunikasi dengan satu sama lain. Setiap nama domain memiliki setidaknya satu alamat IP address.

EMAIL


Pengertian E-mail adalah sarana kirim dan mengirim surat melalui jalur Internet atau bisa juga diartikan surat dengan format digital (ditulis dengan menggunakan komputer atau gedget yang telah mendukung aplikasi email) dan dikirimkan melalui jaringan Internet. Layanan e-mail dapat dikelompokkan dalam 2 basis, yaitu email berbasis client dan email berbasis web. Untuk para pengguna email berbasis client, aktifitas email dilakukan dengan menggunakan perangkat lunak email client, contohnya Eudora atau Outlook Express. Perangkat lunak ini menyediakan fungsi-fungsi penyuntingan dan pembacaan email secara offline (tidak tersambung ke internet). Koneksi hanya diperlukan untuk melakukan pengiriman (send) atau menerima (recieve) email dari mailbox.

Cara Kerja Email :
  • Pengguna menulis email dan kemudian menginstruksikan aplikasi email untuk mengirimkannya pada alamat penerima. 
  • Aplikasi email mengirim email pada komputer mirip seperti seperti kantor pos dan melayani proses penerimaan dan pengiriman email. Komputer demikian disebut email server. 
  • Email server mengidentifikasikan alamat tujuan dan mengirimkannya ke email server yang lain yang lebih dekat ke alamat tujuan. Ada kalanya, sebuah email dikirimkan melalui beberapa email server, tergantung pada rute yang dilaluinya.
  • Setelah email sampai pada alamat penerima kemudia disimpan di email server hingga membuka kotak posnya. 
  • Saat penerima membuka kotak posnya, aplikasi email penerima akan meminta email baru yang terdapat di email server dan mengunduhnya ke dalam komputer pengguna. 
  • Penerima dapat segera membaca email baru yang telah di unduh.

Jenis-jenis Email antara lain :

1. POP mail (Post Office Protocol)
Pengertian POP mail adalah email yang diterima melalui Internet Service Provider yang menjadi langganan kita (bagi Anda yang connect internet dari rumah atau kantor).

2. Webmail.
Pengertian Web Mail (Web based e-mail) adalah layanan email yang basis aksesnya adalah dalam bentuk halaman web. Jika ingin mengakses, memeriksa atau mengirim email, maka harus masuk ke situs web penyedia layanan email dimaksud. Tidak ada jalan lain untuk mengakses email kecuali dengan cara tersebut

3. Email forwarding.
Pengertian Email forwarding adalah layanan e-mail yang meneruskan e-mail yang di terimanya ke alamat e-mail yang lain. E-mail jenis ini bermanfaat bagi orang yang suka ganti-ganti alamat e-mail.
FTP 


FTP (singkatan dari File Transfer Protocol) adalah sebuah protokol Internet yang berjalan di dalam lapisan aplikasi yang merupakan standar untuk pentransferan berkas (file) komputer antar mesin-mesin dalam sebuah internetwork.

FTP merupakan salah satu protokol Internet yang paling awal dikembangkan, dan masih digunakan hingga saat ini untuk melakukan pengunduhan (download) dan penggugahan (upload) berkas-berkas komputer antara klien FTP dan server FTP.

Fungsi FTP

FTP merupakan salah satu protokol Internet yang paling awal dikembangkan dan masih digunakan hingga saat ini. Fungsi FTP adalah untuk melakukan pengunduhan (download) dan penggugahan (upload) berkas-berkas komputer antara klien FTP dan server FTP.

Cara Kerja FTP
Sebuah Klien FTP merupakan aplikasi yang dapat mengeluarkan perintah-perintah FTP ke sebuah server FTP. Sementara server FTP adalah sebuah Windows Service atau daemon yang berjalan di atas sebuah komputer yang merespons perintah-perintah dari sebuah klien FTP. Perintah-perintah FTP dapat digunakan untuk mengubah direktori, mengubah modus pengiriman antara biner dan ASCII, menggugah berkas komputer ke server FTP, serta mengunduh berkas dari server FTP.

Sebuah server FTP diakses menggunakan Universal Resource Identifier (URI) dengan menggunakan format ftp://namaserver. Klien FTP dapat menghubungi server FTP dengan membuka URI tersebut.

VOICE

Pengertian Voice Mail
Adalah media transmisi (pergerakan informasi melalui sebuah media telekomunikasi) data yang menggunakan kabel telephone sebagai alat transmisinya. Alat ini mengirimkan informasi berbentuk suara. Contoh, mailbox dalam telephone rumah. Apabila saat ditelphone tidak menjawab hingga beberapa saat. Maka mesin telephone akan memberikan pilihan kepada si penelephone agar meninggalkan pesan, atau menelephone lagi lain kali. Namun untuk telephone rumah di Indonesia, agar dapat memiliki fasilitas ini, kita harus mendaftar kepada PT.Telkom atau operator Indonesia lainnya terlebih dahulu.
Voice-mail (juga dikenal sebagai pesan suara atau bank suara) adalah sistem berbasis komputer yang memungkinkan pengguna dan pelanggan untuk bertukar pesan suara pribadi, untuk memilih dan memberikan informasi suara, dan untuk memproses transaksi yang berhubungan dengan individu, organisasi, produk dan jasa, menggunakan telepon biasa. Istilah ini juga digunakan secara lebih luas untuk menunjukkan setiap sistem menyampaikan pesan suara telekomunikasi disimpan, termasuk menggunakan mesin penjawab . Kebanyakan ponsel menawarkan layanan voice-mail sebagai fitur dasar, dan banyak garis tanah telepon dan perusahaan PBXs termasuk voice-mail.
Sejarah Voice Mail
Pertama kali voicemail diperkenalkan pada public menggambarkan rekaman suara dilaporkan di surat kabar New York dan Scientific American pada bulan November, 1877. Thomas A. Edison mengumumkan penemuan “gramofon” nya mengatakan “benda itu yang berfungsi untuk merekam pesan telephone dan mengirimkan mereka kembali oleh telepon. ” Edison mengajukan permohonan paten ( memberikan persetujuannya kepada pihak lain untuk melaksanakannya) di AS pada Desember 1877 dan tidak lama kemudian menunjukkan mesin untuk penerbit, kongres AS dan Presiden Hayes, merekam dan memainkan “Mary punya domba kecil …” dan “ada seorang gadis kecil yang memiliki sedikit ikal “dan lainnya Ditties populer pada saat itu. Dalam sebuah artikel yang menguraikan ide-idenya sendiri tentang kegunaan masa depan daftar mesinnya Edison dimulai dengan “menulis Surat, dan segala macam dikte tanpa bantuan stenografer.”Dengan kata lain, “pesan suara” atau “suara-mail”. Pada 1914, bisnis fonograf Edison termasuk mesin mendikte (yang Ediphone) dan “Telescribe”, mesin menggabungkan fonograf (alat untuk menghasilkan bunyi lewat getaran sebuah jarum mengikuti galur spiral pd permukaan piringan (hitam) atau silinder yg berputar; gramofon) dan telepon, yang mencatat kedua sisi percakapan telepon.
Selama hampir seratus tahun, ada beberapa inovasi atau kemajuan dalam layanan telepon. Voice-mail adalah hasil dari inovasi dalam produk dan layanan telepon dimungkinkan oleh perkembangan teknologi komputer selama 1970-an. Inovasi ini dimulai dengan Pageboy Motorola , sederhana “pager” atau “pager” diperkenalkan pada tahun 1974 yang umumnya ditawarkan bersamaan dengan layanan penjawab yang menangani sibuk / tidak dijawab overload dan setelah jam panggilan untuk perusahaan dan profesional. Operator menuliskan pesan pemanggil, mengirim peringatan halaman atau “bip” dan ketika segolongan orang dipanggil kembali, operator didikte pesan.
Dengan diperkenalkannya pager “suara”, seperti Pageboy Motorola II operator dapat mengirimkan pesan suara langsung ke pager dan pengguna bisa mendengar pesan tersebut. Namun, pesan kedatangan sering tidak tepat waktu dan privasi masalah serta tingginya biaya akhirnya menyebabkan kematian pada layanan ini. Pada pertengahan 1970-an penyimpanan digital dan konversi analog ke digital telah muncul devisa dan perusahaan Paging mulai menangani klien pesan elektronik. Operator mencatat pesan singkat (5-6 detik, misalnya “hubungi Mr Smith segera”) dan pesan yang dikirim secara otomatis ketika klien disebut layanan penjawab. Itu hanya akan mengambil langkah pendek untuk aplikasi voice-mail pertama yang lahir.
Komputer produsen, produsen peralatan telepon dan perusahaan perangkat lunak mulai mengembangkan solusi yang lebih canggih seperti prosesor komputer yang lebih kuat dan lebih murah dan perangkat penyimpanan menjadi tersedia. Ini mengatur penciptaan pada spektrum yang luas dari Kantor Pusat komputer berbasis tetap. Pelanggan Premise yang akhirnya akan mendukung solusi suara yang disempurnakan seperti suara-mail, audiotext, respon suara interaktif (IVR) dan speech recognition solusi yang mulai muncul di 1980-an. Namun, pengambilan yang luas dari produk dan layanan akan tergantung pada perkembangan dunia telepon nada sentuh dan layanan ponsel yang tidak akan terjadi sampai akhir 1980-an.

I'M
Definisi atau Pengertian IM (Instant Messaging) - Instant Messaging. bentuk komunikasi pesan singkat antara dua orang atau lebih menggunakan teks yang diketik. teks dikirim melalui komputer yang terhubung melalui sebuah jaringan, LAN atau Internet.

Teknologi IM diciptakan untuk menutupi kelemahan e-mail yang dinilai kurang efisien dan tidak realtime. sebagian besar software IM terdiri dari dua komponen : Software server dan client. sebagai program IM dapat dioperasikan melalui web browser, namun kebanyakan membutuhkan instalasi software client di PC.

Tugas Simulasi Digital

Kamis, 15 Mei 2014
Posted by Unknown
Assalamu'alaikum wr wb

Baiklah disini saya sebagai siswa SMK Negeri 5 Bandung akan memposting sebuah file
 dengan biodata sebagai berikut :

Nama    : Salsadela Nuraeni

Kelas :  X TKJ 3
 Silahkan bisa di li lihat disini filenya Tugas








Membuat Aplikasi Absensi Menggunakan Visual Basic

Rabu, 05 Februari 2014
Posted by Unknown



Welcome back to my Lesson Description: :)…., sebelum kita memulai tutorial  ini , ada baiknya saya ucapkan terimakasih atas kunjungan setia Blog ini, Mungkin ada yang bertanya kenapa Blognya enggak pernah update ?,  ya maklumlah bro,,, lagi banyak tugas nih jadi telat dech , Tapi engak apa-apa semakin lama tentunya semakin banyak ide , nah kali ini saya mau coba berbagai ide tersebut.
Siapa yang enggak tahu  sih tentang absensi ?, sekolah  bahkan perusahan tak terlepas dari yang anamanya absensi ini ,  kalau biasanya absensi hanya menggunakan secarik kertas tapi kali ini kita coba aplikasikan dengan program komputer , ya …biar lebih keren lah,,,,he….he… Description: :).
Sebenernya Aplikasi ini bisa dibuat menggunakan banyak program
misalnya Accses, Foxfro, Mysql, SQl ,VB, C++, bahkan MS.Excel.,.
Kalau pake Acses bukan kurang bagus  Cuma sedikit kurang apdol sebab program ini enggak bisa standlone (berdiri sendiri) so kalau komputer kita enggak punya program accses maka program aplikasi enggak bisa jalan , makanya saya mau coba buat pake program Vb, kali ini sya menggukan Vb 6.0.
Letsgo kita mulai…
Dalam palikasi ini kita membutuhkan beberapa Form (tampilan ).
1.      Form Input Data Yang akan diabsesn
2.      Form Absesni
3.      Dan hasil Absensi
Dalam Form input kita membutuhkan beberapa data masukan seperti : No., Nama, Bagian/kelas, tanggal/jam, jenis kelamin .
Data masukan tersebut hanya seabagai contoh , tentunya Anda bisa juga menambahkan yang lainnya sesuai dengan kebutuhan anda . nih dia gambar form input data .
Description: gbr12
Sederhana bukan…..?.
Pada bagian form ini ada bebrapa tool untuk mengolah data ada Datasiswa , Save  data, Delete (hapus) data, .
Cara form ini adalah  ketika kita memasukan data kemudian di klik Save maka data akan tersimpan ke Dalam data Base untuk menyimpan data , untuk menghubugkan ke DataBase kita gunakan jembatan Yaitu tool DataGrid (data siswa).
Jadi yang perlu anda lakukan adalah membuat database sebagai tempat menyimpan data tersebut , caranya cukup mudah .
Pada menu bar Visual  basik Pilih menu AddIns-Visula data Manager, sampai muncul jendela berikut:
Description: gbr2
Dan lakukan seperti pada gambar , coba buat data base dengan Acsess versi 7.0 kemudian simpan dalam folder yang sama dengan project Aplikasi yang kita buat.
Misal  E://Rahmat/AplikasiAbsesi. Langkah selanjutnya kita masukan beberapa fields dalam database tersebut.
Description: gbr3
Disinilah kita akan memasukan data fieldsnya , gamar diatas hnaya contoh aja, pada database ini  .tentunya untuk membuat Rcordnya tidaklah terlalu susah, anda cukup Klik Add Fields, sampai muncul Jendela baru,
Description: gbr4
Masukan nama record yang akan kita gunakan tentukan type , sesuai dengan data yang akan kita masukan sialahkan pilih pada bagian type.jika data yang kita masukan sudah pas sesuai dengan kebutuhan , kemudian klik Add index (Field Kunci/primary key) diharapakan sama dengan nama fields yang anda buat. Kalau hal ini sudah lakukan anda tinggal Klik Build The Table (jika data untuk absensi sekolah baiknya gunakan kelas sebagai primary key dan unique jangan dicheklist biar bisa di duplicate dan field no boleh dihilangkan), menunjukan bahawa tabel ini yakin akan kita buat .
Untuk melihat berhasil atau tidaknya data base yang kita buat , tutp Program vb Kita kemudian kita coba buaka database yang baru aja kita buat caranya sama seperti waktu kita membuat database AddIns-Visula data Manager-muncul jendela-klik Open database – Cari database yang baru aja kita buat
Description: gbr5
Nah itulah hasilnya , kebetulan saya sudah mengisi data-nya , anda cukup klik kanan pada salah satu table  kemudian klik Open .
Ok sekarang kita kembali Ke Form Input data.,seperti yang telah di jelaskan pada bagian ini kita akan memasukan data kedalam database yang terdiri dari No, Nip/nis/Nim, Nama, Jenis kelamin, Tanggal , Kelas/bagian saja .Sementara Alpa, izin, sakit,masuk dan total kita masukan pada form interface Input absensi yang nanti akan kita buat. Dengan menggunakan data base yang telah kita buat . Sebelumnya kita keluarkan dulu tool-tool yang kita butuhkan dalam membuat aplikasi ini ,pada toolbox -klik kanan -lalu pada tab Control pilih komponen berikut ini:
1. Microsoft Data Grid Control 6.0
2. Microsoft FlexGrid Control 6.0
Cukup memberi tanda checklist kemudian klik Apply sampai muncul pada  Toolbox  component seperti gambar berikut ini:
Description: gbr6
Pada bagian sebelah kiri ada beberapa Icon , dan icon-icon itulah yang akan kita gunakan dalam membuat aplikasi ini.
Selanjutnya kita desain Form terlebih dahulu cara nya gampang untk membuat Form baru anda cukup mengklik Menu Project -Add From -Open sampai muncul form seperti gambar berikut ini:
Description: gbr7
Pada form ini terlihat nama form dengan nama Form 3 , tentunya kita bisa menggantinya sesuai kehendak kita misal Aplikasi Absensi , caranya Pada Menu View -klik Properties Windows hingga muncul gambar:
Description: gbr8
Pada bagian alphabetic -caption , kita bisa mengganti Form3 menjadi nama yang lain sedangkan pada bagian (name ) boleh diganti /tidak , karena akan berpengaruh pada saat memasukan script sebaiknya kita biarkan aja , kecuali program yang akan kita sangat Kompleks kita bisa menggantinya untuk membedakan form-from tersebut.
Go nex t (bukan goblok nakat ya!… but is terus…..,…….he….he…J, sekarang kita Buat fields interface menggunakan Label dan text, label sebagai penanda, dan text sebagai tempat menuliskan data input caranya cukup mudah , kita cukup mengklik icon label dengan tanda huruf A:
Description: gbr9
Kemudain klik diarea form tahan untuk menentukan ukurannya , kemudian beri nama baru pada bagian caption dengan nama yang lain :
Kemudian untuk text sama seperti pembutan label klik icon textbox-kemudian drag diarea form3, selanjutnya pada bagian name anda boleh mengganti /biarkan saja , kira hasilnya seperti berikut:
Description: gbr10
Ulangi langkah diatas sesuai dengan banyaknya fields yang kita buat, jika sudah selanjutnya kita akan membuat jembatan DataBase , yaitu menggunkan DataGrid caranya sama saja seperti membuat label dan text hanya saja kita perlu sedikit memodifikasinya di bagian Properties Windows ,letsgo bro….!
Description: gbr111
Perhatikan gambar diatas!, disitu ada Data1  dan inilah yang akan kita gunakan sebagai jembatan Koneksi Ke database kita, Pada bagian Properties windows di bagian DatabaseName , masukan nama Database yang sebelumnya kita buat, diamana akan diminta memasukan Path lokasi tempat kita menyimpan Data tersebut, selanjutya pada bagian Recordsource di properties windows , anda pilih nama tabel yang ada dalam database yang pernah kita buat, misalnya saya memiliki tabel2 dengan nama DataBase tabel1 , kemudian pada Reecordset Type ganti 1-Dynashet menjadi 0-table .
Selanjutnya kita buat command Button sebagai intruksi Perintah terhadap suatu data , kita buat saja sebanyak Dua buah commad , caranya sama sewaktu kita membuat label ,text, dan DataGrid, pada bagian Caption di Proerties windows ganti namanya, umtuk Command 1=Save New Data dan Command2 =Delete/Hapus.,
Selanjutnya klik Icon jam kemudian letakan di From3 pada properties windows di bagian Interval masukan angka 10
secara keseluruhan Form input data akan kira -kira  seperti ini :
Description: gbr121
Giamana bisa kan?, oh ya untuk warna silahkan aja klik-klik di bagian Properties windows mungkin lain kali saya jealaskan …..he….he….
Selanjutnya kita masukan script yang akan menjalankan instruksi untuk menyimpan Fields-fields kedalam database sewaktu kit mengklik Save New Data,
Adapun caranya , pada bagian Save New Data -klik Kanan-View Code atau Double Klik pada Command1= Save New Data
Description: gbr13
Selanjutnya masukan Script berikut ini diantara Private Sub Command1_Click() Dan End Sub, Perlu di perhatikan command1 bisa beruBah jika anda mengubahnya dengan nama lain pada bagian Properties Windows di bagian Name , misalnya Save maka ktika di lihat di double Klik maka yang tampil bukan Command1 melainkan Save.
Oke ini dia scrip yang harus anda masukan pada bagian ini:
————————————————————————————————————
If Text2.Text = “” And Text7.Text = “” Then
x = MsgBox(“Mohon Isi Data Dengan benar!”, vbOKOnly + vbCritical, “Warning!”)
If x = vbOK Then
End If
Else
x = MsgBox(“Anda yakin Ingin Menyimpan Data ini?”, vbYesNo + vbInformation, “Information”)
If x = vbYes Then
Data1.Recordset.AddNew
Data1.Recordset!no = Text1.Text
Data1.Recordset!nip = Text2.Text
Data1.Recordset!nama = Text3.Text
Data1.Recordset!jk = Text7.Text
Data1.Recordset!tgl = Text4.Text
Data1.Recordset!bagian = Text8.Text
Data1.Recordset!masuk = “”
Data1.Recordset!sakit = “”
Data1.Recordset!izin = “”
Data1.Recordset!alpa = “”
Data1.Recordset!total = “”
Data1.Recordset.Update
Data1.Recordset.MoveLast
Else
bersih
End If
End If
Bersih
—————————————————————–
mungkin sedikit ada pertanyaan koq banyak banget ya scriptnya ?, sebenernya script yang pokonya hanya pada bagian yang warna biru , sedangkan warna hijau hanya modifikasi saya aja .
fungsi IF ini memerintahkan agar si user tidak sembarang mengklik , ketika si user mengklik save New data dalam keadaan Tidak mengisi fields-fieldsnya maka akan keluar Informasi “Mohon Isi data dengan Benar”. Tapi jika Nip dan jenis kelamin di isi maka Data akan disimpan di data Base.
Selanjutnya ada :
Data1.Recordset!no = Text1.Text
Data1.Recordset!nip = Text2.Text
Data1.Recordset!nama = Text3.Text
Data1.Recordset!jk = Text7.Text
Data1.Recordset!tgl = Text4.Text
Data1.Recordset!bagian = Text8.Text
Sementara records alpa dan seterusnya saya biarkan kosong ?, pada Tabel1 dalam data base yang kita buat fileds yang kita buat tidak hanya , no,nip,nama, jenis kelamin, tgl dan bagian  tapi alpa, izin, sakit, masuk, sementara pada form input hanya menampilkan no,nip,nama, jenis kelamin, tgl, jika hanya ini saja yang akan kita masukan ke database maka akan terjadi error karena tidak dikenal tabel dengan records seperti itu, makanya tetap saya isi tapi isi data tetap dalam keadan kosong, gitu dech cerintanya…
Lanjut , sakarang Double Klik Command2=delete/hapus kemudian masukan script ini:
Private Sub Command2_Click()
If Text10.Text = “” Then
info
Else
info2
End If
End Sub
Untuk script delete sedikit ya?, he….he…J, sebenernya lumayan juga cuama saya simpan dalam bentuk variable (procedure),  tapi boleh kok di buat langsung !, .scrip info kayak gini:
Private Sub info()
x = MsgBox(“Tidak Ada Object Untuk di Hapus”, vbOKOnly + vbCritical, “Warning!”)
If x = vbOK Then
End If
End Sub
———————————————————–
Untuk info2 :
————————————————————————————————————
Private Sub info2()
x = MsgBox(“Anda Yakin Untuk Menghapus data Ini?”, vbYesNo + vbInformation, “Informasi”)
If x = vbYes Then
If Data1.Recordset(“nip”) = Text10.Text Then
Data1.Recordset.Delete
Data1.UpdateRecord
Else
Data1.Recordset.Cancel
End If
Else
Text10.SetFocus
End If
End Sub
Kemudian hal yang terpenting adalah Menampilkan Tanggal atau jam ketika Form Ini sedang Di Runing,(dijalankan), tanggal sifatnya Update sesuai dengan jam di system komputer sekarang Doubleklik Icon Jam Yang ada di Form3 kemudian masukan script berikut:
————————————————————————————————————
Private Sub Timer1_Timer()
Text4.Text = Format(Date, “dd/mm/yyyy”)
End Sub
—————————————————————–
Mungkin sampai disini udah pada ngerti kan?, untuk melangkah ke sesi lainya yaitu membuat form input Absensi , kita coba di bagian ke II ya?,………..
Untuk lebih jelasnya kira-kira script keseluruhannya adalah Sbb:
————————————————————————————————————
Private Sub Command1_Click()
If Text2.Text = “” And Text7.Text = “” Then
x = MsgBox(“Mohon Isi Data Dengan benar!”, vbOKOnly + vbCritical, “Warning!”)
If x = vbOK Then
End If
Else
x = MsgBox(“Anda yakin Ingin Menyimpan Data ini?”, vbYesNo + vbInformation, “Information”)
If x = vbYes Then
Data1.Recordset.AddNew
Data1.Recordset!no = Text1.Text
Data1.Recordset!nip = Text2.Text
Data1.Recordset!nama = Text3.Text
Data1.Recordset!jk = Text7.Text
Data1.Recordset!tgl = Text4.Text
Data1.Recordset!bagian = Text8.Text
Data1.Recordset!masuk = “”
Data1.Recordset!sakit = “”
Data1.Recordset!izin = “”
Data1.Recordset!alpa = “”
Data1.Recordset!total = “”
Data1.Recordset.Update
Data1.Recordset.MoveLast
Else
bersih
End If
End If
bersih
End Sub
Private Sub bersih()
Text1.SetFocus
Text1.Text = “Isi Data!”
Text2.Text = “”
Text3.Text = “”
Text7.Text = “”
Text8.Text = “”
End Sub
Private Sub Command2_Click()
If Text10.Text = “” Then
info
Else
info2
End If
End Sub
Private Sub Form_Load()
Text2.Text = “”
Text3.Text = “”
Text3.Text = “”
Text4.Text = “”
Text1.Text = “silahkan Isi Data!”
Text7.Text = “”
Text8.Text = “”
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub
Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.SetFocus
End If
End Sub
Private Sub Text3_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text7.SetFocus
End If
End Sub
Private Sub Text7_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text8.SetFocus
End If
End Sub
Private Sub Text8_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Command1.SetFocus
End If
End Sub
Private Sub Timer1_Timer()
Text4.Text = Format(Date, “dd/mm/yyyy”)
End Sub
Private Sub info()
x = MsgBox(“Tidak Ada Object Untuk di Hapus”, vbOKOnly + vbCritical, “Warning!”)
If x = vbOK Then
End If
End Sub
Private Sub info2()
x = MsgBox(“Anda Yakin Untuk Menhapus data Ini?”, vbYesNo + vbInformation, “Informasi”)
If x = vbYes Then
If Data1.Recordset(“nip”) = Text10.Text Then
Data1.Recordset.Delete
Data1.UpdateRecord
Else
Data1.Recordset.Cancel
End If
Else
Text10.SetFocus
End If
End Sub
Sekarang kita jalankan Form yang telah kita buat caranya kllik aja Run – Start untuk menghentikan tinggal Klik Run -Stop kira kira hasilnya kayak gini nih:
Description: gbr14
Saya coba tanpa mengisi data apapun begitu saya klik SAVE NEW DATA, Maka muncul Peringatan . “JYuhuy……..berhasil euy,” kira -kira seperti itu loh Mas….he…..he…..(Maaf Untuk Delete Nanti Kita Bahas Lagi).
Oke dech kayaknya saya mau istirahat dulu nih , enggak apa2 kan , tenang aja entar kita bahas lagi oke tentunya dibagian kedua .
Selamat mencoba Ya !!!………..



Pages

Diberdayakan oleh Blogger.

About