Internet Explorer অবজেক্ট ব্যবহার করে ওয়েব পেজ ম্যানিপুলেশন

ওয়েব স্ক্র্যাপিং এবং ইন্টারনেট অবজেক্টস - ভিবিস্ক্রিপ্ট (VBScript) - Web Development

216

VBScript এর মাধ্যমে আপনি Internet Explorer অবজেক্ট ব্যবহার করে ওয়েব পেজ ম্যানিপুলেশন করতে পারেন। Internet Explorer অবজেক্টটি একটি COM অবজেক্ট, যা আপনাকে IE ব্রাউজার ইন্সট্যান্স তৈরি, ওয়েব পেজে ইন্টারঅ্যাক্ট করা এবং পেজের উপাদানসমূহ ম্যানিপুলেট করতে সাহায্য করে। এটি বিশেষভাবে ওয়েব স্ক্র্যাপিং, অটোমেশন এবং ডেভেলপমেন্ট টাস্কে ব্যবহৃত হতে পারে।


Internet Explorer অবজেক্ট ব্যবহার করা

Internet Explorer অবজেক্টটি ব্যবহার করার জন্য, প্রথমে আপনাকে CreateObject ফাংশনের মাধ্যমে এটি তৈরি করতে হবে। একবার এটি তৈরি হলে, আপনি ব্রাউজারের বিভিন্ন ফিচার যেমন URL লোড করা, DOM (Document Object Model) ইন্টারঅ্যাকশন, ফর্ম পূর্ণ করা, এবং আরও অনেক কিছু করতে পারবেন।

Internet Explorer অবজেক্ট তৈরি করা

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True  ' IE ব্রাউজারটি দৃশ্যমান করা

এখানে, CreateObject("InternetExplorer.Application") এর মাধ্যমে Internet Explorer এর একটি নতুন ইন্সট্যান্স তৈরি করা হয়েছে। IE.Visible = True সেটিংটি ব্রাউজারকে দৃশ্যমান করে তোলে।


ওয়েব পেজ লোড করা

Navigate মেথড ব্যবহার করে আপনি ওয়েব পেজ লোড করতে পারেন।

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com"  ' ওয়েব পেজ লোড করা

এখানে, IE.Navigate "http://www.example.com" লাইনটি ওয়েব পেজটি লোড করতে ব্যবহৃত হচ্ছে।


পেজের ডকুমেন্ট অবজেক্ট মডেল (DOM) এর সাথে ইন্টারঅ্যাক্ট করা

একবার পেজ লোড হয়ে গেলে, আপনি DOM (Document Object Model) এর মাধ্যমে পেজের উপাদানগুলো যেমন টেক্সট, লিঙ্ক, বাটন ইত্যাদি ম্যানিপুলেট করতে পারেন। আপনি ফর্ম ফিল্ডের মান পরিবর্তন করতে, পেজের লিঙ্ক অনুসরণ করতে এবং অন্যান্য ইন্টারঅ্যাকশন করতে পারবেন।

উদাহরণ: ফর্মের ইনপুট ভ্যালু সেট করা

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com/login"  ' লোগিন পেজ লোড করা

' পেজ লোড হওয়ার পর
Do While IE.Busy Or IE.ReadyState <> 4
    WScript.Sleep 100
Loop

' ফর্মের ইনপুট ফিল্ডে মান প্রবেশ করা
IE.document.getElementById("username").value = "your_username"
IE.document.getElementById("password").value = "your_password"

' ফর্ম সাবমিট করা
IE.document.getElementById("loginForm").submit

এখানে, getElementById("username").value এবং getElementById("password").value ব্যবহার করে ইনপুট ফিল্ডের মান পরিবর্তন করা হচ্ছে এবং submit মেথড ব্যবহার করে ফর্মটি সাবমিট করা হচ্ছে।


ওয়েব পেজে লিঙ্ক ক্লিক করা

আপনি ওয়েব পেজের কোনো লিঙ্ক ক্লিক করতে click মেথড ব্যবহার করতে পারেন। এটি পেজের ট্যাগ বা অন্যান্য ইন্টারঅ্যাকটিভ উপাদান নিয়ে কাজ করতে পারে।

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com"

' পেজ লোড হওয়ার পর
Do While IE.Busy Or IE.ReadyState <> 4
    WScript.Sleep 100
Loop

' লিঙ্ক ক্লিক করা
IE.document.getElementById("link_id").Click

এখানে, getElementById("link_id").Click মেথডটি পেজে থাকা একটি লিঙ্ককে ক্লিক করার জন্য ব্যবহৃত হচ্ছে।


পেজের HTML কনটেন্ট পড়া

body.innerHTML বা document.body.createTextRange() মেথড ব্যবহার করে আপনি পেজের HTML কনটেন্ট পড়তে পারেন।

Dim IE, htmlContent
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com"

' পেজ লোড হওয়ার পর
Do While IE.Busy Or IE.ReadyState <> 4
    WScript.Sleep 100
Loop

' HTML কনটেন্ট পড়া
htmlContent = IE.document.body.innerHTML
MsgBox htmlContent

এখানে, innerHTML ব্যবহার করে পেজের মূল কনটেন্টটি পড়া হচ্ছে এবং মেসেজ বক্সে প্রদর্শিত হচ্ছে।


ওয়েব পেজ থেকে টেক্সট সংগ্রহ করা

এটি একটি সাধারণ উদাহরণ, যেখানে পেজের নির্দিষ্ট এলিমেন্ট থেকে টেক্সট সংগ্রহ করা হচ্ছে।

Dim IE, text
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com"

' পেজ লোড হওয়ার পর
Do While IE.Busy Or IE.ReadyState <> 4
    WScript.Sleep 100
Loop

' পেজের একটি প্যারাগ্রাফ থেকে টেক্সট সংগ্রহ করা
text = IE.document.getElementsByTagName("p")(0).innerText
MsgBox text

এখানে, প্রথম প্যারাগ্রাফের টেক্সট সংগ্রহ করে মেসেজ বক্সে প্রদর্শিত হচ্ছে।


Internet Explorer অবজেক্ট বন্ধ করা

একবার আপনার কাজ শেষ হলে, আপনি Quit মেথড ব্যবহার করে Internet Explorer অবজেক্টটি বন্ধ করতে পারেন।

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.example.com"

' কিছু সময় পরে IE বন্ধ করা
WScript.Sleep 5000
IE.Quit

এখানে, IE.Quit মেথডটি ব্রাউজারটি বন্ধ করে দেয়।


সারাংশ

VBScript এর মাধ্যমে Internet Explorer অবজেক্ট ব্যবহার করে আপনি ওয়েব পেজের সাথে বিভিন্ন ধরনের ইন্টারঅ্যাকশন করতে পারেন, যেমন ফর্ম ফিল্ডে মান প্রবেশ করা, লিঙ্ক ক্লিক করা, HTML কনটেন্ট পড়া, টেক্সট সংগ্রহ করা ইত্যাদি। এই ধরনের স্ক্রিপ্টিং অটোমেশন এবং ওয়েব স্ক্র্যাপিং এর জন্য খুবই কার্যকরী। Internet Explorer অবজেক্ট এর মাধ্যমে VBScript একটি ওয়েব পেজে সব ধরনের ম্যানিপুলেশন ও ইন্টারঅ্যাকশন সহজে সম্পাদন করতে সক্ষম হয়।

Content added By
Promotion

Are you sure to start over?

Loading...