Monday, July 25, 2011

MEMBUAT ANTI VIRUS PADA FLASHDISK

Kali ini saya akan berbagi tentang cara mempertebal keamanan komputer dari plashdisk yang ada virusnya,,
langsung aja ya!!!!!

software pertama yang kita perlukan ya jelas aja ANTIVIRUS berukuran kecil (banyak
berserakan di internet,,tinggal tanya aja ama mbah google.Hehehehe






kita buat script dulu untuk autorun di Flasshdik kita....  tinggal ketik aja di notepad

copas aja biar gampang!
                      
[AutoRun]                      
open=namaantivirus.exe              
shellexecute=namaantivirus.exe                      
shell\Aman kan Komputer ya:-)_!!!\command=namaantivirus.exe
shell=Aman kan Komputer ya-)_!!!


kalo udah ya lanjut donk....kita save dengan nama "autorun.inf"(gak pake tanda kutip) di flashdisk kita
 sekarang tinggal kita copy aja antivirus yang mau kita masukin ke flashdisk..!!! (inget....kalo ngopy file autorun n' antivirusnya bukan di dalam folder..)
 jadi deh,kalo mau scan virus tinggal double click aja tuh drive flashdisk kita!! kalo kita klik kanan drive  flashdisknya bakalan ada tambahan kata di atas kata
AUTOPLAY.
Aman kan Komputer ya:-)_!!!

nah udah jadi sekarang...
klo ngerasa keganggu sama  file autorun nya,hiden aja dech
klik kanan,pilih properties ceklis hiden apply dan Ok

mudah mudahan bermanfaat ya

Membuat Nomor Otomatis Dengan Pola Tanggal (YYMMDD + Nomor Urut)

Catatan :

Anda  harus memiliki database dan sebuah tabel (contoh nama databasenya adalah
dbdemofaktur, nama tabel Faktur, nama field NoFaktur)

Buatlah form dengan bentuk seperti gambar di bawah ini













Setelai selesai membuat  seperti gambar di atas copy kode berikut ini :



Dim Conn As New ADODB.Connection 
Dim RS As ADODB.Recordset 

Sub Koneksi() 
Set Conn = New ADODB.Connection 
Set RS = New ADODB.Recordset 
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & 
"\dbdemofaktur.mdb" 
End Sub 

Private Sub Command1_Click() 
Dim simpan As String 
simpan = "insert into faktur(nofaktur) values ('" & LblFaktur & "')" 
Conn.Execute simpan 
Form_Activate 
End Sub 

Private Sub Command1_KeyPress(KeyAscii As Integer) 
If KeyAscii = 27 Then End 
End Sub 

Private Sub Form_Activate() 
Call oto1 
End Sub


Enjoy your eksperiment!!!!!

Saturday, July 23, 2011

Membuka File Musik Atau Film Dengan VB

Buka VB
Buatlah form sbb




Object :
Command1
Commondialog1 (tambahkan komponennya)
Windowsmediaplyaer1 (tambahkan komponennya)

Klik dua kali command1
Tulis coding sebagai berikut :



Private Sub Command1_Click() 
CommonDialog1.Filter = "*.wmv|*.mp3" 
CommonDialog1.ShowOpen 
WindowsMediaPlayer1.URL = CommonDialog1.FileName 
End Sub 



RUN project
Klik Command1
Cari file musik atau film di komputer anda
Klik dua kali nama file target atau klik open

Simple Banget ya.....Selamat Mencoba

Membuat File Exe Dan File Setup

Membuat File Exe 

Program  yang  telah  dibuat  biasanya  harus  dijalankan  dengan  cara membuka  sistem Visual
Basic  terlebih  dahulu,  hal  ini  memerlukan  banyak  waktu  dan  tenaga.  Untuk  melakukan
efisiensi maka  sebaiknya dibuat  sebuah  file EXE dari program yang  telah  lengkap  tersebut.
Untuk membuat kompilasi program lakukan langkah-langkah di bawah ini :
1.  Buka program yang akan dikompilasi (misalnya Aplikasi Penjualan)
2.  Klik menu File, pilih Make Aplikasi Penjualan.exe …







3.  Tulis nama file EXE (misalnya Program Penjualan)
4.  Tentukan posisi penyimpanan file tersebut (misalnya pada direktori C:\Belajar VB)
5.  Kemudian pilih OK

Membuat Shortcut  

Setelah  terbentuk  file  EXE  dengan  langkah-langkah  di  atas,  maka  sebaiknya  Anda  pun
membuat shortcut-nya di desktop dengan  tujuan agar pada  saat program  tersebut dijalankan
Anda  cukup  dengan melakukan  double-Click  pada  shortcut  tersebut  tanpa  harus membuka
sistem Visual Basic.

Untuk membuat shortcut di desktop lakukan langkah-langkah di

