PDA

View Full Version : سوال: چطور تاریخ و ساعت سیستم رو از طریق برنامه ام تنظیم کنم؟



Hadiir.net
شنبه 29 مهر 1391, 22:49 عصر
سلام
آیا امکان تنظیم ساعت و تاریخ سیستم از طریق رنامه نویسی هست؟
منظورم اینه که میشه از داخل برنامه ام ساعت و تاریخ سیستم رو تغییر بدم؟ اگه امکانش هست لطفاٌ راهنمایی کنین
تشکر.

gilsoft
یک شنبه 30 مهر 1391, 04:46 صبح
سلام
آیا امکان تنظیم ساعت و تاریخ سیستم از طریق رنامه نویسی هست؟
منظورم اینه که میشه از داخل برنامه ام ساعت و تاریخ سیستم رو تغییر بدم؟ اگه امکانش هست لطفاٌ راهنمایی کنین
تشکر.


سلام دوست عزیز

اینم ساده ترین روش :

فرمت تاریخ باید به شکل <mm-dd-yy> باشد.

Shell("Cmd /C Date 10-21-12", AppWinStyle.Hide)

موفق باشید ....

Hadiir.net
یک شنبه 30 مهر 1391, 12:47 عصر
سلام دوست عزیز

اینم ساده ترین روش :

فرمت تاریخ باید به شکل <mm-dd-yy> باشد.

Shell("Cmd /C Date 10-21-12", AppWinStyle.Hide)

موفق باشید ....


تشکر دوست عزیز
ولی ظاهرا کار نمیکنه
من توی ویندوز 7 اجرا کردم ولی جواب نداد ممکنه راهنمایی کنین.
تشکر

محسن واژدی
یک شنبه 30 مهر 1391, 13:03 عصر
تشکر دوست عزیز
ولی ظاهرا کار نمیکنه
من توی ویندوز 7 اجرا کردم ولی جواب نداد ممکنه راهنمایی کنین.
تشکر
سلام علیکم
به این صورت تست کنید:

Shell("Cmd /C Date 10/21/12", AppWinStyle.Hide)

البته کد جناب gilsoft هم مشکلی نداشت

کد زیر را هم بررسی کنید:
DateSerial(2012, 10, 21)


همچنین با APIی SetSystemTime:
کد زیر را داخل ماژول کپی کنید:

<System.Runtime.InteropServices.StructLayout _
(System.Runtime.InteropServices.LayoutKind.Sequent ial)> _
Private Structure SYSTEMTIME
Public wYear As Int16
Public wMonth As Int16
Public wDayOfWeek As Int16
Public wDay As Int16
Public wHour As Int16
Public wMinute As Int16
Public wSecond As Int16
Public wMilliseconds As Int16
End Structure

Private Declare Function SetSystemTime Lib "kernel32.dll" (ByRef lpSystemTime As SYSTEMTIME) As Int32


برای مثال:
Dim dDate As SYSTEMTIME
With dDate
.wYear = 2012
.wMonth = 10
.wDay = 21
.wHour = 1
.wMinute = 31
.wSecond = 0
.wMilliseconds = 0
End With
SetSystemTime(dDate)
موفق باشید

Hadiir.net
یک شنبه 30 مهر 1391, 13:21 عصر
من تمام این موارد رو تست کردم الان دو روزه درگیر این کدهام
اگر شما تست کردین و نتیجه گرفتین خواهش میکنم یه نمونه برنامه بزارین
تشکر
یه سوال دیگه اگه بخوام پنجره ساعت و تقویم خود ویندوز رو فراخوانی کنم باید از په دستوری استفاده کنم؟
من قبلا با وی بی 6 این کار رو راحت انجام میدادم
با این کد:



Dim oShell As New Shell
oShell.ControlPanelItem "timedate.cpl"



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

nowar1352
یک شنبه 30 مهر 1391, 20:36 عصر
تشکر دوست عزیز
ولی ظاهرا کار نمیکنه
من توی ویندوز 7 اجرا کردم ولی جواب نداد ممکنه راهنمایی کنین.
تشکر
دوست عزیز من تو سون تست کردم کد Gil درست است

