دانلود و استفاده کنيد، در صورت رضايت از عملکرد نرم افزار، کد فعالسازي تهيه کنيد.

contact دانلود و استفاده کنيد
استفاده از DIR برای دستیابی به لیستی از فایل ها

TPE

http://bayanbox.ir/view/263405954590585756/2mobile.png

Tavvafi@gmail.com


≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡

Sub GetFiles()
' Demonstrates the use of DIR to return a file at a time

Dim strPath As String
Dim strFile As String
Dim strFileSpec as String
Dim strFilesFound As String

strPath = "C:\My Pictures\" ' or wherever you want to look for files
strFileSpec = "*.GIF" ' or whatever type of files you want to list

' get the first file that meets our specification
strFile = Dir$(strPath & strFileSpec)

' if we got at least one file, continue:
While strFile <> ""
    strFilesFound = strFilesFound & strPath & strFile & vbCrLf
    ' get the next file and loop
    strFile = Dir
Wend

' let's see what we've got
MsgBox strFilesFound

End Sub

powerpoint

پاورپوینت

پاورپوینت powerpoint

نمايش متن DOS تبديل متن DOS تبديل متن Win تبديل متن Excel حذف جداول چاپ فرم ارزشيابي حضورغیاب|انضباط کارنامه توصیفی کارنامه ماهانه
TA TC TA TXLSx TCE ASES MAHNAZ Mahtos MAHKAR

رفع مشکلات Access با نصب AccessRuntime

حفاظت از کدهاي برنامه نويسي شده در محيط VBA-Access

تغيير تصوير بک گراند صفحه ورود به Windows 7

بروزآوري آيکن هاي ويندوز Refresh Desktop Icons

dll شماره سريال مدیریت پیامک حفاظت از PDFها حفاظت از فيلم ها حفاظت پاورپوينت
TSN TSMS TDE TVE TPE