حذف فايل zip شده بعد از unzip شدن و انتقال به حافظه

[hamaz 129]

سلام به همه دوستان

 

چه جوري فايل zip شده بعد از unzip شدن و انتقال به حافظه را ميشه پاك كرد؟ خيلي ضروريه لطفا هر كي بلده كدش بزاره

[پژمان نیکروان 6,055]

سلام.

برای حذف یه فایل:

File.Delete(File.DirRootExternal,"EsmeFile.zip") 'این فایل از رم پاک میشود

اگه غیر از اینه توضیح بدید که فایلتون دقیقا کجاست و از کجا میخواین پاکش کنید.

[hamaz 129]

سلام.

برای حذف یه فایل:

File.Delete(File.DirRootExternal,"EsmeFile.zip") 'این فایل از رم پاک میشود

اگه غیر از اینه توضیح بدید که فایلتون دقیقا کجاست و از کجا میخواین پاکش کنید.

ميخوام بعد از اينكه unzip شد فولدر ايجاد شد فايل zip حذف بشه اينها در FirstTime هست  دفعه بعد چك كنه اگه فولور با محتوياتش هست ديگه پرسه دوباره تكرار نشه

[محمد رشوند 1,208]

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

میتونی برای قسمتی که فایل زیپ شده از File.WriteString استفاده کنی و فایل firsttime.txt رو یه چیزی بنویسی تا تشخیص بده دفه اول یا نه

	Dim zip As ABZipUnzip
	If File.Exists(File.DirRootExternal,"firsttime.txt") Then
		

	If File.Exists(File.DirDefaultExternal,"1.zip") Then
		zip.ABUnzip("1.zip",File.DirDefaultExternal) = False
		File.Delete(File.DirRootExternal,"1.zip")
	End If
	
	Else
		zip.ABUnzip("1.zip",File.DirDefaultExternal) = False
		File.Delete(File.DirRootExternal,"1.zip")
		End If