فرید نجفلو
سه شنبه 02 آبان 1391, 00:17 صبح
یه روش خیلی ساده:
TimeOfDay = "18:00"
تست هم شده

فقط یادتون باشه واسه تغییر ساعت تو ویندوز ویستا ، 7 و بالاتر نیاز دارید برنامه شما با مجوز مدیر سیستم (Administrator) اجرا بشه وگر نه وقتی اجراش کنید پا خطای Security Policy (مجوز های دسترسی) مواجه می شید

برای اینکه برنامه شما خودکار به صورت Run As Administrator اجرا بشه وارد Properties پروژه بشید و از برگه Application دکمه WindowsSettings رو بزنید
حالا از XML بازه شده خط پایین رو با خط بعدی جایگزین کنید:

<requestedExecutionLevel level="asInvoker" uiAccess="false" />

<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />

gilsoft
چهارشنبه 03 آبان 1391, 00:28 صبح
یه سوال دیگه اگه بخوام پنجره ساعت و تقویم خود ویندوز رو فراخوانی کنم باید از په دستوری استفاده کنم؟
من قبلا با وی بی 6 این کار رو راحت انجام میدادم
با این کد:



Dim oShell As New Shell
oShell.ControlPanelItem "timedate.cpl"


سلام دوست عزیز
با کد زیر میتونی این کار رو انجام بدی

Shell("rundll32.exe shell32.dll, Control_RunDLL timedate.cpl, , 0")

موفق باشید

Hadiir.net
پنج شنبه 04 آبان 1391, 13:22 عصر
ممنونم از همه بابت جوابهاتون
بالاخره تونستم از طریق برنامه ام ساعت و تاریخ سیستم رو تنطیم کنم.
حالا یه سوال و یه مشکل دیگه:
من توی برنامه ام از کاربر میخوام تاریخ رو تنظیم کنه. تاریخ از کاربر بصورت شمسی دریافت میشه و براساس اون تاریخ سیستم که میلادی هست تنظیم بشه. چطور این کار رو انجام بدم؟ یعنی تاریخ شمسی رو به میلادی تبدیل کنم؟

فرید نجفلو
پنج شنبه 04 آبان 1391, 16:08 عصر
سلام
اگه جستجو می کردید من در هر دو سمت برنامه و SQL Server توابع مورد نیازتون رو قبلا ارسال کردم

در سطح برنامه:
اینجا پست 5 (http://barnamenevis.org/showthread.php?341959-%D8%A8%D8%AF%D8%B3%D8%AA-%D8%A2%D9%88%D8%B1%D8%AF%D9%86-%D8%B1%D9%88%D8%B2%D9%87%D8%A7%DB%8C-%D9%85%D8%A7%D8%A8%DB%8C%D9%86-%D8%AF%D9%88-%D8%AA%D8%A7%D8%B1%DB%8C%D8%AE-%D8%B4%D9%85%D8%B3%DB%8C-%28-%D8%AA%D9%81%D8%A7%D8%B6%D9%84-%D8%B1%D9%88%D8%B2%D9%87%D8%A7%DB%8C-%D9%85%D8%A7%D8%A8%DB%8C%D9%86-%D8%AF%D9%88-%D8%AA%D8%A7%D8%B1%DB%8C%D8%AE-%D8%B4%D9%85%D8%B3%DB%8C-%29&p=1508461&viewfull=1#post1508461)
در سطح دیتابیس:
اینجا پست 2 (http://barnamenevis.org/showthread.php?341137-%D9%87%D8%B4%D8%AF%D8%A7%D8%B1-%D9%82%D8%A8%D9%84-%D8%A7%D8%B2-%D8%B3%D8%B1-%D8%B1%D8%B3%DB%8C%D8%AF-%D8%AA%D8%A7%D8%B1%DB%8C%D8%AE&p=1504948&viewfull=1#post1504948)