مقدمة إلى VBScript

Wednesday, August 13, 2008 | Labels: | |


بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .


في هذا الدرس سوف نتعرف على مبادئ استخدام VBScript واستخدامها في تطبيقات بسيطة ، وفي سلسلة دروس قادمة ربما نتوسع في شرح مفاهيم هذه اللغة واستخدامتها بشكل أكثر توسعا ...

أولاً : ما هي ال VBScript ؟


هي لغة نصية Script تشبه في طريقة كتابتها ال Visual Basic ولكنها تقوم بالعمل على الانترنت حيث تعمل مباشرة على المتصفح .


ثانياً : لماذا نستخدم VBScript ؟


نستخدم هذه اللغة لنقوم بتنفيذ بعض الأوامر على جهاز المستخدم مثل التحقق الأولي من المدخلات وعمل بعض الميزات الاضافية للصفحة التي لا تستطيع HTML القيام بها ، أيضاً يمكنك من خلال هذه اللغة تشغيل المكونات الاضافية مثل ActiceX و بعض ال Java Applets ، كما انها تستخدم أيضاً كلغة للبرمجة على السيرفر بجانب ASP مثلاً .
والجدير بالذكر انه يعيب VBScript مقارنة ب JavaScript مثلاً انها أقل تحكماً منها وأقل امكانيات ، كما أن دعمها على المتصفحات الأخرى ( نتسكيب مثلاً قبل توقف اصداره مؤخراً ) أقل ، ولكنها تظل رغم ذلك أحد الحلول السهلة لمبرمجي Visual Basic .



ثالثاً : لكي نبدأ ...


قبل البداية يفترض من قارئ هذه الدروس ان يكون لديه خلفية ولو بسيطة بكيفية استخدام وسوم HTML كما يفترض ايضاً ان يكون مبرمج باستخدام فيجوال بيسك لإننا لن نتطرق لشرح أساسيات اللغة ، أيضاً سنقوم خلال هذه الدروس باستخدام المفكرة لتسهيل المهمة مع العلم أن بامكاننا استخدام برامج مثل FrontPage و Microsft Visual InterDev .


رابعاً : العناصر الأساسية للغة .


- بالنسبة للتصريح عن المتغيرات Variables فيتم باستخدام Dim كما في الفيجوال بيسك تماماً ، ويمكن اسناد القيم لها بنفس الطريقة ولكن لا يمكن تعريف نوع المتغير :

Dim X,Y 'true
Dim R as string
'false
Dim myname="ahmed gamal" ' true



- يمكن العناصر الأساسية للغة مثل الجمل الشرطية If statements ، والمصفوفات Arrays ، وجملة Select Case ، والدوال والإجراءات Sub & Functions بنفس الطريقة كما في الفيجوال بيسك .

- وكذلك الأمر بالنسبة للحلقات التكرارية Loops ما عدا انه في حالة For Next فسوف يكون الأمر بالشكل التالي :








For i=0 To 10

' do something here


Next





- الكائن الأساسي في اللغة هو Document والذي يمكن من خلاله الطباعة مثلاً :








Document.write "ahmed gamal"





- أو تغيير لون الصفحة :








Document.bgColor = "#ff00ff"






- أخيراً لكي تعمل هذه اللغة توضع الأوامر بين هذين العلامتين :








<Script Language="VBScript">

' code here

</Script>




 



خامساً : لنبدأ بعمل تطبيقات بسيطة ...


سنقوم خلال هذا القسم بوضع بعض الأمثلة البسيطة التي توضح كيفية عمل اللغة :





1- ادخال اسم المستخدم وعرضه في رسالة .







قم بفتح نسخة جديدة من المفكرة ، قم بكتابة الكود التالي :









<Script Language="VBScript">

Dim myname


myname = InputBox("فضلاً قم بادخال الاسم","ادخال الاسم")


Msgbox myname


</script>







ثم قم بحفظ الملف باسم myexample.htm أو .html - قم بتشغيل هذه الصفحة على المتصفح لديك .

وكما هو واضح من الأمر السابق ، قمنا بوضع علامة البرمجة ب Script ، ومن ثم قمنا بتعريف المتغير ، طلب ادخال من المستخدم وأخيراً عرضه في رسالة نصية .


2- ادخال اسم المستخدم وطباعته على الصفحة .





في هذا المثال سأفترض أن لك لديك خلفية عن التعامل مع HTML ، ولذا سنفترض اننا قمنا بعمل صفحة تحتوي على فورم - مربع نص - وزر أمر بالشكل التالي :








<form name="form1">

Enter Your Name:


<br>


<input type=text name=text1 value="">


<br>


<input type=button name=cmd1 value="Print Name">


</form>





والآن سنحاول قراءة الاسم من مربع النص هذا ومن ثم نقوم بطباعته باستخدام أمر Document.write ، ولهذا سنقوم بانشاء اجراء يحدث بعد الضغط على الزر المسمى باسم cmd1 ، بالشكل التالي :










<script language="vbscript">

sub cmd1_onClick()


End sub


</script>





والآن وفي وسط هذا الإجراء سوف نضيف أمر الطباعة بالشكل التالي :








Document.write form1.text1.value






3- تغيير لون الصفحة حسب اختيار المستخدم من بين ثلاثة ألوان في radiobuttons .



مجدداً سأفترض معرفتك ب HTML لتنشأ صفحة بالشكل التالي :










<form name="form1">

Enter Your Color: <br>


<input type=radio name=r1 value="a1"> Blue


<input type=radio name=r1 value="a2"> Red


<input type=radio name=r1 value="a3"> Green


<br>


<input type=button name=cmd1 value="Change Color">


</form>






والآن سنقوم ببرمجة أمر يعتمد على الجمل الشرطية لمعرفة اختيار المستخدم ومن ثم تغيير لون الصفحة بناء على ذلك :










<script language="vbscript">

sub cmd1_onClick()


if form1.r1(0).checked=true then


Document.bgColor = "#0000FF"


elseif form1.r1(1).checked=true then


Document.bgColor = "#FF0000"


elseif form1.r1(2).checked=true then


Document.bgColor = "#00FF00"


else


msgbox " there is no options"


End if


End sub


</script>



 


4 - عرض الوقت والتاريخ :





بكل بساطة ما عليك سوى كتابة الأمر التالي :








<script language="vbscript">

document.write Date


</script>






والآن سنقوم بطباعة كلمة التاريخ وبجانبها التاريخ الحالي ، ومن ثم سطر جديد ومن ثم الوقت بلون آخر وذلك بالشكل التالي ( استخدام HTML في وسط أمر الطباعة ) :








<script language="vbscript">

document.write "Date :"


document.write Date


document.write "<br>"


document.write "<font color=red><b> Time: "


document.write Time


document.write "</font></b><hr>"


</script>





5- عرض الوقت والتاريخ ثانية بثانية من خلال استخدام Timer :





سنستخدم الأمر السابق ، كل ما سنقوم باضافته هو أن سيحصل عملية تحديث Reresh للصفحة كل ثانية مثلاً ، لذا سيكون الأمر بالشكل التالي :










mTimer = window.setInterval( "myTime()", 1000, "VBScript" )







في السطر السابق حددنا اننا كل 1000 ميلي ثانية = ثانية واحدة سوف نستدعي الدالة myTime .

وفي برمجة الدالة myTime :








sub myTime()

window.location.reload()


end sub







هكذا نكون قد وصلنا إلى نهاية الدرس ، وأتمنى من الله أن أكون قد وفقت في ايصال المعلومة .



والسلام عليكم ورحمة الله وبركاته ...

0 comments: