Trik Memproteksi CD dari Pembajakan

 Memprotect CD agar error saat di Burning/Copy (anti bajak)

 

Disini saya akan memberitahukan cara memproteksi cd agar software atau file anda sulit untuk di copy atau dibajak, dengan tutorial ini diharapkan bisa membantu anda dalam melindungi file anda. yupz gak usah lama-lama mari kita lanjutkan tutorial ini.

• Tools yang perlu disiapkan :
• WTM CD Protect : download -> disini
• UltraISO : download -> disini
• Goldenhawk CDRWIN : download -> disini (pass : www.warezraid.com)

Langkah-langkahnya :

1. Buka WTM CD Protect -> add error
2. Pilih file image error nya
3. Image error akan bereksistensi *.cry
4. Set Option, pilih error setup sesuai keinginan, semakin besar semakin bagus tapi membutuhkan proses yang cukup lama
5. Rename image error menjadi file yang “terlihat biasa” dimata telanjang, contoh
6. Buka UltraISO dan bikin kompilasi programnya, sebar file error nya ke dalam directory kompilasi, semakin banyak semakin baik, use your imagination!
7. Save image menjadi BIN/CUE
8. Kalo udah jadi, buka kembali WTM CD Protectnya dan buka images file yang baru dibuat tadi
9. Klik protect, biarkan proses proteksi bekerja
10. Burn images yang udah di protect dengan CDRWIN RAW mode
11. Hasilnya. jika di copy pake NERO sungguh sangat mengecewakan
12. Termasuk juga jika dicopy pake cloneCD/winimages dll
13. Juga bila dicopy via explorer, biar ditungguin seharian ga akan tercopy files nya

dan pada akhirnya kita sudah berhasil memproteksi cd kita sendiri, terima kasih atas perhatiannya, semoga sukses selalu.

Cara Memproteksi CD Dengan Visual Basic

Cara Memproteksi CD

Trik Memproteksi Koleksi CD dengan VB (Visual Basic) merupakan cara Memproteksi Koleksi CD dengan bahasa pemrograman visual basic (VB). Cara Memproteksi Koleksi CD dengan VB ini dulu sukses dan bisa di jalankan dengan mudah. Bagaimana tidak saya mempunyai koleksi CD ratusan tapi bingung, terfikir proteksi CD sederhana saja namun orang lain yang tidak tahu tak dapat menggunakannya.

Trik Memproteksi Koleksi CD dengan VB ini hanya berlaku jika autorun CD-room dijalankan dengan kata lain autorun CD-Room tidak di disable. Nah artikel dengan judul Trik Sederhana Memproteksi Koleksi CD Anda telah banyak beredar dan dulunya memang saya share di vbbego.com. namun sekarang saya bisa menemukan di beberapa blog, web, forum ada yang mencantumkan siapa penulisnya ada yang tidak, tetapi biarlah

Trik Memproteksi Koleksi CD dengan VB hanya membutuhkan editor vb yaitu boleh memakai visual studio atau visual basic. Trus ada juga file autorun.inf dan ada juga bowoCD.ini. Fungsi masing masing adalah sebagai berikut :

cekcd.exe

Merupakan hasil pack source vb, bertugas untuk mengecek, dan sebagai file yang paling penting untuk Memproteksi Koleksi CD. Jadi file ini akan bertugas jika tidak menemukan atau ada yang salah langsung merespon CD-room untuk eject

autorun.inf

Merupakan sebuah file yang bertugas untuk setting autorun. Jadi file autorun.inf hanya bertugas memberikan informasi fle apa yang akan di jalankan ketika CD di masukan dan juga memberikan informasi icon apa yang bisa di tampilkan.

bowoCD.ini

Merupakan file yang bertugas sebagai penyimpan informasi disini di gunakan untuk menyimpan serial number hardisk. Jadi nantinya jika cekcd.exe d jalankan akan merequest data yang ada di file ini

Trik Memproteksi Koleksi CD dengan VB ini memang sangat sederhana. Andapun yang belum begitu mengenal VB (Visual Basic) pasti bisa mengikutinya atapun membuatnya. Beberapa pertanyaan sering muncul

Tapi jika fitur autorunnya di disable bagaimana? Masih bisa jalan apa tidak ?

Jawabnya :: Tidak, tapi bisa di akali. Misal jika koleksi CD mp3 maka rubah saja nama filenya. Dan ini yang sekarang saya lakukan. dengan mengubah karakter di nama file orang akan malas mengcopy. Trus jika Video pakai saja software lain untuk memproteksi VCD. Jika data dipack trus di password

Untuk NO=XXXX-XXXX-XXXX-XXXX di isi apaan?

Jawabnya :: lihat pada code form

If Y = sn("c:\") & "-" & sn("d:\")Then

nah anda bisa mendapatkan dengan menyisipkan misalnya

text1.text = sn("c:\") & "-" & sn("d:\")

dan jangan lupa menempatkan textbox di form.

Source Code Visual Basic Trik Memproteksi Koleksi CD dengan VB

Ini adalah beberapa source yang di gunakan untuk mengerjakan trik memproteksi koleksi cd dengan VB

Source Code Form Proteksi Koleksi CD

1. Private Sub Form_Load()
2. Dim buffer As String * 255
3. Dim d As Long
4. Dim Y
5. X = GetPrivateProfileString("SERIAL", "NO", "(error)", buffer, 255, "C:\bowoCD.ini")' Membaca file ini
6. Y = Left(buffer, X)
7. If Y = "(error)" Then
8. retvalue = mciSendString("set CDaudio door open", retrunString, 127, 0)'Cd Keluar
9. End
10. Else
11. If Y = sn("c:\") & "-" & sn("d:\") Then
12. MsgBox "sELAMAT mENGGUNAKAn cDNYa bOWo eKOWIDODo", vbInformation, "BOWO INFO" 'Tampil Pesan
13. End
14. Else
15. retvalue = mciSendString("set CDaudio door open", retrunString, 127, 0)'Cd Keluar
16. End
17. End If
18. End If
19. End Sub

Source Code Module Proteksi Koleksi CD

1. Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
2. Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
3. Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
4. Public Function sn(ByVal RootPatch As String) As String
5. Dim vollabel As String
6. Dim volsize As Long
7. Dim serial As Long
8. Dim MaxLen As Long
9. Dim Flags As Long
10. Dim name As String
11. Dim Namesize As Long
12. Dim s As String
13. If GetVolumeInformation(RootPatch, vollabel, volsize, serial, MaxLen, Flags, name, Namesize) Then
14. s = Format(Hex(serial), "00000000")
15. sn = Left(s, 4) + "-" + Right(s, 4)
16. Else
17. sn = "0000-0000"
18. End If
19. End Function

Source Code Aotorun.inf Proteksi Koleksi CD

1. [autorun]
2. OPEN=cekcd.exe
3. ICON=cekcd.exe

Source Code BowoCD.ini Proteksi Koleksi CD

1. [SERIAL]
2. NO=XXXX-XXXX-XXXX-XXXX