TUTORIAL REMOTE DESKTOP DI UBUNTU VIA LAN
Remote desktop adalah sebuah fitur yang memungkinkan komputer A untuk mengontrol atau meremote komputer B, seolah-olah user pada komputer A sedang memainkan komputer B.
Manfaat yang didapatkan dari remote
desktop ini adalah user sangat mudah mengontrol komputer-komputer client
tanpa harus mempunyai banyak monitor, cukup dengan remote desktop semua
komputer client bisa dipantau.
Protokol untuk remote desktop ini sangat banyak diantaranya adalah: Remote Desktop Protocol (RDP), Secure File Transfer Protocol (SFTP), Secure Shell (SSH) , dan Virtual Network Computing (VNC). Menurut saya sendiri jenis remote desktop yang paling mudah dimengerti adalah remote desktop menggunakan VNC (Virtual Network Computing).
Hal-hal yang dibutuhkan:
1. Komputer minimal 2 buah.
2. Kabel LAN jenis straight.
Tutorial Remote Desktop Di Ubuntu Via LAN:
1. Siapkan 2 buah komputer dengan sistem operasi ubuntu (saya menggunakan ubuntu 10.10).
2. Pasangkan kabel Lan pada 2 buah komputer yang akan di remote.
2. Setting IP Address, di masing-masing
komputer (misal: IP Address server 100.10.1.1 & IP Address client
100.10.1.3), lakukan ping untuk memastikan kabel lan sudah terhubung.
3. Masuk ke: System > Preferences >
Remote Desktop. lakukan setting seperti pada gambar dibawah (ingat!
lakukan dikomputer client).
4. Silakan install aplikasi Remmina Remote Desktop Client bisa melalui terminal dengan mengetik: apt-get install remmina. Bisa juga install melalui Ubuntu Software Center. (ingat! lakukan di komputer server)
5. Buka aplikasi Remmina, terus klik edit > new, lakukan setting seperti gambar dibawah. (ingat! lakukan di komputer server).
Ket:- Kolom Name (adit to heri) adit servernya (100.10.1.1) dan heri clientnya (100.10.1.3).
- Kolom Group kosongkan saja.
- List protocol pilih VNC – Virtual Network Computing.
- Pilih menu Basic kemudian isi kolom Server dengan IP Address Client yaitu 100.10.1.3.
- Kolom Proxy Destination kosongkan saja.
- Kolom Username isi dengan user account ubuntu server (adit).
- Kolom Password kosongkan saja.
- Kolom Color Depth dan kolom Quality biarkan seperti gambar diatas, supaya proses remote desktop tidak memakan resource komputer yang besar, sehingga kinerja komputer jadi sangat lambat.
- Klik Save dan silakan Connect.
- Selesai
10 INTERNET BROWSER TERBAIK 2012
nternet browser merupakan sebuah aplikasi untuk membantu user dalam menjelajahi dunia maya, tiap tahun Internet/web browser yang biasa kita gunakan ini selalu memperbaiki kelemahannya, mulai dari security, fitur menarik, kecepatan browsing dan lain sebagainya.
Menurut review/pengujian yang dilakukan oleh toptenreviews.com pada
tahun 2012, bahwa tahun ini terjadi perubahan peringkat dari yang
sebelumnya peringkat satu diduduki oleh browser Firefox keluaran
Mozilla, namun tahun ini peringkat pertama diambil alih oleh browser
chrome keluaran google.
Menurut saya
sendiri, Chrome memang sudah pantas menduduki posisi pertama, mengingat
dari segi kecepatan chrome terasa lebih cepat dari browser lain dan
tidak hanya itu chrome juga tidak memberatkan CPU, ketika melakukan kegiatan browsing. Langsung saja lihat reviewnya dibawah.
10 Internet Browser Terbaik Tahun 2012:
1. Google Chrome
Spesifikasi & Reviews:
Rating:
- Feature Set: 5 Star (Excellent)
- Security: 5 Star (Excellent)
- Speed & Compatibility: 5 Star (Excellent)
- Easy of Use: 5 Star (Excellent)
- Help & Support: 5 Star (Excellent)
Speed:
- Initial Startup Time: 4 detik
- Average Startup Time: 4,3 detik
- Navigation Time: 4,4 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Zoom , Add-ons, Spell check, Open source development, Seamless download manager, Thumbnail preview, Synchronize.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Anti-Phising.
- Clear data.
- Private mode.
Operating System:
- Windows 7, Windows Vista, Windows XP, Mac OS.
2. Mozilla Firefox
Rating:
- Feature Set: 4,5 Star (Excellent)
- Security: 5 Star (Excellent)
- Speed & Compatibility: 5 Star (Excellent)
- Easy of Use: 4,5 Star (Excellent)
- Help & Support: 5 Star (Excellent)
- Initial Startup Time: 6,3 detik
- Average Startup Time: 6,3 detik
- Navigation Time: 5,7 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Zoom , Add-ons, Spell check, Open source development, Seamless download manager, Synchronize, Parental controls.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Anti-Phising.
- Clear data.
- Private mode.
Operating System:
- Windows 7, Windows Vista, Windows XP, Mac OS.
3. Internet Explorer
Rating:
- Feature Set: 5 Star (Excellent)
- Security: 4,5 Star (Excellent)
- Speed & Compatibility: 4,5 Star (Excellent)
- Easy of Use: 4,5 Star (Excellent)
- Help & Support: 5 Star (Excellent)
- Initial Startup Time: 4,3 detik
- Average Startup Time: 4 detik
- Navigation Time: 4,5 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Zoom , Add-ons, Thumbnail preview, Synchronize, Parental controls.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Anti-Phising.
- Clear data.
- Private mode.
Operating System:
- Windows 7, Windows Vista, Windows XP.
4. Opera
Spesifikasi & Reviews:
Rating:
- Feature Set: 5 Star (Excellent)
- Security: 4,5 Star (Excellent)
- Speed & Compatibility: 4,5 Star (Excellent)
- Easy of Use: 4,5 Star (Excellent)
- Help & Support: 5 Star (Excellent)
- Initial Startup Time: 5,1 detik
- Average Startup Time: 4,4 detik
- Navigation Time: 4,5 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Zoom , Add-ons, Spell check, Seamless download manager, Thumbnail preview, Synchronize, Mouse gestures, Voice interaction.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Anti-Phising.
- Clear data.
Operating System:
- Windows 7, Windows Vista, Windows XP, Mac OS.
5. Safari Apple
Rating:
- Feature Set: 4 Star (Very good)
- Security: 4,5 Star (Excellent)
- Speed & Compatibility: 4,5 Star (Excellent)
- Easy of Use: 5 Star (Excellent)
- Help & Support: 4,5 Star (Excellent)
- Initial Startup Time: 4,2 detik
- Average Startup Time: 3,7 detik
- Navigation Time: 3,8 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Add-ons, Spell check.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Clear data.
- Private mode.
Operating System:
- Windows 7, Windows Vista, Windows XP, Mac OS.
6. Maxthon
Rating:
- Feature Set: 4 Star (Very good)
- Security: 4 Star (Excellent)
- Speed & Compatibility: 4 Star (Excellent)
- Easy of Use: 4,5 Star (Excellent)
- Help & Support: 5 Star (Excellent)
- Initial Startup Time: 8 detik
- Average Startup Time: 5,9 detik
- Navigation Time: 3,2 detik
Feature:
- Tabbed browsing, Integrated search engine, Save tabs, Customization options, Bookmarks, Rss feeds, Password manager, Find-On page function, Zoom, Add-ons, Synchronize, Mouse gestures.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Clear data.
Operating System:
- Windows 7, Windows Vista, Windows XP.
7. RockMelt
Rating:
- Feature Set: 4 Star (Very good)
- Security: 4 Star (Very good)
- Speed & Compatibility: 4 Star (Very good)
- Easy of Use: 4 Star (Very good)
- Help & Support: 4 Star (Very good)
- Initial Startup Time: 9,5 detik
- Average Startup Time: 4,3 detik
- Navigation Time: 11,1 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Password manager, Find-On page function, Zoom, Add-ons, Seamless download manager.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus.
- Anti-Phising.
- Clear data.
Operating System:
- Windows 7, Windows Vista, Windows XP.
8. SeaMonkey
Rating:
- Feature Set: 3,5 Star (Very good)
- Security: 4 Star (Very good)
- Speed & Compatibility: 4 Star (Very good)
- Easy of Use: 4 Star (Very good)
- Help & Support: 3 Star (Good)
- Initial Startup Time: 5,7 detik
- Average Startup Time: 4,5 detik
- Navigation Time: 3,8 detik
Feature:
- Tabbed browsing, Integrated search engine, Autofill, Save tabs, Customization options, Bookmarks, Rss feeds, Automatic update, Find-On page function, Zoom, Add-ons, Speel check, Open-source development.
Security:
- Pop-up blocker.
- Anti-spyware.
- Anti-virus
- Anti-Phising.
- Clear data.
Operating System:
- Windows 7, Windows Vista, Windows XP, Mac OS.
9. Deepnet Explorer
Rating:
- Feature Set: 4 Star (Very good)
- Security: 2,5 Star (Good)
- Speed & Compatibility: 4,5 Star (Excellent)
- Easy of Use: 4 Star (Very good)
- Help & Support: 4 Star (Very good)
- Initial Startup Time: 4,1 detik
- Average Startup Time: 3,5 detik
- Navigation Time: 6,3 detik
Feature:
- Tabbed browsing, Integrated search engine, Save tabs, Customization options, Bookmarks, Rss feeds, Find-On page function, Zoom, Add-ons, Mouse gestures.
Security:
- Pop-up blocker.
- Anti-Phising.
- Clear data.
Operating System:
- Windows 7, Windows Vista, Windows XP.
10. Avant Browser
Rating:
- Feature Set: 4 Star (Very good)
- Security: 2,5 Star (Good)
- Speed & Compatibility: 3,5 Star (Very good)
- Easy of Use: 4,5 Star (Excellent)
- Help & Support: 4 Star (Very good)
- Initial Startup Time: 6,6 detik
- Average Startup Time: 5,4 detik
- Navigation Time: 6,4 detik
Feature:
- Tabbed browsing, Integrated search engine, Save tabs, Customization options, Bookmarks, Rss feeds, Password manager, Find-On page function, Zoom, Add-ons, Mouse gestures.
Security:
- Pop-up blocker.
- Clear data.
KUMPULAN DAFTAR PERINTAH COMMAND PROMPT
Kali ini saya akan memberitahukan anda Perintah mengenai CMD (Command Prompt ).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
sekian ya.
Semoga Bermanfaat bagi kita smua.....
by. Evan Zebua
Cara membuat kroftografi dengan menggunakan Visual Basic 2008
Pertama
desainlah from seperti yang dibawa ini :
Untuk membuat listing program double click lember kerja yang
bebas icon_nya tau ikutin saja perintah di bawah seperti biasa_Nya:
Public Class Form1
Private Sub KeluarToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
KeluarToolStripMenuItem.Click
Me.Close()
End Sub
Private Sub KriptografiCaesarToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
KriptografiCaesarToolStripMenuItem.Click
Form2.MdiParent = Me
Form2.Show()
End Sub
Private Sub KriftografiVernamToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
KriftografiVernamToolStripMenuItem.Click
Form3.MdiParent = Me
Form3.Show()
End Sub
Private Sub MenuStrip1_ItemClicked(ByVal
sender As System.Object, ByVal e As
System.Windows.Forms.ToolStripItemClickedEventArgs) Handles
MenuStrip1.ItemClicked
End Sub
Private Sub KriftografifelGronsfeldToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
KriftografifelGronsfeldToolStripMenuItem.Click
Form4.MdiParent = Me
Form4.Show()
End Sub
Public Class Form2
Private Sub btnEnkkripsi_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnEnkkripsi.Click
Dim x As String = ""
Dim
xkalimat As String
= ""
For i =
1 To Len(plain.Text)
x = Mid(plain.Text, i, i)
x = Chr(Asc(x) + 3)
xkalimat = xkalimat + x
Next
chiper.Text = xkalimat
End Sub
Private Sub btnDekripsi_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnDekripsi.Click
Dim
jumlah As Double
= Len(plain.Text)
Dim x As String
Dim
xkalimat As String
= ""
Dim i As Double
Dim bil
As Integer
For i =
1 To jumlah
x = Mid(plain.Text, i, 1)
bil = Asc(x) + 3
x = Chr(bil)
xkalimat = xkalimat + x
Next i
chiper.Text = xkalimat End Sub
Public Class Form3
Private Sub orm3_Load(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
plainteks.text = ""
kunci.Text = ""
chiperteks.Text = ""
End Sub
Private Sub btnEnkkripsi_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnEnkkripsi.Click
Dim j As Integer
Dim jum
As Integer
Dim
skey As String
Dim
nkata As Integer
Dim
nkunci As Integer
Dim
skata As String
Dim
splain As String
= ""
Dim
nEnc As Integer
j = 0
skata = plainteks.Text
jum = Len(skata)
skey = kunci.Text
For i =
1 To jum
If
j = Len(skey) Then
j = 1
Else
j = j + 1
End
If
nkata = Asc(Mid(skata, i, 1)) - 65
nkunci = Asc(Mid(skey, j, 1)) - 65
nEnc = ((nkata + nkunci) Mod 26)
splain = splain & Chr((nEnc) +
65)
Next i
chiperteks.Text = splain
End Sub
Private Sub plainteks_KeyPress(ByVal
sender As Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles
plainteks.KeyPress
e.KeyChar = UCase(e.KeyChar)
Dim
tombol As Integer
= Asc(e.KeyChar)
If Not (((tombol >= 65) And
(tombol <= 90)) Or (tombol = 8)) Then
e.Handled = True
End If
End Sub
Private Sub kunci_KeyPress(ByVal
sender As Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles
kunci.KeyPress
e.KeyChar = UCase(e.KeyChar)
Dim
tombol As Integer
= Asc(e.KeyChar)
If Not (((tombol >= 65) And
(tombol <= 90)) Or (tombol = 8)) Then
e.Handled = True
End If
End Sub
Private Sub kunci_TextChanged(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles kunci.TextChanged
End Sub
End Class
Public Class Form4
Private Sub Form4_Load(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
plainteks.Text = ""
kunci.Text = ""
chiperteks.Text = ""
End Sub
Private Sub btnEnkkripsi_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnEnkkripsi.Click
Dim j As Integer
Dim jum
As Integer
Dim
skey As Integer
Dim
nkata As Integer
Dim
nkunci As Integer
Dim
skata As String
Dim
splain As String
= ""
Dim
nEnc As Integer
j = 0
skata = plainteks.Text
jum = Len(skata)
skey = kunci.Text
For i =
1 To jum
If
j = Len(skey) Then
j = 1
Else
j = j + 1
End
If
nkata = Asc(Mid(skata, i, 1)) - 65
nkunci = Mid(skey, j, 1)
nEnc = ((nkata + nkunci) Mod 26)
splain = splain & Chr((nEnc) +
65)
Next i
chiperteks.Text = splain
End Sub
Private Sub plainteks_KeyPress(ByVal
sender As Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles
plainteks.KeyPress
e.KeyChar = UCase(e.KeyChar)
Dim
tombol As Integer
= Asc(e.KeyChar)
If Not (((tombol >= 65) And
(tombol <= 90)) Or (tombol = 8)) Then
e.Handled = True
End If
End Sub
Private Sub kunci_KeyPress(ByVal
sender As Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles
kunci.KeyPress
e.KeyChar = UCase(e.KeyChar)
Dim
tombol As Integer
= Asc(e.KeyChar)
If Not (((tombol >= 48) And
(tombol <= 57)) Or (tombol = 8)) Then
e.Handled = True
End If
End Sub
Private Sub kunci_TextChanged(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles kunci.TextChanged
End Sub
End Class
Contoh dari Enkrifsi contoh dari Dekrifsi