Q&A

  • memo의 내용을 mssql에 저장시 저장이 안됨!!!!!
아래의 소스대로 db에 저장할려고 할때

3줄까지는 아무이상 없이 저장이 잘됩니다 그러나 3줄이상 넘어가면

저장한 부분이 없어져버리고 그냥실행됨니다.

그 원인을 모르겠네요!!!!!

혹시 memo의 저장방법이 다른지

제가 db쪽에 이상이 있나해서 stext의 필드 자리수를 vcart 5000 정도로 여유 있게 잡아 놓았지만 데이타가 들어가지 않는 이유가 무엇인지 모르겠군요!!!

고수님 제발 좀.......

STEMP_HOTISSUENO := EDHOTISSUENO.Text;

STEMP_TITLE := EDTITLE.Text;

STEMP_FROMDATE := EDFROMDATE.Text ;

STEMP_TODATE := EDTODATE.Text;

STEMP_STEXT := EDSTEXT.text ; ........이부분이 memo 컴포넌트입니다

// stemp_new := 'N';



//Y=insert n=edit

if stemp_new = 'Y' then

begin

UPDATEHOTISSUE.DataSet.Insert ;

end;

if stemp_new = 'N' then

begin

UPDATEHOTISSUE.DataSet.Edit ;

end;



if STEMP_TITLE = '' then

begin

showmessage('제목은 필수 입력항목 입니다.');

exit;

end;





if STEMP_STEXT = '' then

begin

showmessage('HOTISSUE 내역는 필수 입력항목 입니다.');

exit;

end;





UPDATEHOTISSUE.DataSet.FieldByName('HOTISSUENO').asstring := STEMP_HOTISSUENO ;

UPDATEHOTISSUE.DataSet.FieldByName('TITLE').AsString := STEMP_TITLE;

UPDATEHOTISSUE.DataSet.FieldByName('STEXT') := STEMP_STEXT;..이부분이 memo

UPDATEHOTISSUE.DataSet.FieldByName('FROMDATE').AsString := STEMP_FROMDATE;

UPDATEHOTISSUE.DataSet.FieldByName('TODATE').AsString := STEMP_TODATE;

UPDATEHOTISSUE.DataSet.ApplyUpdates ;