1.  Tampilkan Desktop
2.  Klik kanan mouse
3.  Pilih New
4.  Pilih Shortcut
5.  Klik Browse…
6.  Pilih direktori C:\Belajar VB
7.  Klik Open
8.  Pilih file Program Penjualan
9.  Klik Open, maka akan muncul menu seperti gambar berikut
10. Klik Next
11.  Jika perlu, ubahlah dengan nama shortcut yang baru
12. Klik Finish








Dengan cara ini maka akan terbentuk sebuah shortcut baru di desktop, jika Anda melakukan
Double-Click pada shortcut tersebut maka akan tampil program aplikasi penjualan yang telah
dikompilasi dengan nama Program Penjualan.

Membuat File Setup 

Jika  sebuah  program  ingin  ditransfer  ke  komputer  lain,  maka  akan  lebih  baik  jika  cara
memindahkannya dengan membuat file setup-nya terlebih dahulu. Walaupun cara penyalinan
juga dapat digunakan untuk mentransper program, tetapi cara tersebut dirasakan kurang aman.

Untuk membuat file setup lakukan langkah-langkah berikut ini :

A.  Tahap persiapan.
1.  Buatlah  sebuah  direktori  baru  (misalnya  Setup  Penjualan)  tempat  menyimpan  file
setup  dan  file-file  pendukung  lainnya  seperti  file  hasil  desain  Crystal  Report,
beberapa form yang dirancang oleh Visual Basic dan lain-lain.


2.  Salinlah (copy) file-file yang dibutuhkan seperti yang disebutkan pada poin

B.  Membuat file setup
1.  Klik ikon Start
2.  Pilih Programs
3.  Pilih Microsoft Visual Studio 6.0
4.  Pilih Microsoft Visual Studio Tools
5.  Pilih Package & Development Wizard
6.  Klik Browse …
7.  Aktifkan direktori C:\Belajar VB
8.  Pilih project dengan nama Aplikasi Penjualan
9.  Klik Open, sehingga muncul tampilan berikut ini :






10.  Kemudian pilih Package









11.  Pilih Standard Setup Package
12.  Klik Next >









13.  Pilik direktori Setup Penjualan (nama direktori ini tidak akan muncul  jika sebelumnya
Anda tidak membuatnya seperti yang dijelaskan pada tahap persiapan point A)
14.  Klik Next >

Karena  dalam  aplikasi  penjualan  ini  semua  laporan  menggunakan  Crystal  Report,
maka aktifkan file pendukungnya.

Catatan :

Pada  tahapan  ini sebaiknya  file database dan  file-file pendukung  lainnya seperti  file  laporan
yang  dibuat  dengan  Crystal  Report  ditambahkan,  caranya  klik  add,  cari  file  yang  akan
ditambahkan, klik open

15.  Kemudian aktifkan (pilih) juga file-file pendukung lainnya
16.  Klik Next >
17.  Untuk menyimpan file Setup ke disket, pilihlah Single Cab (1,44 MB)
18.  Klik Next >

19.  Tulis nama Setup (misalnya Aplikasi Penjualan)
20.  Kemudian klik Next >
21.  Klik Next >

22.  Sistem  akan  mencari  file-file  pendukung  dari  file  setup  tersebut  di  beberapa  lokasi
dalam harddisk yang nantinya disimpan dalam direktori Support.
23.  Kemudian  klik Next >

24.  File  Setup  tersebut  akan  melakukan  sharing  dengan  file  exe  yang  telah  dibuat
sebelumnya, klik pada CheckBox Program Penjualan.Exe
25.  Kemudian  klik Next >
26.  Klik Finish

Dengan cara di atas Anda telah membuat sebuah file setup aplikasi penjualan. Untuk melihat
hasilnya, lakukan proses setup (instalasi) program dengan langkah-langkah berikut ini :
1.  Buka Windows Explorer
2.  Pilih direktori Setup Penjualan
3.  Double-Click ikon Setup (gambar komputer warna biru), akan muncul tampilan seperti di
bawah ini :
4.  Klik OK, akan tampil gambar di bawah ini :

5.  Jika akan meneruskan Setup, klik ikon bergambar komputer, untuk mengubah tempat file
program  dijalankan,  klik  ikon  Change  Directory  kemudian  tentukan  posisinya  dalam
harddisk, untuk membatalkan (keluar) dari Setup, klik Exit Setup.

6.  Tentukan Group programnya, lalu klik Continue
7.  Tunggu proses setup hingga 100%

8. Dengan  langkah-langkah  di  atas,  Anda  telah  melakukan  setup  (instalasi)  Aplikasi
Penjualan  pada  komputer,  dengan  cara  inilah  Anda  dapat  memperbanyak  program
tersebut pada komputer-komputer lain yang diinginkan.