PDA

View Full Version : سوال: به دست آوردن ساعت و تاریخ از یک سرور



AliReza Vafakhah
چهارشنبه 27 بهمن 1389, 22:28 عصر
سلا دوستان

دوستان در ویندوز یک قسمت هست که میشه باهاش ساعت و تاریخ سیستم را از طریق یک سرور آپدیت کرد(تصویر زیر)


حالا من می خوام بدونم چه طوری میشه با دلفی اطلاعات رو از سرورهای مربوطه گرفت.

یعنی از طریق کد نویسی و اتصال به یک سرور ساعت و تاریخ سیستم رو تنظیم کنم.

AliReza Vafakhah
پنج شنبه 28 بهمن 1389, 00:48 صبح
دوستان پیدا کردم ، تو یکی از تاپیک های StackOverFlow (http://stackoverflow.com/questions/2243803/delphi-routine-which-retrieve-the-current-time-and-date-from-a-time-server)

Vahid.Shatery
شنبه 30 بهمن 1389, 22:37 عصر
سلام

procedure TfrmLogin.FormCreate(Sender: TObject);
begin
s := ' time \\Server /set /y';
ShellExecute(Handle, 'open', 'net', pchar(s), nil, SW_HIDE);
Sleep(250);
end;

AliReza Vafakhah
یک شنبه 01 اسفند 1389, 03:58 صبح
سلام

procedure TfrmLogin.FormCreate(Sender: TObject);
begin
s := ' time \\Server /set /y';
ShellExecute(Handle, 'open', 'net', pchar(s), nil, SW_HIDE);
Sleep(250);
end;

ممنون مشکلم حل شد (البته تو پست قبلی اشاره کردم).

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

با کامپوننت InDayTime خیلی راحت میشه ساعت و تاریخ را از یک سرور DateTime گرفت.

a_b_toops
یک شنبه 01 اسفند 1389, 10:48 صبح
شما می توانی با استفاده از یکی dll های sql این کار را انجام بدهی xp_cmdshell اگر در sql2000 به صورت پیش فرض فعال می باشد ولی در sql2005 به بالا باید فعال کنی که در google جستجو کنی پیدا می کنی طریقه استفاده

master..xp_cmdshell 'mkdir E:\Convert_D\Ama_896'

این برای ساخت یک پوشه است شما می توانی تمام دستورات تحت داس را از طریق این dll اجرا کنی
SELECT GETDATE() AS Expr1