اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

|و| كود لتغيير رمز محرك الاقراص السى دي


جمال فايز

الردود الموصى بها

أخوانى الكرام :

السؤال هو :

كيف يمكننا تغيير رمز محرك الاسطوانةcd-rom بواسطة كود بالاكسس ؟

وذلك ليمكننى من استخدام تللك الاسطوانة فى جميع الاجهزة لآن البرنامج علية ارتباطات بالاسطوانة فهل يمكن فعل ذلك .

وكيف يمكننا حماية الاسطوانة من النسخ مثلاً بواسطة كود معين .

" أخوانى الكرام أنا مقدم على طرح اسطوانة معينة واريد من كل شخص يشتريها أن يكون له رقم خاص مختلف عن الاخر ليتم فتح البرنامج والابحار فيه فكيف يتم عمل ذك "

والله ولى التوفيق

  • Thanks 1
رابط هذا التعليق
شارك

الاخ الكريم :محمد طاهر

اشكرك على سرعة ردك للأستفسار لكنى فى الحقيقة أطلعت على الرابط قبل طرحى الاستفسار الذى ذكرته لكن لم اهتدى الى ضالتى فليس لي رغبة فى كود لمعرفة الاقراص الموجودة بالجهاز لكننى اريد كود يفعل ما طلبته فى الاستفسار

وكم أتمنى أن أكون اوضحت فكرتى كما ينبغى .

اشكركم على تعاونكم

تم تعديل بواسطه hghghg
رابط هذا التعليق
شارك

أخي الكريم

أعتقد أن تغيير الرمز لن يكون مناسبا بالنسبة للمستخدمين .

و بالنسبة للحماية بكلمات السر المختلفة ، و استعمال قراءة سيريال الهارد و خلافه ، فأذكر أنه سبق تناولها فراجع قسم الحماية داخل قسم خلاصة المشاركات ، فربما يجزي هذا عن ما تريد

فتعطي لكل شخص كلمة سر مبنية علي سيريال الهارد مثلا بعد التحميل

أيضا راجع هذا الموضوع بخصوص الحماية

http://www.arabteam2000.com/ib/index.php?s...=0entry178073

فهو يبدووووو مهم :lol:

تم تعديل بواسطه egyptian_eg
رابط هذا التعليق
شارك

اخى الكريم egyption eg

فى البداية اشكر اهتمامك بالموضوع لكن لم أجد الرد الذى يؤهلنى حتى الأن لحل تلك المشكلة وسأحاول أن اعيد سؤالى بشكل أخر لربما أكون لم أوضحة بالشكل السليم

1- عملت برنامج بالاكسس وخزنته على الاسطوانة وهناك مجلد بالاسطوانة موضوع علية المادة العلمية التى اريدها .

2- من داخل برنامج الاكسس وضعت ارتباطات تشعبية ليتم فتحها من الاسطوانة .

المشكلة هنا كالتالى :-

بعض الاجهزة ليس فيها محركات غير الc وبالتالى عند تشغيل الاسطوانة سيتم تعريفها بالجهاز تلقائيا على انها المحرك مثلاً d

لكن اذا جربت الاسطوانة على جهاز عليه برتشن c ، d ، e ، مثلاً فسيفترض الجهاز بان الاسطوانه ستكون هى g مثلاً وهكذا .

لذلك

أحاول ان أثبت دائما رمز الاسطوانه فى برنامجى بالاكسس عن طريق الكود الذى أريده

طبعاً المستخدم لن يحس بذلك لآنها ستتم بواسطة برنامج الاكسس الذى سيشغله من الاسطوانة بالضغط عليه ( طبعاً أخفيت المجلد الذى يحوى المادة العلمية بالاسطوانه حتى يجد العميل البرنامج فقط هو المرئى أمامه فقط)

هذا هو طلبى وشكرا للجميع .

لى ملحوظه هل يمكننى أيضا تشغيل برنامج الاكسس من الاسطوانه تلقائى فور أدخالك للاسطوانة بدلاً من تدخل المستخدم لتشغيله ؟.

