|
|
|
|
Á¤¼ö / 2000-09-08 / ¿ÀÈÄ 8:48:36 / 203.230.248.195
Á¶È¸¼ö : 126
|
[Áú¹®] Àϼö¸¦ °è»êÇÏ·Á¸é...?yl |
> <¼Ò½º>
>
> date1 = DateDiff("d", checkin, checkout)
>
> <¿¡·¯¸Þ¼¼Áö>
>
> Microsoft VBScript ·±Å¸ÀÓ ¿À·ù error '800a000d'
>
> Çü½ÄÀÌ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù: '[string: "20010226"]'
>
> ´äº¯ ºÎŹµå¸³´Ï´Ù.
>
>
>
=================================================================
checkin°ú checkoutÀÇ º¯¼ö ŸÀÔÀÌ ³¯Â¥ Æ÷¸ËÀÌ ¾Æ´Ï±â ¶§¹®ÀÔ´Ï´Ù..
Select ¹Ú½º¿¡¼ ¼±ÅÃµÇ ³â,¿ù,ÀÏ °ªÀ» Á¶ÇÕÇÑ ´ÙÀ½, ±×°ªÀº DateÇü½ÄÀ¸·Î ¹Ù²Ù¾î Áֽʽÿä...
¸¸¾à checkin Select ¹Ú½º Áß¿¡¼ ³â¿¡ ÇØ´çµÇ´Â º¯¼ö À̸§ÀÌ C_YearÀÌ°í ¿ù¿¡ ÇØ´çÇÏ´Â º¯¼ö°¡ C_Month, ÀÏ¿¡ ÇØ´çÇÏ´Â º¯¼ö°¡ C_DayÀ̶ó°í °¡Á¤ÇÕ´Ï´Ù...
(checkout˼ O_???)
±×·¯¸é ÀԷ°ªÀ» ³Ñ°Ü¿À´Â ÆäÀÌÁö¿¡¼ 󸮺κÐÀº
'CheckIn Day 󸮺κÐ
In_Year=Request.Form("I_Year")
In_Month=Request.Form("I_Month")
In_Day=Request.Form("I_Day")
In_Date=In_Year&"-"&In_Month&"-"&In_Day '³¯Â¥ÇüÅ·ΠÁ¶ÇÕ
In_Date=CDate(In_Date) '³¯Â¥ÇüÀ¸·Î Çü½Äº¯È¯
' CheckOut Day󸮺κÐ
Out_Year=Request.Form("O_Year")
Out_Month=Request.Form("O_Month")
Out_Day=Request.Form("O_Day")
Out_Date=Out_Year&"-"&Out_Month&"-"&Out_Day '³¯Â¥ÇüÅ·ΠÁ¶ÇÕ
Out_Date=CDate(Out_Date) '³¯Â¥ÇüÀ¸·Î Çü½Äº¯È¯
'³¯Â¥ ºñ±³...
Day_Gap = DateDiff("d", In_Date, Out_Date)
''''''''''''''''''''''''''''''''
Âü°í·Î CDate()ÇÔ¼ö´Â ³¯Â¥ Æ÷¸ËÀ¸·Î ¹Ù²ãÁÖ´Â ÇÔ¼öÀÔ´Ï´Ù..
µµ¿ò µÇ¼ÌÀ½ ÁÁ°Ú³×¿ä...
ÁÁÀº ¹ã µÇ¼¼¿ä... |
|
|
|