VBScript দিয়ে আপনি ফাইল এবং ফোল্ডারের তথ্য সংগ্রহ করতে পারেন, যেমন ফাইলের সাইজ, তারিখ, নাম, এবং অন্যান্য বৈশিষ্ট্য। এ জন্য FileSystemObject ব্যবহার করা হয়, যা VBScript এর একটি বিল্ট-ইন অবজেক্ট। এই অবজেক্টের সাহায্যে আপনি ফাইল এবং ফোল্ডারের সাথে সম্পর্কিত বিভিন্ন অপারেশন করতে পারেন, যেমন ফাইল পড়া, লেখা, ফোল্ডার তৈরি করা ইত্যাদি।
FileSystemObject (FSO) এর ব্যবহার
FileSystemObject (FSO) VBScript এ ফাইল এবং ফোল্ডার পরিচালনা করতে ব্যবহৃত হয়। এই অবজেক্টের মাধ্যমে আপনি ফাইলের সাথে কাজ করতে পারেন এবং ফোল্ডারের বৈশিষ্ট্য বের করতে পারেন।
FSO তৈরি করার জন্য, আপনাকে প্রথমে এটি ইনিশিয়ালাইজ করতে হবে:
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
এখন, fso অবজেক্টের মাধ্যমে আপনি ফাইল এবং ফোল্ডারের তথ্য সংগ্রহ করতে পারেন।
ফাইলের তথ্য সংগ্রহ করা
ফাইলের বিভিন্ন তথ্য যেমন সাইজ, তৈরি হওয়া তারিখ, শেষ পরিবর্তন হওয়া তারিখ ইত্যাদি সংগ্রহ করতে FileSystemObject ব্যবহার করা হয়।
উদাহরণ: ফাইলের সাইজ এবং অন্যান্য তথ্য সংগ্রহ
Dim fso, file, filePath
filePath = "C:\Path\To\Your\File.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(filePath) Then
Set file = fso.GetFile(filePath)
MsgBox "ফাইলের নাম: " & file.Name
MsgBox "ফাইলের সাইজ: " & file.Size & " বাইট"
MsgBox "ফাইলের তৈরি তারিখ: " & file.DateCreated
MsgBox "ফাইলের শেষ পরিবর্তন তারিখ: " & file.DateLastModified
Else
MsgBox "ফাইলটি পাওয়া যায়নি!"
End If
এখানে:
file.Nameদিয়ে ফাইলের নামfile.Sizeদিয়ে ফাইলের সাইজ (বাইটে)file.DateCreatedদিয়ে ফাইলের তৈরি হওয়ার তারিখfile.DateLastModifiedদিয়ে ফাইলের শেষ পরিবর্তন হওয়া তারিখ পাওয়া যায়।
ফোল্ডারের তথ্য সংগ্রহ করা
ফোল্ডারের মধ্যে থাকা ফাইল এবং সাবফোল্ডার গুলোর তথ্য সংগ্রহ করার জন্য GetFolder এবং GetFiles পদ্ধতি ব্যবহার করা হয়।
উদাহরণ: ফোল্ডারের মধ্যে থাকা ফাইলের নাম সংগ্রহ
Dim fso, folder, file, folderPath
folderPath = "C:\Path\To\Your\Folder"
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(folderPath) Then
Set folder = fso.GetFolder(folderPath)
For Each file In folder.Files
MsgBox "ফাইলের নাম: " & file.Name
Next
Else
MsgBox "ফোল্ডারটি পাওয়া যায়নি!"
End If
এখানে:
folder.Filesএর মাধ্যমে ফোল্ডারের মধ্যে থাকা সকল ফাইলের নাম সংগ্রহ করা হয়।
ফোল্ডারের মধ্যে সাবফোল্ডার গুলোর তথ্য সংগ্রহ
আপনি যদি একটি ফোল্ডারের মধ্যে থাকা সব সাবফোল্ডারের নামও সংগ্রহ করতে চান, তাহলে GetSubfolders পদ্ধতি ব্যবহার করতে পারেন।
উদাহরণ: ফোল্ডারের মধ্যে থাকা সাবফোল্ডারের নাম সংগ্রহ
Dim fso, folder, subfolder, folderPath
folderPath = "C:\Path\To\Your\Folder"
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(folderPath) Then
Set folder = fso.GetFolder(folderPath)
For Each subfolder In folder.Subfolders
MsgBox "সাবফোল্ডারের নাম: " & subfolder.Name
Next
Else
MsgBox "ফোল্ডারটি পাওয়া যায়নি!"
End If
এখানে:
folder.Subfoldersএর মাধ্যমে ফোল্ডারের মধ্যে থাকা সকল সাবফোল্ডারের নাম সংগ্রহ করা হয়।
সারাংশ
FileSystemObject (FSO) এর মাধ্যমে আপনি VBScript এ ফাইল এবং ফোল্ডারের বিভিন্ন তথ্য সংগ্রহ করতে পারেন। এটি ফাইলের নাম, সাইজ, তৈরি হওয়ার তারিখ, এবং ফোল্ডারের মধ্যে থাকা ফাইল এবং সাবফোল্ডারের নাম বের করার জন্য ব্যবহৃত হয়। GetFile, GetFolder, GetFiles, এবং GetSubfolders পদ্ধতির মাধ্যমে এই কাজগুলো করা সম্ভব। FSO এর সাহায্যে ফাইল এবং ফোল্ডারের সাথে সম্পর্কিত অন্যান্য অপারেশনও করা যেতে পারে।
Read more
