..:::تایپک جامع توابع ویژوال بیسیک:::..

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع بررسي مي کند آيا سيستم قادر است به طور کامل خاموش شود يا نه ، در واقع اين تابع ATX بودن پاور را بررسي مي کند( ويندوز 2000 به بعد ).
اگر مقدار برگشتي يک باشد آنگاه سيستم قادر است خود به خود به طور کامل خاموش شود ولي اگر مقدار برگشتي 0 باشد آنگاه سيستم چنين توانايي ندارد

کد PHP:

Private Declare Function IsPwrShutdownAllowed Lib "poweroff.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:17 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

کد PHP:

Private Declare Function IsPwrShutdownAllowed Lib "poweroff.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:17 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع بررسي مي کند آيا سيستم قادر است به حالت StandBy يا Sleep برود يا نه ( ويندوز 2000 به بعد ).
اگر مقدار برگشتي يک باشد آنگاه ويندوز قادر است سيستم را به حالت StandBy يا Sleep ببرد ولي اگر مقدار برگشتي 0 باشد آنگاه ويندوز چنين توانايي ندارد

کد PHP:

Private Declare Function IsPwrSuspendAllowed Lib "poweroff.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:17 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

از اين تابع براي معلق کردن کامپيوتر استفاده مي شود
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

Hibernate : اگر True باشد سيستم Hibernate مي شود
ForceCritical : اگر True باشد ويندوز به تمام برنامه هاي در حال اجرا پيغام اخطار مي فرستد
DisableWakeEvent : اگر True باشد تمام وظايف سيستمي خاتمه پيدا مي کند

کد PHP:

Private Declare Function SetSuspendState Lib "powrprof.dll" (ByVal Hibernate As Long, ByVal ForceCritical As Long, ByVal DisableWakeEvent As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:32 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

از اين تابع براي معلق کردن کامپيوتر استفاده مي شود
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

fSuspend : اگر True باشد سيستم معلق مي شود و در غير اينصورت سيستم Hibernate مي شود
fForce : اگر True باشد ويندوز به تمام برنامه هاي در حال اجرا پيغام اخطار مي فرستد

کد PHP:

Declare Function SetSystemPowerState Lib "kernel32.dll" (ByVal fSuspend As Long, ByVal fForce As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:41 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع پنجره مشخص شده را به حالت Minimize مي برد.
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

hWnd : اين متغير هندل پنجره اي است که بايد کمينه شود

کد PHP:

Private Declare Function CloseWindow Lib "user32.dll" (ByVal hWnd As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:41 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع يک اشاره گر از فايل اجرايي برنامه جاري بر مي گرداند
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و در غير اينصورت مقدار بازگشتي يک اشاره گر از فايل اجرايي جاري خواهد بود

کد PHP:

Private Declare Function GetCommandLine Lib "kernel32.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:44 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع يک اشاره گر از پردازش فعلي (فايل اجرايي برنامه) بر مي گرداند
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

کد PHP:

Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:44 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع يک ID از فايل اجرايي جاري بر مي گرداند. اين ID مي تواند در توابعي مانند RegisterServiceProcess به کار رود
اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر و در غير اينصورت مقدار بازگشتي ID فايل اجرايي جاري خواهد بود

کد PHP:

Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:44 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

کد PHP:

Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:45 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع تايمري را که با تابع SetTimer به وجود آمده، از بين مي برد.

hwnd : هندل پنجره اي که تابع تحت آن اجرا مي شود ( بايد برابر با مقداري باشد که در تابع SetTimer مورد استفاده قرار گرفته است )
nlDEvent : اين متغير به يک اشاره گر که توسط تابع SetTimer ايجاد شده اشهره مي کند

کد PHP:

Private Declare Function KillTimer Lib "user32.dll" (ByVal hwnd As Long, ByVal nlDEvent As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:45 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع يک نام يک فايل اجرايي را از ليست برنامه هاي در حال اجرا حذف مي کند يا به آن اضافه مي کند
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

dwProcessID : يک آي دي از برنامه يا فايل مورد نظر است که با تابع GetCurrentProcessID ساخته يا با توابع Module32First و Module32Next و Process32First و Process32Next گرفته مي شود
dwType : اين متغير تعيين مي کند برنامه مورد نظر از ليست حذف شود يا به ليست اضافه شود ( ثابت هاي زير )
RSP_Register : نام برنامه مورد نظر را به ليست اضافه مي کند
RSP_UnRegister : نام برنامه مورد نظر را از ليست حذف مي کند

کد PHP:

Private Declare Function RegisterServiceProcess Lib "kernel32.dll" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:45 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع يک تايمر ايجاد مي کند تا در يک فاصله زماني مشخص يک عمل تکرار شود ( براي از بين بردن يک تايمر بايد از تابع KillTimer استفاده کرد )
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

hwnd : هندل پنجره اي که تابع بايد تحت آن اجرا شودو در صورتي که مي خواهيد تايمر ايجاد شده تحت پنجره خاصي نباشد مقدار اين متغير را برابر صفر قرار دهيد
nIDEvent : اين متغير شماره شناسايي تايمر است که از آن براي از بين بردن تايمر ايجاد شده استفاده مي شود. اگر متغير hwnd را برابر صفر قرار دهيد بايد اين متغير را نيز با مقدار صفر مقدار دهي کنيد
uElapse : اين متغير فاصله زماني را که تايمر بايد اجرا شود بيان مي کند و در واقع به منزلهء Interval تايمر مورد نظر است
lpTimerFunc : در اين متغير بايد آدرس تابعي را قرار دهيد که قرار است تايمر مورد نظر در آن اجرا شود ( بايد از تابع AddressOf استفاده کنيد )

کد PHP:

Private Declare Function SetTimer Lib "user32.dll"

(ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:45 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين روتين به اندازهء dwMilisecond وقفه ايجاد مي کند.
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

dwMilisecond : زمان مورد نظر بر حسب ميلي ثانيه

کد PHP:

Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilisecond As Long)

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:45 PM

siryahya

کاربر طلایی1

تاریخ عضویت : اسفند 1389

تعداد پست ها : 158652

محل سکونت : ▂▃▄▅▆▇█Tabriz█▇▆▅▄▃▂

پاسخ به:..:::تایپک جامع توابع ویژوال بیسیک:::..

اين تابع به اندازهء dwMilisecond وقفه ايجاد مي کند.
اگر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

dwMilisecond : زمان مورد نظر بر حسب ميلي ثانيه
bAlertable : اگر True باشد آنگاه در هنگام فراخواني توابع ورودي/خروجي وقفه به پايان مي رسد در غير اينصورت تحت هيچ شرايطي قبل از مدت زمان dwMilisecond وقفه به پايان نمي رسد

کد PHP:

Private Declare Function SleepEx Lib "kernel32.dll" (ByVal dwMilliseconds As Long, ByVal bAlertable As Long) As Long

ترکی زبان قربون صدقه رفتنه داریم که: گوزلرین گیله‌سین قاداسین آلیم که یعنی درد و بلای مردمک چشات به جونم …!.

یک شنبه 20 اردیبهشت 1394 4:46 PM