اليس هذا الكود صحيح ؟؟
Shell ("C:\windows\system32\winmine.exe",vbNormalFocus)اتصور
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
أخي القوس ليس في مكانه الصحيح أصلا كيف عمل معك هذا الكود المفروض أن يكون كذلك
Shell ("C:\windows\system32\notepad.exe c:\test.txt"), vbNormalFocusمن أقوال الأئمة
الإمام علي بن أبي طالب -رضي الله عنه-: "الناس ثلاثة : فعالم رباني ، ومتعلم على سبيل النجاة ، وهمج رِعاع غوغاء أتباع كل ناعق ، يميلون مع كل ريح ، لم يستضيئوا بنور العلم ، ولم يلجئوا إلى ركن وثيق".
الإمام مالك -رحمه الله- : " لن يصلح آخر هذه الأمة إلا بما أصلح به أولها ".
الإمام الأوزاعي -رحمه الله- : " عليك بآثار من سلف وإن رفضك الناس وإياك وآراء الرجال وإن زخرفوه لك بالقول ".
الإمام الفضيل بن عياض -رحمه الله- : " عليك بطرق الهدى و لا يضرك قلة السالكين و إياك و طرق الضلالة ولا يغرك كثرة الهالكين ".
علامة الزمان الإمام الألباني -رحمه الله- : " إن الخلاص إلى أيدي هؤلاء الشباب يتمثل في أمرين لا ثالث لهما ؛ التصفية والتربية ".
وكل خير في اتباع من سلف وكل شر في ابتداع من خلف
اقتباس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 DoubleMember of VBA.Interaction
Runs an executable program
هذا والله أعلم
اسلام عليكم و رحمة الله و بركاته
هذا المشروع لتشغيل الملف فى البرنامج المرتبط به
ان وضعت اى امداد و مجلد يبحث عن الملف و المجلد و عمل shell
هذا الكود منقول و انا وضعته فى مشروع للفائدة
و اتمنى ان يكون ما تبحث عنه ان شاء الله
الإدارة: برجاء عدم وضع صور كبيرة بالتوقيع.
Nothing is impossible, the word impossible itself says that: I M - Possible
خلدون خالد2 كتب:بعد إذنك أخي باسم هذه هي الصيغةFunction Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Doubleأما بالنسبة لعدم عمل الكود ذلك لأنها لا تشغل إلا الملفات التنفيذية فهي لا تستطيع تشغيل ملفات النص على سبيل المثال
هذا والله أعلم
ألسنا في منتدى فيجوال بيسك 6 ؟!!!
عموما صيغتك لم تعمل معي هل يمكن أن تضع مثال محدد لهذه الصيغة حتى يتسنى لي تجربتها
أما بالنسبة لصيغتي فقد وضعتها في form load وعملت معي بشكل سليم تماما وفتحت ملف التكست المطلوب بدون أي مشاكل
من أقوال الأئمة
الإمام علي بن أبي طالب -رضي الله عنه-: "الناس ثلاثة : فعالم رباني ، ومتعلم على سبيل النجاة ، وهمج رِعاع غوغاء أتباع كل ناعق ، يميلون مع كل ريح ، لم يستضيئوا بنور العلم ، ولم يلجئوا إلى ركن وثيق".
الإمام مالك -رحمه الله- : " لن يصلح آخر هذه الأمة إلا بما أصلح به أولها ".
الإمام الأوزاعي -رحمه الله- : " عليك بآثار من سلف وإن رفضك الناس وإياك وآراء الرجال وإن زخرفوه لك بالقول ".
الإمام الفضيل بن عياض -رحمه الله- : " عليك بطرق الهدى و لا يضرك قلة السالكين و إياك و طرق الضلالة ولا يغرك كثرة الهالكين ".
علامة الزمان الإمام الألباني -رحمه الله- : " إن الخلاص إلى أيدي هؤلاء الشباب يتمثل في أمرين لا ثالث لهما ؛ التصفية والتربية ".
وكل خير في اتباع من سلف وكل شر في ابتداع من خلف
اقتباسألسنا في منتدى فيجوال بيسك 6 ؟!!!عموما صيغتك لم تعمل معي هل يمكن أن تضع مثال محدد لهذه الصيغة حتى يتسنى لي تجربتها
أما بالنسبة لصيغتي فقد وضعتها في form load وعملت معي بشكل سليم تماما وفتحت ملف التكست المطلوب بدون أي مشاكل
هي بالمناسبة ليست صيغتي إنها صيغة ال Object Browser الخاص بال VB6
إضغط F2 للوصول إليه و اكتب في خانة البحث Shell فتظهر لك الصيغة
تحياتي
هذا الموضوع مغلق.