ফাইল ম্যানিপুলেশন

VBScript এ ফাইল ম্যানিপুলেশন (ফাইল তৈরি, পড়া, লেখা, এবং মুছে ফেলা) করার জন্য FileSystemObject (FSO) ব্যবহৃত হয়। এটি একটি শক্তিশালী অবজেক্ট যা আপনাকে ফাইল এবং ফোল্ডার পরিচালনা করতে সক্ষম করে। FileSystemObject ব্যবহার করে আপনি ফাইল তৈরি, ফাইল পড়া, নতুন ডিরেক্টরি তৈরি, ফাইলের অ্যাট্রিবিউট চেক করা, এবং ফাইল মুছে ফেলাসহ বিভিন্ন ফাইল-সম্পর্কিত কাজ করতে পারেন।

FileSystemObject এর ব্যবহার

FileSystemObject (FSO) ব্যবহার করার জন্য, প্রথমে এটি তৈরি করতে হবে। উদাহরণস্বরূপ:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

এখন, আমরা বিভিন্ন ফাইল ম্যানিপুলেশন সম্পর্কিত কাজগুলো ফাইল সিস্টেম অবজেক্টের সাহায্যে করতে পারব।

ফাইল তৈরি করা (Creating a File)

ফাইল তৈরি করার জন্য CreateTextFile মেথড ব্যবহার করা হয়। এটি একটি নতুন ফাইল তৈরি করবে এবং তাতে লেখার অনুমতি দিবে।

উদাহরণ:

Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল তৈরি করা
Set file = fso.CreateTextFile("C:\example.txt", True)
file.WriteLine("Hello, this is a test file.")
file.Close

এখানে, "C:\example.txt" নামক একটি নতুন টেক্সট ফাইল তৈরি হবে এবং এতে একটি লাইন লেখা হবে।

ফাইল পড়া (Reading a File)

ফাইল পড়তে OpenTextFile মেথড ব্যবহার করা হয়। এটি ফাইলটি ওপেন করে তার কনটেন্ট পড়ে এবং সেই কনটেন্ট প্রদর্শন করতে সাহায্য করে।

উদাহরণ:

Dim fso, file, fileContent
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল পড়া
Set file = fso.OpenTextFile("C:\example.txt", 1) ' 1 = For Reading
fileContent = file.ReadAll
file.Close

MsgBox fileContent

এখানে, "C:\example.txt" ফাইলটি পড়া হবে এবং তার কনটেন্ট একটি মেসেজ বক্সে প্রদর্শন হবে।

ফাইল লেখা (Writing to a File)

ফাইলের মধ্যে লেখা লেখার জন্য Write অথবা WriteLine মেথড ব্যবহার করা হয়। Write শুধুমাত্র লেখার জন্য এবং WriteLine একটি নতুন লাইন যোগ করার জন্য ব্যবহৃত হয়।

উদাহরণ:

Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল লেখা
Set file = fso.OpenTextFile("C:\example.txt", 2, True) ' 2 = For Writing
file.WriteLine("This is a new line added to the file.")
file.Close

এখানে, "C:\example.txt" ফাইলের শেষে একটি নতুন লাইন যোগ করা হবে।

ফাইল মুছে ফেলা (Deleting a File)

ফাইল মুছে ফেলতে DeleteFile মেথড ব্যবহার করা হয়।

উদাহরণ:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল মুছে ফেলা
If fso.FileExists("C:\example.txt") Then
    fso.DeleteFile("C:\example.txt")
    MsgBox "ফাইলটি মুছে ফেলা হয়েছে।"
Else
    MsgBox "ফাইলটি পাওয়া যায়নি।"
End If

এখানে, "C:\example.txt" ফাইলটি যদি বিদ্যমান থাকে তবে তা মুছে ফেলা হবে।

ফোল্ডার তৈরি এবং মুছে ফেলা (Creating and Deleting Folders)

ফোল্ডার তৈরি করার জন্য CreateFolder এবং মুছে ফেলার জন্য DeleteFolder মেথড ব্যবহার করা হয়।

ফোল্ডার তৈরি করা:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার তৈরি করা
If Not fso.FolderExists("C:\ExampleFolder") Then
    fso.CreateFolder("C:\ExampleFolder")
    MsgBox "ফোল্ডার তৈরি হয়েছে।"
Else
    MsgBox "ফোল্ডার ইতিমধ্যে আছে।"
End If

