Q&A

  • 날짜 나눠서 DB에 입력하는데 자꾸 에러가 생기네요.
저기요..DB는 MSACCESS 고요..

Month Calendar를 이용해서 날짜를 DB에 넣을려구 하거든요..



그냥 2001-05-14이런 식으로 넣는게 아니고요.. year,month,day로 각각 copy를 이용해서 나눠서 필드에 넣을려구 하는데... 자꾸 에러가 뜨네요..



EdtMomo.Text <= DBEdit박스 입니다.



저의 소스를 좀 보시구 좋은 답변 부탁드립니다.



var

cDt, cYear, cMonth, cDay : String;

begin

cDt:=DateToStr(MonthCalendar1.Date);

cYear:=copy(cDt,1,4);

cMonth:=copy(cDt,6,2);

cDay:=copy(cDt,9,2);

with CalendarSql do begin

Close;

Sql.Clear;

Sql.Add('Insert into 공휴일');

Sql.Add('(C_Year,C_Month,C_Day,C_Memo)');

sql.Add('values('+

QuotedStr(cYear)+','+

QuotedStr(cMonth)+','+

QuotedStr(cDay)+','+

QuotedStr(EdtMemo.Text));

execSql;

end;

end;





1  COMMENTS
  • Profile
    김영현 2001.05.30 16:06
    이은영 wrote:

    > 저기요..DB는 MSACCESS 고요..

    > Month Calendar를 이용해서 날짜를 DB에 넣을려구 하거든요..

    >

    > 그냥 2001-05-14이런 식으로 넣는게 아니고요.. year,month,day로 각각 copy를 이용해서 나눠서 필드에 넣을려구 하는데... 자꾸 에러가 뜨네요..

    >

    > EdtMomo.Text <= DBEdit박스 입니다.

    >

    > 저의 소스를 좀 보시구 좋은 답변 부탁드립니다.

    >

    > var

    > cDt, cYear, cMonth, cDay : String;

    > begin

    > cDt:=DateToStr(MonthCalendar1.Date);

    > cYear:=copy(cDt,1,4);

    > cMonth:=copy(cDt,6,2);

    > cDay:=copy(cDt,9,2);

    > with CalendarSql do begin

    > Close;

    > Sql.Clear;

    > Sql.Add('Insert into 공휴일');

    > Sql.Add('(C_Year,C_Month,C_Day,C_Memo)');

    > sql.Add('values('+

    > QuotedStr(cYear)+','+

    > QuotedStr(cMonth)+','+

    > QuotedStr(cDay)+','+

    > QuotedStr(EdtMemo.Text));

    > execSql;

    > end;

    > end;

    >

    >



    마지막 괄호를 빼먹었네요...ShowMessage(CalendarSql.Text)를 찍어보세요.