Make your own free website on Tripod.com

فيجوال بيسك إسكربت Visual Basic Script و قياسية المستعرض Explorer

يمكنك استخدام فيجوال بيسك إسكربت Visual Basic Script أو  جافا إسكربت JavaScript مع المستعرض دون الخوف من مشاكل طارئة فالمستعرض يدعمهما ، فهو يتيح لك أن تستخدم أيهما ، فإذا قررت ان تستخدم فيجوال بيسك إسكربت Visual Basic Script ، فأبدا بالسطر التالي :

 

<script language="VBScript">
"
"
</script>

 و فيما يلي صيغتي المثال السابق بكلتا اللغتين .

 

<script language="vbscript">

Sub entrance_onClick

returnvalue=MsgBox (" أنت بصدد الانتقال لموقع مركز الكمبيوتر التربوي أو الانتقال لصفحة البداية",52,"!تحياتي ")

If returnvalue=6 Then

window.location="http://www.mbadr.hypermart.net"

Else

window.location="http://www.ahmedbadr.com"

End If

End Sub

 

</script>

 

<form>

<input type="button" name="entrance" value="انقر هنا للدخول لموقع مركز الكمبيوتر التربوي">

</form>

<script language="JavaScript">
function entrance2(){
if(navigator.appName!="Netscape")
return
if (confirm("You are about to enter a DHTML intensive site. Proceed?"))
window.location="http://www.dynamicdrive.com"
else
window.location="http://www.yahoo.com"
}
</script>

<form>

<input type="button" name="entrance" value="انقر هنا للدخول لموقع مركز الكمبيوتر التربوي">

</form>

 

 

البرنامج التالي يطلب من إدخال رقم رسالة التنبيه و من ثم يخرجها لك مع رقم الزر الذي نقرته من الرسالة :

<script language="VBscript">

 x=inputbox   ("أدخل رقم صندوق التنبيه الاختياري","رسالة التنبيه",0)

  w=x & " =هذا هو صندوق التنبيه للعدد"

tit="صندوق رسالة التنبيه"

retval=   ( MsgBox  (w ,x,tit))

y=    "أنت اخترت الزر رقم=" &   retval  

msgbox y ,0,"رقم زر الذي اخترته"

</script>



 

 

صفحة البداية ما الجديد حاليا ؟ فيجوال بيسك للتطبيقات موضوعات متقدمة فيجوال بيسك لتلاميذ المدارس

أرسل استفسارك أو تعليقك  الآن

أرسل رسالتك أو استفسارك الآن

أكتب ملاحظتك أو استفسارك أو تعليقك أو ابحث عن مواقع فيجوال بيسك أخري و غيره.....

حقوق الطبع والنسخ محفوظة  © 2000 مركز الكمبيوتر التربوي
آخر تعديل: April 15, 2001