چرا این دستور در ویندوز 7 کارنمیکنه ؟

[reza-ezdeham]

با سلام

بنده میدونم که ویندوز 7 خیلی امنیتش بالاست و این دستور که میگم رو اکثر

ویروس ها و تروجانها ازش استفاده میکنن اما آیا راهی واسه این مشکل هست ؟؟

filecopy app.path & "\" & app.exename & ".exe","c:\windows\reza.exe"

دوستان دقت داشته باشید من فقط واسه درایو c:\ رو میخوام

ممنون میشم جواب بدین

[HamedFaa]

راه که زیاده باید ببینی کدوم جواب میده من که 7 ندارم.

اون exe که میخوای کپی کنی رو resource کن داخل برنامه اصلی بعد با داخل c بریز

[reza-ezdeham]

حامد جان راه زیاد اما اما اکثرشو تست کردم نمیشه حتی resource هم نمیشه

خواهشا کسی بلده کمک کنه حتی بعضی از دوستان تو فروم دیگه میگفتن با vb.net میشه اما اونم نشد

[HamedFaa]

من یه راه به ذهنم رسید که 100% ویندوز 7 هم کم میاره.

طریقه ی مصرف:

کد:

Dim strOPath, strSPath, strCmd as string

1- مسیر فایلی که قرار است کپی شود را در متغیری ذخیره میکنیم.

کد:

strOPath = App.Path & "\" & App.EXEName & ".exe"

2- مسیری که قرار است فایل در آنجا کپی شود را در متغیری دخیره میکنیم.

کد:

strSPath = "C:\WINDOWS\" & App.EXEName & ".exe"

3- دستوری جهت کپی کردن فایل مینویسیم - cmd.exe

کد:

strCmd = "copy " & App.EXEName & ".exe " & strSPath

4- دستور فوق را در یک فایل bat میریزیم.

کد:

Open App.Path & "\copy.bat" For Output As #1
    Print #1, strCmd
Close #1

- در اینجا شما نیاز به تابع pause دارید چون سرعت ساخته شدن فایل از سرعت اجرای 10 خط کد کمتر هست! function زیر را کپی کنید.

کد:

Public Function Pause(ByVal Interval As Single) As Single
    Dim x As Single
    x! = Timer
    Do While (Timer - x!) < Val(Interval)
        DoEvents
    Loop
End Function

5- فایل bat را اجرا میکنیم.

کد:

pause (2)
Shell (App.Path & "\copy.bat")

6- فایل bat را پاک میکنیم.

کد:

pause (2)
Kill (App.Path & "\copy.bat")

چقدر کد نویسی مبتدیه با مزه شده

---

در صورتی که به هر دلیل دستور بالا جواب نداد از مرحله 4 را تغییر میدهیم.

4- یک صفحه cmd باز میکنیم.

کد:

Shell ("cmd.exe"), vbNormalFocus

5- با استفاده از دستور sendkeys دستور کپی را مینویسیم و اینتر میکنیم.

کد:

DoEvents
SendKeys (strCmd)
DoEvents
SendKeys ("{ENTER}")

6- برای بستن پنجره cmd هم از توابع API استفاده کن

[reza-ezdeham]

حامد جان بابت زحماتتت ممنون ، من تو ویندوز هنگام اجرای برنامه که سوال میپرسه که درخواست از سوی administrator هست یا نه رو غیرفعال کردم اما ممنون میشم بگی کلا چطور با برنامه نویسی باید این درخواست رو از ویندوز 7 حذف کرد ؟؟؟

ممنون

[Payman62]

سلام.
برای دسترسی به درایو c تو وین 7 نیاز به دسترسی ادمین داری.

باید بری تو یه مسیر خاص تو رجیستری آدرس برنامت رو بدی تا دفعه دیگه با اجازه کاربر با دسترسی ادمین اجرا شه.

[reza-ezdeham]

خوب پیمان جان خواهشا(مدیرجان) اون مسیر کجای رجیستریه ؟؟ اگه بگی ممنون میشم

چون من الان این کارو کردم اما با رجیستری ن یه سوال ازم پرسید منم پاسخ رو که دادم دیگه با اجازه کاربر اجرا میشه

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

[reza-ezdeham]

الان خودم زیاد گشتم اینو پیدا کردم که تنظیماتش تو این مسیر و فایل هستش

c:\windows\system32\user account control setting.exe
با اجرای این فایل میتونی تنظیماتو انجام بدی اما من تو رجیستری میخوام که سرچ کردم اما چیزی دستگیرم نشد

[baby_1]

شما باید داخل ویندوز سون برای اجرای برنامه روش کلیک راست کنید و run as administrator رو اجرا کنی چون اگر درایو سی رو بکنی دی می بینی درست می شه این بابت مجوزهای ویندوزه یا
UAC رو داخل یوز ویندوزت عوض کن

[HamedFaa]

دوستمون با کد میخواست اینکارو انجام بده نه دستی!

[Mr.pRoGraMmer]

شما باید uac زو bypass کنی سورس در این زمینه هست :-)
یه راه دیگه هم هست اما برای فعلیت مخربانه گفته نمیشود :-)