







السمعة:
كيف الحال أعضاء وزوار شبكة شل العربية ,عساكم بخير؟
بعد قرار شركة مايكروسوفت بإيقاف VBscript داخل نظام ويندوز حسب هذا المصدر :
VBScript deprecation: Timelines and next steps | Windows IT Pro Blog
Learn about the deprecation of Visual Basic Scripting edition.

واستكمالًا لتعليقي على هذا الموضوع داخل الشبكة :
لشرح العملية لازم نصل لبضع مفاهيم مهمة تخص الـ PowerShell :
أول شيء لازم نتكلم عنه هو COM Objects وهي تكنولوجيا تستخدمها مايكروسوفت Component Object Model لحتى تخلي البرمجيات المختلفة تقدر تتكلم مع بعضها البعض عن طريق إنشاء Binary software components , والهدف منها هي إتاحة المجال لبناء اتصال بين لغات البرمجة المختلفة أو حتى بين عمليات المعالجة المختلفة (Different Proccess)، طبعًا لو سألنا أنفسنا سؤال، على أي مستوى من لغات البرمجة مثلاً؟
بإمكانك تحكي على مستوى لغة C++ ولغة C# أو JavaScript وبناء Components للتواصل فيما بينهم, ومن الممكن أن Javascript استخدام COM Object مكتوب بلغة C++ , وحتى على صعيد الميزات لكل لغة برمجة فمثل ما نعلم أن كل لغة لها نماذج مختلفة عن الأٌخرى وميزات مختلفة أيضاً مثل (OOP و Procedural) , ومن أحد الأمثلة اللطيفة هي تشغيل notepad.exe عن طريق WScript.shell عن طريق COM Object
ولحتى أقوم بإنشاء COM Object باستخدام الـ PowerShell ،بستخدم هذا الأمر :
كود:
$shell = New-Object -ComObject WScript.Shell
اللي مسؤول عن إنشاء أوبجكت جديد قد يكون .net أو com , وأنا بعدها أقوم بتحديد الأوبجكت عن طريق تمرير باراميتر -ComObject , وبعدها أقوم بتحديد الـ (Programmatic Identifier) للـ com object وهو WScript.shell التابع لـ WSH أو Windows Script Host , ويتم تخزين هذا الأوبجكت داخل متغير اسمه $shell حتى أقدر استخدم المتغير فيما بعد لاستدعاء الأوبجكت.
مثال :
وبعدها بشغل السكربت عن طريق هذا الأمر
كود:
$shell.Run($tempFile)
مثال:
HTML:
<!DOCTYPE html>
<html>
<head>
<title>VBScript in HTA #STORM</title>
<htapublic: = "yes" />
</head>
<body>
<h1>Hello from VBScript in HTA!</h1>
<script language="VBScript">
Sub Window_OnLoad
MsgBox "Hello From Arabian Shell Network!!"
End Sub
</script>
</body>
</html>
مثل ماهو واضح من الكود المستخدم, تم تشغيل msgBOX من خلال استتدعاء VBScript
مثال :
قم بتشغيل Developer من Customize Ribbon من قائمة Options داخل word
كود:
Sub MaliciousMacro()
Dim message
message = "Hello From Arabian Shell Network!!"
MsgBox message
End Sub
وبتقوم بتشغيل السكربت وهاي النتيجة :
وهنالك طرق أُخرى أيضًا، وكان هذا بعض منها.
إن أصبت فهو من الله وإن أخطأت فهو من نفسي والشيطان.
هذا الموضوع إهداء إلى ErrorBinary ITACHI Kristof JOR-GHOST sampop OldMe أبو البراء
التعديل الأخير بواسطة المشرف: