باز و بسته کردن Cd Rom

[larneg]

با سلام به همگی

دوستان میخوام برنامه ای بنویسم که با اون بتونم Cd Rom رو درشو باز و بسته کنم

خیلی ممنــــــــونم

[Bracket]

کدش سادست میتونی از MCI API functions استفاده کنی فکر میکنم این ساده ترین راه باشه . یه سرچ کوچیک بزنی تا دلت بخواد منبع و مثال پیدا میکنی .

[Payman_62]

mciSendStringA("set CDAudio door open", tReturn, 127, 0)

[lord_ashkan_z]

البته فكر كنم كه براي كد بالا بايد يك api تغريف كنين پيمان جان.

[ژولی لسکو]

كسي سورسي داره
كه ما تازه كارها هم بتونيم چيزي ياد بگيريم
ممنون

[sltavakoli]

اول توی یه ماژول این رو مینویسی

public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal
hwndCallback As Long) As Long

بعد هم تویه یه Event مثلا cmd1_click این کد رو برای باز کردن


mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0&
و این کد رو هم برای بستن

:mciSendString "Set CDAudio Door Closed Wait", 0&, 0&, 0&

استفاده میکنی.اگه مشکلی داشتی بگو.یا حق.

[ژولی لسکو]

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

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

اگه ميشه يه نمونه ساده برام درست كنين
منظور شما رو از تو ماژول بذار رو نفهميدم
ممنون از لطفت

[بهرام_62]

لطفا یکی یک سمپل بزاره

[ULF_VB6]

به خدا اگه یه سرچ یکنید، جای دوری نمیره.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[sltavakoli]

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

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

اگه ميشه يه نمونه ساده برام درست كنين
منظور شما رو از تو ماژول بذار رو نفهميدم
ممنون از لطفت

شما میتونید از منوی project بعد هم Add module یه ماژول جدید بسازی و بعد هم توی اون ماژولی ساختی

چیزهایی رو که گفتم رو بریز.

بعد هم همون کارایی که گفتم دیگه.

اگه بازم سوال داشتی ما در خدمتیم.

هرچی سوال داری همین جا بپرس.من هم همه چیزی رو که بلدم(که خیلی کمه) همین جا یاد گرفتم.