3  COMMENTS
  • Profile
    종이학 2000.04.18 19:14
    UPDATEHOTISSUE.DataSet.FieldByName('STEXT').AsMemo로 해보세요..





    델love wrote:

    > 아래의 소스대로 db에 저장할려고 할때

    > 3줄까지는 아무이상 없이 저장이 잘됩니다 그러나 3줄이상 넘어가면

    > 저장한 부분이 없어져버리고 그냥실행됨니다.

    > 그 원인을 모르겠네요!!!!!

    > 혹시 memo의 저장방법이 다른지

    > 제가 db쪽에 이상이 있나해서 stext의 필드 자리수를 vcart 5000 정도로 여유 있게 잡아 놓았지만 데이타가 들어가지 않는 이유가 무엇인지 모르겠군요!!!

    > 고수님 제발 좀.......

    > STEMP_HOTISSUENO := EDHOTISSUENO.Text;

    > STEMP_TITLE := EDTITLE.Text;

    > STEMP_FROMDATE := EDFROMDATE.Text ;

    > STEMP_TODATE := EDTODATE.Text;

    > STEMP_STEXT := EDSTEXT.text ; ........이부분이 memo 컴포넌트입니다

    > // stemp_new := 'N';

    >

    > //Y=insert n=edit

    > if stemp_new = 'Y' then

    > begin

    > UPDATEHOTISSUE.DataSet.Insert ;

    > end;

    > if stemp_new = 'N' then

    > begin

    > UPDATEHOTISSUE.DataSet.Edit ;

    > end;

    >

    > if STEMP_TITLE = '' then

    > begin

    > showmessage('제목은 필수 입력항목 입니다.');

    > exit;

    > end;

    >

    >

    > if STEMP_STEXT = '' then

    > begin

    > showmessage('HOTISSUE 내역는 필수 입력항목 입니다.');

    > exit;

    > end;

    >

    >

    > UPDATEHOTISSUE.DataSet.FieldByName('HOTISSUENO').asstring := STEMP_HOTISSUENO ;

    > UPDATEHOTISSUE.DataSet.FieldByName('TITLE').AsString := STEMP_TITLE;

    > UPDATEHOTISSUE.DataSet.FieldByName('STEXT') := STEMP_STEXT;..이부분이 memo

    > UPDATEHOTISSUE.DataSet.FieldByName('FROMDATE').AsString := STEMP_FROMDATE;

    > UPDATEHOTISSUE.DataSet.FieldByName('TODATE').AsString := STEMP_TODATE;

    > UPDATEHOTISSUE.DataSet.ApplyUpdates ;

    >

  • Profile
    델love 2000.04.18 20:15
    종이학님감사합니다.

    그런데 asmemo시에 [Error] UHOTISSUE.pas(217): Undeclared identifier: 'asmemo'라는

    메시지가 발생합니다

    다른곳에서 정의가 필요한것이 안인지요

    종이학 wrote:

    > UPDATEHOTISSUE.DataSet.FieldByName('STEXT').AsMemo로 해보세요..

    >

    >

    > 델love wrote:

    > > 아래의 소스대로 db에 저장할려고 할때

    > > 3줄까지는 아무이상 없이 저장이 잘됩니다 그러나 3줄이상 넘어가면

    > > 저장한 부분이 없어져버리고 그냥실행됨니다.

    > > 그 원인을 모르겠네요!!!!!

    > > 혹시 memo의 저장방법이 다른지

    > > 제가 db쪽에 이상이 있나해서 stext의 필드 자리수를 vcart 5000 정도로 여유 있게 잡아 놓았지만 데이타가 들어가지 않는 이유가 무엇인지 모르겠군요!!!

    > > 고수님 제발 좀.......

    > > STEMP_HOTISSUENO := EDHOTISSUENO.Text;

    > > STEMP_TITLE := EDTITLE.Text;

    > > STEMP_FROMDATE := EDFROMDATE.Text ;

    > > STEMP_TODATE := EDTODATE.Text;

    > > STEMP_STEXT := EDSTEXT.text ; ........이부분이 memo 컴포넌트입니다

    > > // stemp_new := 'N';

    > >

    > > //Y=insert n=edit

    > > if stemp_new = 'Y' then

    > > begin

    > > UPDATEHOTISSUE.DataSet.Insert ;

    > > end;

    > > if stemp_new = 'N' then

    > > begin

    > > UPDATEHOTISSUE.DataSet.Edit ;

    > > end;

    > >

    > > if STEMP_TITLE = '' then

    > > begin

    > > showmessage('제목은 필수 입력항목 입니다.');

    > > exit;

    > > end;

    > >

    > >

    > > if STEMP_STEXT = '' then

    > > begin

    > > showmessage('HOTISSUE 내역는 필수 입력항목 입니다.');

    > > exit;

    > > end;

    > >

    > >

    > > UPDATEHOTISSUE.DataSet.FieldByName('HOTISSUENO').asstring := STEMP_HOTISSUENO ;

    > > UPDATEHOTISSUE.DataSet.FieldByName('TITLE').AsString := STEMP_TITLE;

    > > UPDATEHOTISSUE.DataSet.FieldByName('STEXT') := STEMP_STEXT;..이부분이 memo

    > > UPDATEHOTISSUE.DataSet.FieldByName('FROMDATE').AsString := STEMP_FROMDATE;

    > > UPDATEHOTISSUE.DataSet.FieldByName('TODATE').AsString := STEMP_TODATE;

    > > UPDATEHOTISSUE.DataSet.ApplyUpdates ;

    > >

  • Profile
    델love 2000.04.19 00:03
    MEMO일경우 FIELD의 TYPE를 VCHAR 에서 TEXT로 수정한결과

    데이타 완전하게 INSERT및 UPDATE가가능...

    델love wrote:

    > 종이학님감사합니다.

    > 그런데 asmemo시에 [Error] UHOTISSUE.pas(217): Undeclared identifier: 'asmemo'라는

    > 메시지가 발생합니다

    > 다른곳에서 정의가 필요한것이 안인지요

    > 종이학 wrote:

    > > UPDATEHOTISSUE.DataSet.FieldByName('STEXT').AsMemo로 해보세요..

    > >

    > >

    > > 델love wrote:

    > > > 아래의 소스대로 db에 저장할려고 할때

    > > > 3줄까지는 아무이상 없이 저장이 잘됩니다 그러나 3줄이상 넘어가면

    > > > 저장한 부분이 없어져버리고 그냥실행됨니다.

    > > > 그 원인을 모르겠네요!!!!!

    > > > 혹시 memo의 저장방법이 다른지

    > > > 제가 db쪽에 이상이 있나해서 stext의 필드 자리수를 vcart 5000 정도로 여유 있게 잡아 놓았지만 데이타가 들어가지 않는 이유가 무엇인지 모르겠군요!!!

    > > > 고수님 제발 좀.......

    > > > STEMP_HOTISSUENO := EDHOTISSUENO.Text;

    > > > STEMP_TITLE := EDTITLE.Text;

    > > > STEMP_FROMDATE := EDFROMDATE.Text ;

    > > > STEMP_TODATE := EDTODATE.Text;

    > > > STEMP_STEXT := EDSTEXT.text ; ........이부분이 memo 컴포넌트입니다

    > > > // stemp_new := 'N';

    > > >

    > > > //Y=insert n=edit

    > > > if stemp_new = 'Y' then

    > > > begin

    > > > UPDATEHOTISSUE.DataSet.Insert ;

    > > > end;

    > > > if stemp_new = 'N' then

    > > > begin

    > > > UPDATEHOTISSUE.DataSet.Edit ;

    > > > end;

    > > >

    > > > if STEMP_TITLE = '' then

    > > > begin

    > > > showmessage('제목은 필수 입력항목 입니다.');

    > > > exit;

    > > > end;

    > > >

    > > >

    > > > if STEMP_STEXT = '' then

    > > > begin

    > > > showmessage('HOTISSUE 내역는 필수 입력항목 입니다.');

    > > > exit;

    > > > end;

    > > >

    > > >

    > > > UPDATEHOTISSUE.DataSet.FieldByName('HOTISSUENO').asstring := STEMP_HOTISSUENO ;

    > > > UPDATEHOTISSUE.DataSet.FieldByName('TITLE').AsString := STEMP_TITLE;

    > > > UPDATEHOTISSUE.DataSet.FieldByName('STEXT') := STEMP_STEXT;..이부분이 memo

    > > > UPDATEHOTISSUE.DataSet.FieldByName('FROMDATE').AsString := STEMP_FROMDATE;

    > > > UPDATEHOTISSUE.DataSet.FieldByName('TODATE').AsString := STEMP_TODATE;

    > > > UPDATEHOTISSUE.DataSet.ApplyUpdates ;

    > > >