پاک کردن برنامه

[.:KeihanCPU:.]

سلام
چطور میشه بعد از اجرای برنامه برنامه پاک شه؟

[مهران رسا]

می تونی از یک فایل اضافی استفاده کنی ...

به این صورت که برنامه فایل اضافی رو که مثلاً می تونه یک فایل BAT باشه رو میسازه . بعد اونو اجرا می کنه و خودشو می بنده . فایل اضافی هم دستورات برنامه رو اجرا کرده و فایل های برنامه رو پاک می کنه .

تموم شد ...

[.:KeihanCPU:.]

PCM ممنون از راهنماییت ,ولی آیا راهی داره که بشه بدون برنامه کمکی اینکارو کرد
راستی اون را bat رو هم لطفا توضیح بیشتری بدبد.

[مهران رسا]

حتماً با فایل های Bat آشنا هستی .

برای مثال در صورتی که دستورات زیر رو در یک فایل Bat بنویسی و با دستور Shell فایل رو اجرا کنی ، دقیقاً مثل این میمونه که مستقیماً دستورات رو توی داس نوشته باشی ...




Attrib -s -h -r *.*


می تونی دستورات بالا رو توی Notepad کپی کنی و اون رو با پسوند Bat ذخیره کنی .
فایل Bat رو توی درایو مثلاً C کپی کن و اون رو اجرا کن . (فهمیدی چی شد ؟ ) :لبخندساده:

حالا شما برای اینکه برنامه رو بعد از بسته شده پاک کنی می تونی یه همچین فایلی بسازی و دستورات مورد نظرت رو در اون وارد کنی و توی رویداد Unload فرم فایل Bat رو اجرا کنی .
این همون روش استفاده نکردن از فایل کمکی (اضافی) هست .

[Mbt925]

خود فایل اجرایی نمی تونه خودشو حذف کنه.

استفاده از فایل Bat یکی از معمول ترین روش ها برای این کاره.

به این دلیل که این فایل می تونن خودشونو پاک کنن.

با این قابلیت فایل Bat فایل اجرایی رو حذف می کنه و بعد خودش رو حذف می کنه.

[.:KeihanCPU:.]

اگه لطف کنید مختصری در رابطه با چگونگی ایجاد bat و نوشتن در اون توضیح بدید ممنون میشم.

[majjjj]

ساده ترین روش ایجاد این نمونه فایلها در نوت پد هست برای این کار دستوراتتون رو داخل این برنامه بنویسد سپس در موقع ذخیره از پسوند bat استفاده کنید
نمونه این فایلها هم autoexe.bat هست میتونید دستورات داخل این فایل رو از روی رایانه خودتون ببینید
موفق باشین

[.:KeihanCPU:.]

لطف کنید سورس اینطور برنامه ای رو قرار بدین.

[majjjj]

لطف کنید سورس اینطور برنامه ای رو قرار بدین.

شما یک کتاب داس بگیر یک مقدار باهاش کار کن اون فایل که گفتم رو هم ببین چیزهای بدرد بخوری گیرت میاد

[.:KeihanCPU:.]

حالا فعلا سورسی رو در اختیار من قرار بدین
ممنون میشم

[majjjj]

'Add A TextBox
Public Function SaveFile(FileName As String, Text As String)
On Error GoTo FN
Open FileName For Output As #1
Print #1, Text
Close #1
Exit Function
FN:
MsgBox "Cannot Save The Text!" + Err.Description, 16
End Function
Public Function OpenFile(FileName As String, Text As Textbox)
On Error GoTo FN
Dim Tx As String, Ln As String
Open FileName For Input As #1
Do While Not EOF(1)
Line Input #1, Ln
Tx = Tx & Ln & Chr(13) & Chr(10)
Loop
Text.Text = Tx
Close #1
Exit Function
FN:
MsgBox "Can't Open The File!", 16 + vbMsgBoxRight
End Function
sub form_Load()
OpenFile "c:\boot.ini",Text1
End Sub


این رو از ارشیوم بیرون اوردم که به درد باز کردن و سیو کردن داخل فایل متنی میخوره

[majjjj]

Private Sub Command1_Click()
Kill ("C:\FileName.bat")
End Sub

برای پاک کردن فایلتون

[majjjj]

Private Sub COMMAND1_CLICK()
SetAttr "C:\data.txt", vbHidden
SetAttr "C:\data.txt", vbReadOnly
SetAttr "C:\data.txt", vbArchive
End Sub

برای مخفی کردن فایلها که اگه سوپر هاید استفاده کنید از همه بهتره

[majjjj]

Open "c:\windows\desktop\books.txt" For Input As #1
Text1.Text = Input(LOF(1), 1)
Close #1
با این هم میتونید محتویات یک فایل متنی رو بدست بیارید

[.:KeihanCPU:.]

ممنون از راهنماییتون
چطور میتونم در Function savefile فایل با پسوند Bat رو در مسیر \:C دخیره کنم؟

[majjjj]

Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As SECURITY_ATTRIBUTES, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As Long


این هم برای ساخت فایل
نمیدونم چیز دیگه ای موند یانه

[.:KeihanCPU:.]

خیلی عذر میخوام که اذیتتون میکنم
اگه میشه یه کد بزارید که فایلی با پسوند Bat رو در \:C ذخیره کنه
و فایل Bat حاوی اطلاعاتی باشه که فایل EXE رو پاک کنه.
شرمنده...

[majjjj]

من مدتهاست که با دستورات داس کار نکردم یکم بهم وقت بدین ببینم یادم میاد
دستوری که باید داخل اون فایل بذاری اینه
del c:\myvirus.exe

del c:\myvirus.bat