رفتن به مطلب
بیسیک فور ایکس
  • 0
batman1

اسکن فایل ها

سوال

سلام به همه.

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

یه چیزی تو مایه های آنتی ویروس.

ممنون میشم راهنماییم کنید.

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

7 پاسخ به این سوال تا کنون داده شده است

پست های پیشنهاد شده

  • 0
dim l as list
dim item as string 


	l=File.ListFiles(File.DirRootExternal)

	For i=0 To l.Size-1     
		item=l.Get(i)
		If item.EndsWith(".mp3") Or item.EndsWith(".ogg") Then
	اینجا هم میزارین تو لیست ویو بزاره یا مولتی پنل یا هرچی
پایان شرط		

هر چی تو مموری با پسوند mp3   ogg باشه لیست میکنه

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

توی اندروید ما فایل هیدن هم داریم که این دستورات نتونن پیداش کنن؟

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

ممنون میشم یکی جواب منو بده.

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

این نوع کار برای همه نوع فایل چه هیدن چه شو(show) حالا شما اگر بخواهید در فایل های غیر از هیدن جستجو کنید باید این جوری بنویسید

جستجو در فایل های show:


dim l as list
dim item as string


l=File.ListFiles(File.DirRootExternal)

For i=0 To l.Size-1
item=l.Get(i)
if item.startwith(".") Then
جستجو در فایل ها هیدن
Else
جستجو در فایل های غیر هیدن
Endif
Next
[/Php]

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

عزیز کد شما که مثل همون بالاییس!!

من چه جوری بهش بگم که دنبال فایل های شو یا هیدن بگرد؟

دستور خاصی داره؟!

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

نه ظاهر اون عین بالایی هست شما اسم یک فایل را بگید تا من کدش رو بدم

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

ممنون میشم یکی جواب منو بده

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری

  • مطالب مشابه

    • توسط batman1
      سلام دوستان
      من دنبال راهی بودم تا بتونم باهاش کارت حافظه رو اسکن کنم،البته با نام دلخواه.یعنی اینکه بگم که اگر فلان نام رو پیدا کردی،بعد فایل هایی که پیداکردی رو لیست کن.
      به این سورس کد رسیدم.اما تقریبا چیزی ازش نفهمیدم.
      میشه یکی کمک کنه و توضیح بده:
      Sub SdCard(CurPath As String) Dim FileList, FolderList As List Dim F As String FileList.Initialize FolderList.Initialize If CurPath = "" Then CurPath = "/mnt/sdcard" End If If File.IsDirectory(CurPath,"") Then Try FileList = File.ListFiles(CurPath) If FileList.IsInitialized Then If FileList.Size > 0 Then F = CurPath Listview1.AddSingleLine(F) CodeModule.ViewList.Add(F) For i = 0 To FileList.Size - 1 F = FileList.Get(i) If File.IsDirectory(CurPath & "/" & F,"")Then FolderList.Add(CurPath & "/" & F) Else Listview1.AddSingleLine(CurPath & "/" & F) CodeModule.ViewList.Add(CurPath & "/" & F) Counter = Counter + 1 LabelCounter.Text = Counter End If DoEvents Next End If End If Catch Msgbox(LastException & " " & CurPath & " " & FileList.Size,"File") End Try 'Recursive Code Try If FolderList.IsInitialized Then If FolderList.Size > 0 Then For i = 0 To FolderList.Size - 1 F = FolderList.Get(i) SdCard(F) DoEvents Next End If End If Catch Msgbox(LastException & " " & FolderList.Size & " " & F,"Folder") End Try End If End Sub ممنون
    • توسط 360momax
      کاربرد فایل های aar چی هست
       

    • توسط batman1
      سلام به همه.
      دوستان،میخوام یه برنامه ای بسازم که ابتدا باهاش دوتا عکس بگیری(با دوربین)بعدش بیاد اون دوتا عکس رو اسکن کنه و بهترین حالت عکس رو نشون بده.
      مثل کاری که این دوربین های دوگانه انجام میده،اما حالا با یه دوربین.
      ممنون میشم توی الگوریتم اسکنش راهنماییم کنید.
×