سلام. میخوام تمام فایل های پوشه عکس تلگرام رو پاک کنم.حتی Permission ها رو در مانیفست هم ست می کنم و حتی با Runtime هم مجوز میدم
ولی هیچ تاثیری نداره و پاک نمیشن.
کد من :
Sub Button1_Click
Dim data As List
data.Initialize
For Each ss As String In File.ListFiles( File.DirRootExternal&"/Telegram/Telegram Images/")
data.Add(ss)
Next
For Each ss As String In data
File.Delete(File.DirRootExternal&"/Telegram/Telegram Images/",ss)
Next
Msgbox("OK","")
End Sub
سوال
salar_blackdroid 408
سلام. میخوام تمام فایل های پوشه عکس تلگرام رو پاک کنم.حتی Permission ها رو در مانیفست هم ست می کنم و حتی با Runtime هم مجوز میدم
ولی هیچ تاثیری نداره و پاک نمیشن.
کد من :
Sub Button1_Click Dim data As List data.Initialize For Each ss As String In File.ListFiles( File.DirRootExternal&"/Telegram/Telegram Images/") data.Add(ss) Next For Each ss As String In data File.Delete(File.DirRootExternal&"/Telegram/Telegram Images/",ss) Next Msgbox("OK","") End Sub
ممنون.
لینک ارسال
به اشتراک گذاری در سایت های دیگر
2 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.