Program trial biasanya di gunakan untuk mempromosikan suatu aplikasi atau software dengan tujuan agar calon pembeli bisa mencoba atau mencicipi program atau aplikasi tersebut sebelum dibeli.
Setau saya jenis program trial itu ada 2, yaitu pembatasan penggunaan program dengan jumlah hari dan pembatasan dengan berapa kali program di pakai atau di gunakan.
Naah..disini saya mencoba program trial dengan pembatasan berapa kali program di jalankan. Dalam contoh ini saya membatasi pemakaian hanya bisa 15 kali, anda bisa mengubahnya sesuai keinginan anda. dalam program trial ini saya menggunakan sebuah file *.dll sebagai kunci pemakaiannya.
Berikut adalah kodingnya, tulis di jendela kode pada VB 6 tentunya
Private Sub Form_Load()
If Text1.Text = "4N45-4UL14-L0V3-5T0R1" Then
Open App.Path & "\xData.dll" For Output As #1
Print #1, "registered"
Print #1, "9999999999999999999999"
Close #1
MsgBox "Telah Active Sekarang...", vbInformation
Form2.Show
Unload Me
Else
MsgBox "Aduh Bozzz... Salah Tuh Serial Numbernya...", vbCritical
End If
End Sub
Untuk lebih jelasnya silahkan download
Pass: anascode
Jika Anda Kurang Paham Silahkan Tinggalkan Komentar anda
0 komentar:
Posting Komentar
Silahkan Tinggalkan Komentar Anda