BMS-HOSxP Community

HOSxP => Delphi / Pascal => ข้อความที่เริ่มโดย: perfectk ที่ ตุลาคม 22, 2012, 09:48:13 AM

หัวข้อ: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: perfectk ที่ ตุลาคม 22, 2012, 09:48:13 AM

อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
ไม่ทราบว่าต้องเขียนออกมาประมาณไหนครับ ขอบคุณครับ

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: usa0823 ที่ ตุลาคม 22, 2012, 10:29:38 AM

ใช้ DATEDIFF
SELECT DATEDIFF('2007-12-31','2007-12-30')

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: perfectk ที่ ตุลาคม 22, 2012, 10:56:28 AM

ขอบคุณครับ
ถ้าเขียนเป็น delphi หรือ pascal มี function แบบนี้ไหมครับ
จะเอาไปใช้ใน SYS_VN_PRE_SCRIPT ครับ

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: usa0823 ที่ ตุลาคม 22, 2012, 11:08:57 AM

ประกาศตัวแปร day:integer;

day:=getsqldata('select datediff("2007-12-31","2007-12-30") as cc');

ไม่รู้ว่าได้ไหม ;D

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: perfectk ที่ พฤศจิกายน 09, 2012, 12:03:38 PM

ถ้าอยากลบกับวันที่ปัจจุบันจะเขียน ยังไงครับ
ขอบคุณครับ

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: woravet ที่ พฤศจิกายน 09, 2012, 12:30:32 PM

select datediff(now(),'2012-1-1') as cc

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: manoi ที่ พฤศจิกายน 09, 2012, 13:15:01 PM

var d1,d2: TDateTime;
 i : Integer;
begin

  d1 := StrToDate('01/01/2000'); // 2000-01-01

  d2 := Date;  // today

  i := Trunc(d2 - d1) + 1  ;   // จำนวนวันที่ห่างกัน ปกติจะ + ด้วย 1 เพื่อให้ได้ค่าจำนวนที่ถูกต้อง



end;

หัวข้อ: Re: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
เริ่มหัวข้อโดย: perfectk ที่ พฤศจิกายน 12, 2012, 14:59:20 PM

ขอบคุณค้าบ ได้แล้วค้าบ