Penulis Topik: ASK About Adeshinichi Simple Protector & RTP  (Dibaca 6893 kali)

Offline rolas

  • Pro100
  • ****
  • Tulisan: 105
  • Reputation: +147/-0
    • Lihat Profil
Re: ASK About Adeshinichi Simple Protector & RTP
« Jawab #30 pada: Juli 27, 2012, 10:44:24 AM »
iya om, di modulnya bukanya sudah seperti itu yah :

Kode: [Pilih]
If Mode = "Q" Then
fName = GetFileName(Filedata(i))
EncodeFile Filedata(i), AppPath & "karantina\" & Left$(fName, Len(fName) - Len(GetExt(Filedata(i)))) & ".avq"
AddQList TheLV, Filedata(i), Left$(fName, Len(fName) - Len(GetExt(Filedata(i)))) & ".avq"
DeleteFile Filedata(i)
Status = "Di Karantina"
ElseIf Mode = "D" Then
DeleteFile Filedata(i)
Status = "Di Hapus"

bukanya itu di enkripsi dulu baru di hapus y om kalau liat kode diatas?

Offline Heru Budi Santoso

  • Moderator
  • Pro100
  • *****
  • Tulisan: 139
  • Reputation: +2736/-0
  • Jenis kelamin: Pria
  • Terus belajar untuk lebih baik
    • Lihat Profil
    • https://facebook.com/kemoav/
Re: ASK About Adeshinichi Simple Protector & RTP
« Jawab #31 pada: Juli 27, 2012, 10:47:55 AM »
mungkin pathmu di list yg slah

Offline rolas

  • Pro100
  • ****
  • Tulisan: 105
  • Reputation: +147/-0
    • Lihat Profil
Re: ASK About Adeshinichi Simple Protector & RTP
« Jawab #32 pada: Juli 27, 2012, 10:51:38 AM »
udah coba liat source yang saya kasih tadi om? saya ambil pathnya dari pendeteksian drive yang masuk, kemudian di scan.. kalau salah pathnya, masih kurang di line yang mana y om :)

Offline Wheldt

  • Pro10
  • ***
  • Tulisan: 18
  • Reputation: +49/-0
    • Lihat Profil
Re: ASK About Adeshinichi Simple Protector & RTP
« Jawab #33 pada: September 10, 2012, 03:37:35 PM »
sms saya gan, ntar saya kasih tau source buat hapus nya

Offline rolas

  • Pro100
  • ****
  • Tulisan: 105
  • Reputation: +147/-0
    • Lihat Profil
Re: ASK About Adeshinichi Simple Protector & RTP
« Jawab #34 pada: September 11, 2012, 07:03:56 AM »
sms ke nomor mana gan?