وفى الختام أعتذر أن اطلت عليكم ولكم جزيل الشكر.

رابط هذا التعليق
شارك

أخي الفاضل hghghg بالنسبة لما تريد فهو واضح جداً ..

ولكن سؤالك هو الذي قلب المفاهيم قليلاً فأنت لا تريد تغيير الرمز وإنما تريد التعرف على رمز محرك الأقراص المضغوطة الـ CD-ROM ..

بالنسبة للكود فقد قمت بعمل هذا الكود سابقاً في الفيجول بيسيك .. وأعتقد أنه قابل للتطبيق هنا:

Dim XDrives
Dim XDrive
Dim XTest
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

Private Sub Command1_Click()
XDrives = "abcdefghijklmnopqrstuvwxyz"
For i = 1 To 26
XTest = Mid(XDrives, i, 1)
If GetDriveType(XTest & ":\") = 5 Then
XDrive = XTest
End If
Next
' XDrive يمثل هنا رمز محرك الأقراص المضغوطة
Print XDrive
End Sub

لاحظ أن المتغير XDrive بعد هذا الكود سيحتوي على رمز محرك الأقراص المضغوطة ..

رابط هذا التعليق
شارك

قمت بتجربة الكود السابق في الأكسيس وهو شغال مائة بالمائة ..

الله يعطيني العافية :lol: :d

لاحظ أن رمز محرك الأقراص سيكون موجوداً في المتغير XDrive وبالتالي ستضع هذا المتغير بدلاً من رمز محرك الأقراص:

XDrive & ":\

ويمكنك تجربته بنفسك وإخباري بالنتيجة ..

ستواجهك مشكلة بسيطة وهي إذا ما كان المستخدم لديه أكثر من محرك أقراص مضغوطة، أو كان لديه محركات أقراص مضغوطة وهمية ..

بالنسبة لسؤالك الثاني عن تشغيل البرنامج عند وضع الاسطوانة مباشرة فأعتقد أن الأمر بسيط جداً وكل ما عليك هو عمل AutoRun لها ..

تحياتي

رابط هذا التعليق
شارك

للأسف اخي الكريم عبد الله فتحى

لقد جربت الكود لكنه يعطى هذة الرسالة

run-time error '438':

object doesn't support this property or method

وعند تصفح الخطأ يكون مظلل على الجملة print xdrive

طبعاً انا عرفت المتغير بأسم xdrive لكن دون جدوى

على فكرة بعد ما جهزت النموزج لأرفاقة هنا فى الحقيقة لم استطع فكيف الطريقة .

ثانيا لقد ذكرت فى ردك الجميل بأننى استطيع جعلى الاسطوانة تعمل تلقائى بواسطة auto run فكيف يمكن ذلك هل عن طريق برنامج معين يجعل الاسطوانة بهذا الشكل أم ماذا شكراً لأهتمامك بالموضوع والله الموفق

رابط هذا التعليق
شارك

أهلاً أخي ..

بالنسبة للكود لا يوجد خطأ به ..

وإنما الخطأ في الأمر Print فعلى ما يبدو أن هذا الأمر غير موجود في الأكسس ..

على أي حال هذي مو مشكلة .. لأن هذا الأمر غير ضروري ..

بس إنت مش كنت عايز رمز محرك الأقراص المضغوطة !!

المتغير XDrive اعتبره يساوي الحرف ..

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

بالنسبة لل AutoRun ياريت أحد الإخوة يشرحها بالنيابة لأني مشغول كتيييييييييررر..

>> سأعود لاحقاً ...

رابط هذا التعليق
شارك

بالنسبة لل AutoRun:

قم بإنشاء ملف جديد باسم AutoRun.inf واكتب فيه ما يلي:

[autorun] 
open=Untitled.exe 
icon=Untitled.ico

غير ال Untitled.exe إلى اسم المشروع ..

غير ال Untitled.ico إلى الأيقونة التي تريدها ..

هذه الطريقة أنا أحفظها هكذا ... وأتمنى أن لا أكون نسيت شيئاً ..

وطبعاً يوجد برامج خاصة لعمل ذلك .. ولكن أنا شايف إن الحكاية ما تستاهل ..

تحياتي

رابط هذا التعليق
شارك

  • 2 weeks later...

الاخ الفاضل عبدالله فتحى

لك جزيل الشكر على سرعة تجاوبك واعتزر لعدم ردى طول الفترة الماضية وذلك لسببين هما 1- المنتدى والعطل الذى تم فية والحمد لله لعودة المنتدى مرة أخرى للعمل .

2- لانشغالى فى الامتحانات الخاصة بدورة ال ICDL

أدعوا لى بالتوفيق بأذن الله تعالى .

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

وهل الملف هذا افعلة فى الورد مثلاً واحاول حفظة بالامتداد INF وحتى لما فعلت ذلك لم أجد هذا الامتداد ليتم الحفظ به رجاً المساعدة ولك وافر التحيه

رابط هذا التعليق
شارك

بالنسبة للملف قم بعمله من خلال برنامج المفكرة ..

والمسألة بسيطة جداً ..

وأسهل مثال عليه قمت للتو بفتح السي دي عندي من مجلة PC Magazine ..

وجدت ملف على ال root اسمه autorun.inf ..

قمت بفتحه من المفكرة وكان مكتوب بداخله:

[autorun]
open=Disclaimer.exe

والملف Disclaimer.exe موجود هو أيضا على ال root ..

المسألة بسيطة جداً .. فقط قم بالتجربة ..

أو على الأقل قم بفتح أي سي دي وانظر الطريقة المستخدمة ..

وأنا تحت أمرك :(

رابط هذا التعليق
شارك

الاخ الفاضل عبد الله فتحى مشكور كثيراً لكن قبل التجربة لي ملحوظة هل يلزم أن يكون الامتداد للملف EXE لكي أعمله الاوتورن أم ليس شرط

لاننى لم احول الاكسس من الامتداد MDBالى EXE وفى الحقيقة لا اريد تحويلة

وارجو منك سعة الصدر مشكور حبيبنا...

رابط هذا التعليق
شارك

الاخ الفاضل عبد الله فتحى تحية طيبة وبعد

لقد ذكرت فى رسالتك لي هذا الجزء

لاحظ أن رمز محرك الأقراص سيكون موجوداً في المتغير XDrive وبالتالي ستضع هذا المتغير بدلاً من رمز محرك الأقراص:

XDrive

ويمكنك تجربته بنفسك وإخباري بالنتيجة ..

ستواجهك مشكلة بسيطة وهي إذا ما كان المستخدم لديه أكثر من محرك أقراص مضغوطة، أو كان لديه محركات أقراص مضغوطة وهمية ..

ـــــــــــــــــــــــــــــــــــ

لقد جربت الكود بالكامل وتوصلت الى رمز أحد المحركات الخاصة بالاقراص وكان e لأننى عندى قرصان للسى دي رم ولكن فى الحقيقة عندما فعلت حقل XDrive بالاكسس وخذنت فيه رمز محرك الاقراص ، وعندما استبدلت الارتباط التشعيبى مبتدأً بالمتغير بدلاً من محرك اقراص السى دي لم ينفذ الارتباط التشعيبي لفتح الملفات .

طبعاً عندما تفضلت بذكر أنك قمت بالتجربة ونجحت معك لربما يكون ذلك لعملك على الفيجول وليس بالاكسس

وياريت ترفق لى مثال بالاكسس فية الفكرة التى ذكرتها وملف الفتح التلقائى

ولك جزيل الشكر اخى الفاضل .

رابط هذا التعليق
شارك

طبعاً عندما تفضلت بذكر أنك قمت بالتجربة ونجحت معك لربما يكون ذلك لعملك على الفيجول وليس بالاكسس

أخي الحبيب hghghg بالنسبة للكود السابق فأنا لم أكتبه لك إلا بعد أن جربته على الأكسس وهو شغال مائة المائة ..

وبالنسبة للمثال ما عندي مانع .. رح أحاول أعملك مثال ...

وإن كنت أفضل أن تقوم بذلك بنفسك .. وأنا متأكد من صحة الكود :)

تحياتي

رابط هذا التعليق
شارك

اخى الكريم عبد الله فتحى :-

أذا عدنا للخلف وللردود السابقة التى تفضلت بها ستجد برسالتك المؤرخة فى

13/12/2003م مايلى:-

بالنسبة للكود لا يوجد خطأ به ..

وإنما الخطأ في الأمر Print فعلى ما يبدو أن هذا الأمر غير موجود في الأكسس ..

على أي حال هذي مو مشكلة .. لأن هذا الأمر غير ضروري ..

بس إنت مش كنت عايز رمز محرك الأقراص المضغوطة !!

المتغير XDrive اعتبره يساوي الحرف ..

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

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

ـــــــــــــــــ

على العموم أخى الفاضل أنا جربت الكود لكن عندما حذفت رمز المحرك الخاص بالاسطوانة من الارتباطات ووضعت مكانها المتغير XDrive لم يعمل الرابط

وعندما قلت لكم مثال اريد فقط النموزج بالكود الموضح به مع استبدال رمز محرك الاسطوانة بـ XDrive

وما هو الحل عزيزى اذا كان هناك اكثر من محرك للأسطوانة ؟.

ولك وافر تحياتى .

رابط هذا التعليق
شارك

بالفعل أخي hghg كلامك صحيح ولكن هذا لا يعني أنني لم أجرب ذلك ..

والفكرة واحدة ..

على أي حال مرفق مثال لتجربته قم بعمل سي دي عليه برنامج الآلة الحاسبة ال calc.exe على ال root للسي دي .. وسيقوم البرنامج بتشغيله .. كما أنه يتفادى مشكلة وجود أكثر من رمز لمحرك الأقراص .. ويوجد أكثر من طريقة أخرى لتفادي هذه المشكلة ..

مرفق أيضاً مثال لملف autorun.inf قم بوضعه على ال root للسي دي مع ملف ال calc.exe وستجد أنه يقوم بتشغيل الآلة الحاسبة تلقائياً ..

CD.zip

تم تعديل بواسطه عبد الله فتحي
  • Like 1
رابط هذا التعليق
شارك

اخى الفاضل عبد الله فتحى

بالرغم من ارفاقك الملف الا انه مازالت المشكلة قائمة ولي ملحوظة فى المود الموضوع والذى تفضلت به كالتالى :-

On Error Resume Next

XDrives = "abcdefghijklmnopqrstuvwxyz"

For i = 1 To 26

XTest = Mid(XDrives, i, 1)

If GetDriveType(XTest & ":\") = 5 Then

XDrive = XDrive & XTest

End If

Next

' XDrive يمثل هنا رمز محرك الأقراص المضغوطة

If Len(XDrive) > 1 Then

For i = 1 To Len(XDrive)

xx = Mid(XDrive, i, 1)

Shell (xx & ":\calc.exe")

Next

Else

Shell (xx & ":\calc.exe")

End If

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

للأسف الشديد لم يمكننى ارفاق ملف به المطلوب رداً على ملفك لكننى سأحاول طرحه كالتالى :-

أولاً : الملف المذكور والذى يمكنك فتحة هو calc.exe وهو ملف تنفيذي exeلكننى احاول فتح الملف بالامتداد mdb بمعنى بالاكسس كما تعلم

ثانيا: دالة ال shell تقوم بفتح الملف التنفيزى مباشرتاً ولذلك فعند وجود خطأ بالكود السابق سينتقل بك الكود الى next ومن ثم سيمكنك من فتح calc.exe وهو غير مفيد أذا انك لا تود فتح الملف الأ عند الرغبة وليس عند وجود خطأ بالكود . لذلك فمن الافضل اخى الكريم التعديل بالكود لفتح ملف بالاكسس والتشيك عليه ومن ثم ارساله لى .

معذرة ان كنت اطلت عليك .

رابط هذا التعليق
شارك

أخي الفاضل السؤال في البداية كان عن معرفة رمز محرك الأقراص وأعتقد أن الكود الذي وضعته يقوم بذلك ..

وبخصوص المشكلة الناتجة عن وجود محركي أقراص مضغوطة فقد ذكرت أيضاُ أن هناك أكثر من طريقة لتفادي هذه المشكلة .. وما عملته أنا في المرفق كان مجرد مثال .. وبإمكانك تعديله كيفما تشاء ..

بالنسبة للأسئلة الأخرى فبإمكانك وضعها في موضوع مستقل حتى يتفاعل بقية الإخوة ..

ولا تنس أن قواعد المشاركة تقتضي سؤال واحد في الموضوع ..

وإليك خالص تحياتي ..

رابط هذا التعليق
شارك

اخى الكريم

عوداً للوراء وللموضوع الرئيسى كان المهم عندى ليس معرفة رمز محرك الاقراص لكن المطلوب كان تغيير رمز محرك الاقراص ليصبح على جهازى مثلاً من الرمز d الى الرمز w مثلاً ( وهذا واضح من عنوان الموضوع )

فاذا استطعت فعل ذلك بكود بالاكسس لاصبحت المشكلة محلولة .

هذا كل ما طلبت .

رابط هذا التعليق
شارك

أخي الكريم

معرفة اسم قرص السي دي و التعامل معه علي هذا الاساس افضل من محاولة تغييره

فكانك تقول بالكود:

الملف رقم 1 علي السي دي أيا كان حرفه

لانك ستستنج الحرف بالكود

و هذا أفضل كثيرا من:

الملف 1 علي ال E و تحاول تغيير رمز السي دي الي E

أوعتقد أن تغيير الحرف اذا كان متاحا ، فسيكون أكثر صعوبة فيما قبل الويندوز اكس بي

لذا أنصحك بان تعيد التفكير فى الطلب ، فاستنتاج الرمز أفضل بمراحل

و اذا فيه مواضيع أخري بخلاف حرف السي دي ، فيرجي طرحها فى مشاركات مستقلة

و هذا لا يمنع أن يوافيك احد الاخوة بتغيير الحرف ، و لكن نحن نراه ليس بالحل الافضل ، و عن نفسي اذا اريد هذا ساكتفي باستنتاج الرمز حيث أراه لاافضل و الانسب

مع تحياتي

رابط هذا التعليق
شارك

عوداً للوراء وللموضوع الرئيسى كان المهم عندى ليس معرفة رمز محرك الاقراص لكن المطلوب كان تغيير رمز محرك الاقراص ليصبح على جهازى مثلاً من الرمز d الى الرمز w مثلاً ( وهذا واضح من عنوان الموضوع )

فاذا استطعت فعل ذلك بكود بالاكسس لاصبحت المشكلة محلولة .

هذا كل ما طلبت .

أخي hghghg ..

ما الذي تعنيه بتغيير رمز محرك الأقراص ؟؟

هذا متاح ولكنه غير مفيد إطلاقاً ..

ستحتاج إلى كود طويل لا فائدة منه ..

بعد هذا الكود ستحتاج إلى إعادة تشغيل الويندوز ..

ما الذي تتوقعه من المستخدم عندما تقوم بتغيير رمز محرك الأقراص الخاص به ..

في كل الأحوال تغيير رمز محرك الأقراص ليس الحل الصحيح أبداً ..

أنت بالفعل سألت عن ذلك وأنا أجبت بالإجابة التي أعتقد أنها الأفضل ..

وحتى لو كنت تريد تغيير رمز محرك الأقراص المضغوطة فمن المهم أن تقوم بمعرفته أولاً ..

وفي هذه الحالة ستحتاج - قبل كل شيء - إلى كود معرفة رمز محرك الأقراص المضغوطة الموجود بالأعلى ..

آسف إن كنت قد أزعجتك بأكوادي عديمة الفائدة .. وأشكرك بأي حال ..

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information