ফোল্ডার মুছে ফেলা:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার মুছে ফেলা
If fso.FolderExists("C:\ExampleFolder") Then
    fso.DeleteFolder("C:\ExampleFolder")
    MsgBox "ফোল্ডার মুছে ফেলা হয়েছে।"
Else
    MsgBox "ফোল্ডারটি পাওয়া যায়নি।"
End If

সারাংশ

VBScript এর মাধ্যমে ফাইল এবং ফোল্ডার ম্যানিপুলেশন অনেক সহজে করা যায়। FileSystemObject (FSO) ব্যবহার করে আপনি ফাইল তৈরি, পড়া, লেখা, মুছে ফেলা, এবং ফোল্ডার তৈরি বা মুছে ফেলা সহ অন্যান্য অনেক কাজ করতে পারবেন। এটি Windows অপারেটিং সিস্টেমে সিস্টেম প্রশাসনের কাজে বা অন্যান্য অটোমেশন স্ক্রিপ্টে ব্যবহৃত হয়।

ভিবিস্ক্রিপ্ট (VBScript) এর মাধ্যমে আপনি কম্পিউটার ফাইল তৈরি, পড়া, লেখা এবং মুছে ফেলতে পারেন। এটি FileSystemObject (FSO) এর সাহায্যে সম্ভব, যা একটি গুরুত্বপূর্ণ অবজেক্ট। এই অবজেক্টের মাধ্যমে আপনি ফাইল এবং ডিরেক্টরি পরিচালনা করতে পারেন।

FileSystemObject (FSO) পরিচিতি

FileSystemObject (FSO) হলো একটি VBScript অবজেক্ট যা ফাইল এবং ফোল্ডার পরিচালনা করতে ব্যবহৃত হয়। এর মাধ্যমে ফাইল তৈরি, পড়া, লেখা, কপি করা এবং মুছে ফেলা যেতে পারে।

ফাইল তৈরি (Creating a File)

ফাইল তৈরি করার জন্য FileSystemObject এর CreateTextFile মেথড ব্যবহার করা হয়। এটি একটি নতুন টেক্সট ফাইল তৈরি করে।

উদাহরণ:

Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")

' নতুন ফাইল তৈরি করা
Set file = fso.CreateTextFile("C:\testfile.txt", True)

' ফাইলের মধ্যে কিছু লেখা
file.WriteLine("Hello, this is a test file.")

' ফাইল বন্ধ করা
file.Close

Set file = Nothing
Set fso = Nothing

এখানে:

• CreateTextFile মেথড ফাইলটি তৈরি করে এবং এতে লেখার সুবিধা দেয়।
• True ব্যবহার করা হলে, যদি ফাইলটি আগে থেকে থাকে, তবে সেটি ওভাররাইট করা হবে।

ফাইল পড়া (Reading a File)

ফাইল পড়ার জন্য FileSystemObject এর OpenTextFile মেথড ব্যবহার করা হয়। এই মেথডটি ফাইলটিকে পড়ার জন্য খোলে এবং এর মাধ্যমে ফাইলের কনটেন্ট রিড করা যায়।

উদাহরণ:

Dim fso, file, content
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইলটি খুলা
Set file = fso.OpenTextFile("C:\testfile.txt", 1)

' ফাইলের কনটেন্ট পড়া
content = file.ReadAll

' কনটেন্ট প্রদর্শন করা
MsgBox content

' ফাইল বন্ধ করা
file.Close

Set file = Nothing
Set fso = Nothing

এখানে:

• OpenTextFile মেথড ফাইলটি পড়ার জন্য খুলে।
• 1 প্যারামিটারটি পড়ার (Read) মোডে ফাইলটি খোলে।

ফাইলে লেখা (Writing to a File)

ফাইলের মধ্যে নতুন তথ্য লেখার জন্য FileSystemObject এর OpenTextFile মেথড ব্যবহার করা যেতে পারে। তবে, লেখার জন্য ফাইলটি For Writing মোডে খোলা হয়।

উদাহরণ:

Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইলটি লেখার জন্য খোলা
Set file = fso.OpenTextFile("C:\testfile.txt", 2, True)

' ফাইলে কিছু লেখা
file.WriteLine("This is a new line in the file.")

' ফাইল বন্ধ করা
file.Close

Set file = Nothing
Set fso = Nothing

এখানে:

• 2 প্যারামিটারটি ফাইলটি লেখার (Write) মোডে খোলে।
• True প্যারামিটারটি ব্যবহার করলে ফাইলটি তৈরি হয় যদি পূর্বে না থাকে।

ফাইল মুছে ফেলা (Deleting a File)

