نحوه قفل کردن دسکتاپ

[h_a_m_i_d]

سلام خدمت شما دوستان گرامی من چطوری میتونم صفحه دسکتاپ رو قفل کنم که کلید start ویندوز هم کار نکند
و کاربر نتواند به هیچ چیز در دسکتاپ دسترسی داشته باشد
البته نه ماوس قفل بشه نه کیبورد
و تنها برنامه خودم اچرا بشه

[arash020]

سلام

شما میتونی کاری کنی که برنامت حتی قبل از خود اجرای Explprer ویندوز که باعث و بانی نمایش نمایش همه چیز هستش اجرا بشه
فقط با یه تغییر کوچیک توی رجیستری
البته بعدا میتونی از داخل برنامت اون فایل رو هم اجرا کنی تا محیط دسکتاپ هم بیاد بالا
برنامه ش به زبان vb6 رو برات میزارم خودت تبدیلش کن خوبه
خودت متوجه میشی چیه...
نشد بپرس بهت میگم.

موفق باشی
مواطب باش سیستمت ...

[h_a_m_i_d]

دوست عزیز ممنون ولی این کد فقط یک صفحه explorer دیگه ای رو باز میکنه ولی اونو
غیرفعال نمیکنه
میشه یک مثال دیگه بزنین ممنون

[h_a_m_i_d]

سلام دوست عزیز من میخوام explorer ویندوز را از کار بندازم کسی اطلاعاتی در این مورد داره

[arash020]

برنامه ای که برات فرستادم رو خودم تست کردم , وقتی اجراش کردم دکمه مربوط رو زدم بعد برای تست ریستارت کردم دیگه explorer نیومد و فقط یه برنامه دیگه که خودم بهش معرفی کردم اومد بالا .
بعدش کمی کد رو دستکاریش کردم که یه کارای دیگه رو هم بکنه مثلا بعدش بیاره ...

اگه کمی بیشتر به کدش دقت کنی میتونی کاری بکنی که خواستتو براورده کنه
کاری نداره


Private Sub Command1_Click()
Dim a As String
a =Text1.Text
M1.SaveString HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "shell", a
End Sub

Private Sub Command2_Click()
a = "explorer.exe"
M1.SaveString HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "shell", a
End Sub