کامپیوترم یه ویروس گرÙته (ntde1ect)
دارم یه آنتی براش مینویسم ولی چند جا گیر کردم
اگه میتونید لطÙا Ú©Ù…Ú© کنید
---
1- Ùایل به صورت read-only ,system,hidden هست میخوام به صورت نرمالش کنم
"Shell "attrib -s -h avpo.exe
این کد بالا درست کار میکنه ولی وقتی اینجوری میشه:
"Shell "attrib -s -h -r avpo.exe
دیگه کار نمیکنه خواستم با setattr عوضش کنم ولی نشد
----
2- برای چک کردن درایو ها این کد رو نوشتم
lc = Drive1.ListCount
For i = 1 To lc
dt = Choose(i, "c:", "d:", "e:", "f:", "g:", "h:", "i:", "j:", "k:", "l:", "m:", "n:", "o:", "p:", "q:", "r:", "s:", "t:", "u:", "w:", "x:", "y:", "z:")
chDrive (dt)
.
.
.
next i
اما این ListCount تعداد درایوها + cdrom و... میده که وقتی chdrive به اونجا(cdrom) میرسه ارور
میده
3-بعضی از درایوها مثل درایوی Ú©Ù‡ VB توش نصب شده موقع مراجعه به درایو میره تو Ùلدری Ú©Ù‡ VB اونجاس چجوری باید بیارمش تو قسمت اصلی دایو
خواستم با shell "cd.." برگزدونمش ولی نشد
سورس هم ضمیمه کردم
دارم یه آنتی براش مینویسم ولی چند جا گیر کردم
اگه میتونید لطÙا Ú©Ù…Ú© کنید
---
1- Ùایل به صورت read-only ,system,hidden هست میخوام به صورت نرمالش کنم
"Shell "attrib -s -h avpo.exe
این کد بالا درست کار میکنه ولی وقتی اینجوری میشه:
"Shell "attrib -s -h -r avpo.exe
دیگه کار نمیکنه خواستم با setattr عوضش کنم ولی نشد
----
2- برای چک کردن درایو ها این کد رو نوشتم
lc = Drive1.ListCount
For i = 1 To lc
dt = Choose(i, "c:", "d:", "e:", "f:", "g:", "h:", "i:", "j:", "k:", "l:", "m:", "n:", "o:", "p:", "q:", "r:", "s:", "t:", "u:", "w:", "x:", "y:", "z:")
chDrive (dt)
.
.
.
next i
اما این ListCount تعداد درایوها + cdrom و... میده که وقتی chdrive به اونجا(cdrom) میرسه ارور
میده
3-بعضی از درایوها مثل درایوی Ú©Ù‡ VB توش نصب شده موقع مراجعه به درایو میره تو Ùلدری Ú©Ù‡ VB اونجاس چجوری باید بیارمش تو قسمت اصلی دایو
خواستم با shell "cd.." برگزدونمش ولی نشد
سورس هم ضمیمه کردم
Comment