ফাইল মুছে ফেলতে FileSystemObject এর DeleteFile মেথড ব্যবহার করা হয়।

উদাহরণ:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল মুছে ফেলা
fso.DeleteFile("C:\testfile.txt")

Set fso = Nothing

এখানে:

• DeleteFile মেথডটি নির্দিষ্ট ফাইলটি মুছে ফেলতে ব্যবহৃত হয়।

সারাংশ

ভিবিস্ক্রিপ্ট (VBScript) এর মাধ্যমে FileSystemObject (FSO) ব্যবহার করে আপনি ফাইল তৈরি, পড়া, লেখা এবং মুছে ফেলতে পারেন। এই প্রক্রিয়াগুলি সঠিকভাবে কাজ করার জন্য CreateTextFile, OpenTextFile, WriteLine, এবং DeleteFile মেথডগুলো ব্যবহার করা হয়। FSO ব্যবহারের মাধ্যমে আপনি কম্পিউটারে ফাইল ব্যবস্থাপনা সহজেই করতে পারবেন।

ভিবিস্ক্রিপ্টে Text ফাইল এর সাথে কাজ করার জন্য FileSystemObject (FSO) ব্যবহার করা হয়। এটি ফাইল তৈরি, পড়া, লেখা, মুছে ফেলা এবং ফোল্ডার পরিচালনার জন্য একটি গুরুত্বপূর্ণ কম্পোনেন্ট। এই গাইডে আমরা দেখব কীভাবে Text ফাইল এর সাথে পড়া এবং লেখা করা যায়।

FileSystemObject ব্যবহার করা

FileSystemObject হল একটি অবজেক্ট যা ফাইল এবং ফোল্ডার সংক্রান্ত বিভিন্ন কাজ করার জন্য ব্যবহৃত হয়। এর মাধ্যমে আপনি ফাইল খুলতে, পড়তে, লিখতে এবং ফাইলের বিভিন্ন বৈশিষ্ট্য পরীক্ষা করতে পারেন।

ফাইলের সাথে কাজ করার জন্য প্রথমে FileSystemObject তৈরি করতে হয়:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

Text ফাইল পড়া (Reading)

Text ফাইল পড়তে হলে, আপনাকে ফাইলটি Open করতে হবে এবং তারপর Read বা ReadLine মেথড ব্যবহার করতে হবে।

Text ফাইল পড়ার উদাহরণ:

Dim fso, file, filePath, line
filePath = "C:\path\to\your\file.txt"

Set fso = CreateObject("Scripting.FileSystemObject")

If fso.FileExists(filePath) Then
    Set file = fso.OpenTextFile(filePath, 1) ' 1 = ForReading
    Do Until file.AtEndOfStream
        line = file.ReadLine
        MsgBox line
    Loop
    file.Close
Else
    MsgBox "ফাইলটি পাওয়া যায়নি!"
End If

এখানে:

• OpenTextFile(filePath, 1): ফাইলটি পড়ার জন্য খোলা হচ্ছে। প্রথম আর্গুমেন্ট হল ফাইলের পাথ এবং দ্বিতীয় আর্গুমেন্টটি 1 যা "ForReading" নির্দেশ করে।
• ReadLine: একে একে প্রতিটি লাইন পড়ে ফেলা হবে।
• AtEndOfStream: ফাইলের শেষ পর্যন্ত পৌঁছানো হলে লুপ থেমে যাবে।
• Close: ফাইল বন্ধ করা হচ্ছে।

Text ফাইল লেখা (Writing)

Text ফাইলে লেখা করার জন্য OpenTextFile মেথডে ForWriting অথবা ForAppending ব্যবহার করা হয়। ForWriting ব্যবহারে ফাইলের পুরনো কনটেন্ট মুছে গিয়ে নতুন লেখা যোগ হবে, আর ForAppending ব্যবহারে পুরনো কনটেন্ট বজায় রেখে নতুন লেখা যোগ হবে।

Text ফাইলে নতুন লেখা লেখার উদাহরণ:

Dim fso, file, filePath
filePath = "C:\path\to\your\file.txt"

Set fso = CreateObject("Scripting.FileSystemObject")

Set file = fso.OpenTextFile(filePath, 2, True) ' 2 = ForWriting, True = Create if not exists
file.WriteLine "এটি নতুন লাইন যা ফাইলে লেখা হচ্ছে!"
file.Close

এখানে:

• OpenTextFile(filePath, 2, True): ফাইলটি লেখার জন্য খোলা হচ্ছে। দ্বিতীয় আর্গুমেন্ট 2 হল "ForWriting" এবং তৃতীয় আর্গুমেন্ট True হল "Create if not exists" (যদি ফাইল না থাকে, তবে তৈরি হবে)।
• WriteLine: একটি নতুন লাইন লেখা হচ্ছে।

Text ফাইলে অ্যাপেন্ড (Append) করার উদাহরণ:

Dim fso, file, filePath
filePath = "C:\path\to\your\file.txt"

Set fso = CreateObject("Scripting.FileSystemObject")

Set file = fso.OpenTextFile(filePath, 8, True) ' 8 = ForAppending
file.WriteLine "এটি নতুন লাইন যা পুরানো কনটেন্টের সাথে যোগ করা হয়েছে!"
file.Close

এখানে:

• OpenTextFile(filePath, 8, True): ফাইলটি অ্যাপেন্ড করার জন্য খোলা হচ্ছে। দ্বিতীয় আর্গুমেন্ট 8 হল "ForAppending"।

Text ফাইল তৈরি এবং লেখা

নতুন ফাইল তৈরি এবং তাতে লেখা করার জন্য আপনি CreateTextFile মেথড ব্যবহার করতে পারেন।

নতুন Text ফাইল তৈরি এবং লেখা:

Dim fso, file, filePath
filePath = "C:\path\to\your\newfile.txt"

Set fso = CreateObject("Scripting.FileSystemObject")

Set file = fso.CreateTextFile(filePath, True) ' True = overwrite if file exists
file.WriteLine "এই ফাইলটি নতুন করে তৈরি এবং লেখা হয়েছে!"
file.Close

এখানে:

• CreateTextFile(filePath, True): নতুন ফাইল তৈরি করছে এবং পুরনো ফাইল থাকলে সেটি ওভাররাইট করবে।

সারাংশ

VBScript এ Text ফাইলের সাথে কাজ করার জন্য FileSystemObject (FSO) ব্যবহার করা হয়। এর মাধ্যমে আপনি ফাইল পড়তে, লিখতে এবং তৈরি করতে পারেন। OpenTextFile মেথড দিয়ে ফাইল পড়া এবং লেখা হয়, এবং CreateTextFile দিয়ে নতুন ফাইল তৈরি করা হয়। WriteLine মেথড দিয়ে ফাইলে লেখা হয়, এবং ReadLine দিয়ে ফাইল থেকে লাইন পড়া হয়।

ফাইলের সাথে কাজ করার সময় FileSystemObject অত্যন্ত কার্যকরী এবং গুরুত্বপূর্ণ একটি টুল যা ভিবিস্ক্রিপ্টের মাধ্যমে সিস্টেম ফাইল পরিচালনা করার জন্য ব্যবহৃত হয়।

VBScript তে ফোল্ডার ম্যানিপুলেশন করার জন্য FileSystemObject (FSO) ব্যবহার করা হয়। FSO হল VBScript এর একটি কম্পোনেন্ট, যা ফাইল এবং ফোল্ডার সংক্রান্ত বিভিন্ন কার্যকলাপ পরিচালনা করতে সহায়তা করে। এর মাধ্যমে আপনি ফোল্ডার তৈরি, ফোল্ডার অপসারণ, ফোল্ডার চেক করা, ফোল্ডারে ফাইল কপি বা মুভ করা ইত্যাদি কাজ করতে পারেন।

FileSystemObject (FSO)

FileSystemObject (FSO) হল একটি অবজেক্ট, যার মাধ্যমে আপনি ফাইল এবং ফোল্ডারের সাথে কাজ করতে পারেন। FSO এর কিছু সাধারণ মেথড হল:

• CreateFolder: নতুন ফোল্ডার তৈরি করা।
• DeleteFolder: ফোল্ডার মুছে ফেলা।
• GetFolder: ফোল্ডারের তথ্য পাওয়া।
• FolderExists: ফোল্ডার আছে কি না তা পরীক্ষা করা।

ফোল্ডার তৈরি করা (Create Folder)

VBScript তে একটি নতুন ফোল্ডার তৈরি করতে FileSystemObject এর CreateFolder মেথড ব্যবহার করা হয়।

উদাহরণ:

Dim fso, folder
Set fso = CreateObject("Scripting.FileSystemObject")

' নতুন ফোল্ডার তৈরি করা
Set folder = fso.CreateFolder("C:\MyFolder")

If fso.FolderExists("C:\MyFolder") Then
    MsgBox "ফোল্ডার তৈরি হয়েছে!"
Else
    MsgBox "ফোল্ডার তৈরি করা সম্ভব হয়নি।"
End If

এখানে, CreateFolder মেথডের মাধ্যমে C:\MyFolder নামে একটি নতুন ফোল্ডার তৈরি করা হয়েছে।

ফোল্ডার মুছে ফেলা (Delete Folder)

ফোল্ডার মুছে ফেলার জন্য DeleteFolder মেথড ব্যবহার করা হয়। যদি ফোল্ডারটি খালি না থাকে, তবে আপনি প্রথমে এর মধ্যে থাকা ফাইল ও সাব-ফোল্ডারগুলো মুছে ফেলতে হবে।

উদাহরণ:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার মুছে ফেলা
If fso.FolderExists("C:\MyFolder") Then
    fso.DeleteFolder "C:\MyFolder"
    MsgBox "ফোল্ডার মুছে ফেলা হয়েছে!"
Else
    MsgBox "ফোল্ডারটি পাওয়া যায়নি।"
End If

এখানে, DeleteFolder মেথডের মাধ্যমে C:\MyFolder ফোল্ডারটি মুছে ফেলা হয়েছে।

ফোল্ডারের অস্তিত্ব পরীক্ষা করা (Check Folder Existence)

ফোল্ডারের অস্তিত্ব পরীক্ষা করার জন্য FolderExists মেথড ব্যবহার করা হয়। এটি ফোল্ডারের উপস্থিতি চেক করে এবং একটি বুলিয়ান মান (True বা False) রিটার্ন করে।

উদাহরণ:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার আছে কি না তা পরীক্ষা করা
If fso.FolderExists("C:\MyFolder") Then
    MsgBox "ফোল্ডারটি রয়েছে!"
Else
    MsgBox "ফোল্ডারটি পাওয়া যায়নি।"
End If

এখানে, FolderExists মেথডের মাধ্যমে C:\MyFolder ফোল্ডারের অস্তিত্ব পরীক্ষা করা হয়েছে।

ফোল্ডারের মধ্যে ফাইল কপি বা মুভ করা (Copy/Move Files)

আপনি ফোল্ডারের মধ্যে ফাইল কপি বা মুভ করতে CopyFile এবং MoveFile মেথড ব্যবহার করতে পারেন।

উদাহরণ: ফাইল কপি করা

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল কপি করা
fso.CopyFile "C:\Source\file.txt", "C:\Destination\file.txt"

MsgBox "ফাইল কপি করা হয়েছে!"

এখানে, CopyFile মেথডের মাধ্যমে C:\Source\file.txt ফাইলটি C:\Destination\ ফোল্ডারে কপি করা হয়েছে।

উদাহরণ: ফাইল মুভ করা

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল মুভ করা
fso.MoveFile "C:\Source\file.txt", "C:\Destination\file.txt"

MsgBox "ফাইল মুভ করা হয়েছে!"

এখানে, MoveFile মেথডের মাধ্যমে C:\Source\file.txt ফাইলটি C:\Destination\ ফোল্ডারে মুভ করা হয়েছে।

ফোল্ডারের মধ্যে ফাইল তালিকা বের করা (List Files in Folder)

ফোল্ডারের মধ্যে সমস্ত ফাইলের তালিকা বের করার জন্য GetFolder এবং Files মেথড ব্যবহার করা হয়।

উদাহরণ:

Dim fso, folder, file
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার চেক করা
Set folder = fso.GetFolder("C:\MyFolder")

' ফোল্ডারের মধ্যে সমস্ত ফাইলের তালিকা দেখানো
For Each file In folder.Files
    MsgBox "ফাইল নাম: " & file.Name
Next

এখানে, GetFolder মেথডের মাধ্যমে C:\MyFolder ফোল্ডারের মধ্যে থাকা সব ফাইলের নাম দেখানো হচ্ছে।

সারাংশ

VBScript এ ফোল্ডার ম্যানিপুলেশন করার জন্য FileSystemObject (FSO) ব্যবহার করা হয়। এটি আপনাকে ফোল্ডার তৈরি, মুছে ফেলা, অস্তিত্ব পরীক্ষা, ফাইল কপি বা মুভ করার মতো কার্যকলাপ পরিচালনা করতে সহায়তা করে। ফোল্ডার ও ফাইল ম্যানিপুলেশন সম্পর্কে আরও দক্ষ হতে, VBScript এর FSO মেথডগুলো জানা গুরুত্বপূর্ণ।

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 এর সাহায্যে ফাইল এবং ফোল্ডারের সাথে সম্পর্কিত অন্যান্য অপারেশনও করা যেতে পারে।