الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود صحيح لا يعمل عندي !

مغلق
بدأه مبرمج مبتدا في 16 يناير 2008 · 8 رد · 725 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اليس هذا الكود صحيح ؟؟

Shell ("C:\windows\system32\winmine.exe",vbNormalFocus)
startingprogremmer.jpg
#2

اسف

الكود يعمل

ولكنه لا يعمل اذا كان الملف txt ما العمل ؟؟

startingprogremmer.jpg
#3

اتصور

Shell ("C:\windows\system32\notepad.exe c:\test.txt",vbNormalFocus)

Do as I say, not as I do

We are Anonymous. We are Legion. We don't forgive. We don't forget

#4

أخي القوس ليس في مكانه الصحيح أصلا كيف عمل معك هذا الكود المفروض أن يكون كذلك

Shell ("C:\windows\system32\notepad.exe c:\test.txt"), vbNormalFocus

من أقوال الأئمة

الإمام علي بن أبي طالب -رضي الله عنه-: "الناس ثلاثة : فعالم رباني ، ومتعلم على سبيل النجاة ، وهمج رِعاع غوغاء أتباع كل ناعق ، يميلون مع كل ريح ، لم يستضيئوا بنور العلم ، ولم يلجئوا إلى ركن وثيق".

الإمام مالك -رحمه الله- : " لن يصلح آخر هذه الأمة إلا بما أصلح به أولها ".

الإمام الأوزاعي -رحمه الله- : " عليك بآثار من سلف وإن رفضك الناس وإياك وآراء الرجال وإن زخرفوه لك بالقول ".

الإمام الفضيل بن عياض -رحمه الله- : " عليك بطرق الهدى و لا يضرك قلة السالكين و إياك و طرق الضلالة ولا يغرك كثرة الهالكين ".

علامة الزمان الإمام الألباني -رحمه الله- : " إن الخلاص إلى أيدي هؤلاء الشباب يتمثل في أمرين لا ثالث لهما ؛ التصفية والتربية ".

وكل خير في اتباع من سلف وكل شر في ابتداع من خلف

#5
اقتباس
Shell ("C:\windows\system32\notepad.exe c:\test.txt"), vbNormalFocus

بعد إذنك أخي باسم هذه هي الصيغة

Function Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Double

أما بالنسبة لعدم عمل الكود ذلك لأنها لا تشغل إلا الملفات التنفيذية فهي لا تستطيع تشغيل ملفات النص على سبيل المثال

اقتباس
Function Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Double

Member of VBA.Interaction

Runs an executable program

هذا والله أعلم

#6

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

هذا المشروع لتشغيل الملف فى البرنامج المرتبط به

ان وضعت اى امداد و مجلد يبحث عن الملف و المجلد و عمل shell

هذا الكود منقول و انا وضعته فى مشروع للفائدة

و اتمنى ان يكون ما تبحث عنه ان شاء الله

shell.rar

الإدارة: برجاء عدم وضع صور كبيرة بالتوقيع.

#8
خلدون خالد2 كتب:
بعد إذنك أخي باسم هذه هي الصيغة

Function Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Double

أما بالنسبة لعدم عمل الكود ذلك لأنها لا تشغل إلا الملفات التنفيذية فهي لا تستطيع تشغيل ملفات النص على سبيل المثال

هذا والله أعلم

ألسنا في منتدى فيجوال بيسك 6 ؟!!!

عموما صيغتك لم تعمل معي هل يمكن أن تضع مثال محدد لهذه الصيغة حتى يتسنى لي تجربتها

أما بالنسبة لصيغتي فقد وضعتها في form load وعملت معي بشكل سليم تماما وفتحت ملف التكست المطلوب بدون أي مشاكل

من أقوال الأئمة

الإمام علي بن أبي طالب -رضي الله عنه-: "الناس ثلاثة : فعالم رباني ، ومتعلم على سبيل النجاة ، وهمج رِعاع غوغاء أتباع كل ناعق ، يميلون مع كل ريح ، لم يستضيئوا بنور العلم ، ولم يلجئوا إلى ركن وثيق".

الإمام مالك -رحمه الله- : " لن يصلح آخر هذه الأمة إلا بما أصلح به أولها ".

الإمام الأوزاعي -رحمه الله- : " عليك بآثار من سلف وإن رفضك الناس وإياك وآراء الرجال وإن زخرفوه لك بالقول ".

الإمام الفضيل بن عياض -رحمه الله- : " عليك بطرق الهدى و لا يضرك قلة السالكين و إياك و طرق الضلالة ولا يغرك كثرة الهالكين ".

علامة الزمان الإمام الألباني -رحمه الله- : " إن الخلاص إلى أيدي هؤلاء الشباب يتمثل في أمرين لا ثالث لهما ؛ التصفية والتربية ".

وكل خير في اتباع من سلف وكل شر في ابتداع من خلف

#9
اقتباس
ألسنا في منتدى فيجوال بيسك 6 ؟!!!

عموما صيغتك لم تعمل معي هل يمكن أن تضع مثال محدد لهذه الصيغة حتى يتسنى لي تجربتها

أما بالنسبة لصيغتي فقد وضعتها في form load وعملت معي بشكل سليم تماما وفتحت ملف التكست المطلوب بدون أي مشاكل

هي بالمناسبة ليست صيغتي إنها صيغة ال Object Browser الخاص بال VB6

إضغط F2 للوصول إليه و اكتب في خانة البحث Shell فتظهر لك الصيغة

تحياتي

هذا الموضوع مغلق.

مواضيع مشابهة