ভিবিস্ক্রিপ্টে 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 অত্যন্ত কার্যকরী এবং গুরুত্বপূর্ণ একটি টুল যা ভিবিস্ক্রিপ্টের মাধ্যমে সিস্টেম ফাইল পরিচালনা করার জন্য ব্যবহৃত হয়।
Read more
