Q&A

  • Txt 파일과 DB에 관한.....
@1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 0236756325

@2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875







이런 식으로 되었 있는 텍스트 파일이 있다면요??

이 텍스트 파일을 DB(어떤한 DB든..)에다가 각 컬럼에 맞게 델파이로 넣어 줄수 있나요???

있다면 쪼매만 갈켜 주세요.... 아님 간단한 소스라도 .... 좀.... 이번주 까지 해결 해야 되요!! ㅜ.ㅜ;;

혹시 갈켜 주실 분 있으시면 멜이나 게시판에 좀 자세히 설명 좀 해 주세요.....

참 그리고 txt파일의 앞에 있는 @1,@2 는 프로그램이 돌아 갈때 그넘은 만나면 어떤 테이블에 잡아 넣어야 하는 거에요.......^^ 고수님들 부탁 드립니다....



DB의 Table 명은 pation 이고요...

각 컬럼명은 patnum ; 8byte

patname ; 16byte

patsex ; 2byte

patjumin1 ; 6byte

patjumin2 ; 7byte

patjuso ; 160byte

pattel1 ; 12byte

pattel2 ; 12byte 입니다....



제발 부탁 좀 드리 겠습니다......

제가 이번달에 델파이가 첨인데다가 갑자기 어려운 문제에 직면 했네요..... 부탁 드립니다....

그럼 님들 오늘 오후도 행복 하세요.... 꾸벅!!!

이 게시물을
6  COMMENTS
  • Profile
    징글징글델파이 • 2001.09.21 02:20
    김성준(델초보) wrote:

    > @1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 236756325

    > @2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875



    라인간격이 일정할경우 저의 경우는 이렇게 해결했습니다...



    먼저 Richedit를 놓고요..(Richedit는 1라인에 쭈욱 들어가니까요....)



    (OpenDialog 통해서 화일을 불러오면되고요.. 이 관련소스는 모든 델파이책이나

    KDDG 홈페이지에 찾아보면 있겠지요...



    그뒤에... 스트링변수를 하나 선언합니다...



    for i := 0 to Richedit.Lines.Count-1 do // 데이타 건수만큼 반복

    begin

    S := Richedit.Lines[i];



    with Q_Insert do // 저장할 쿼리문장

    begin

    Close;

    ParamByName('A1').Asstring := Copy(S,1,2);

    어짜구저짜구

    ParamByName('A30').Asstring := Copy(S,1,2);

    ExecSQL;

    end;



    end;



    일단이런식으로 저는 해결했습니다.....



    여기에는 중복체크 나중에 하셔야지요 한 번 더 돌리면... 중복에러나 이중자료가

    되겠지요.. 차근차근 풀어가세요...

  • Profile
    델마왕 • 2001.09.19 01:46
    텍스트 데이타를 읽어들이는 방법임다. 참고하심. 고생하시길....

    procedure TPPPF.StartClick(Sender: TObject);

    var

    FName : String;

    FileHandle: TextFile;

    Ch: Char;

    Buf_Str : string;

    begin



    AssignFile(FileHandle, FileName.Text); //Form 입력

    Reset(FileHandle);

    Read(FileHandle, Ch);

    while not Eof(FileHandle) do

    begin

    데이타 1바이트씩 읽음

    데이타조작은 본인이 알아서

    Read(FileHandle, Ch);

    end; //while

    CloseFile(FileHandle);

    end;

  • Profile
    바람개비 • 2001.09.19 01:20
    > @1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 0236756325

    > @2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875

    각각의 항목이 고정된 길이를 가지고 각 항목의 길이를 배열에 집어넣은후 루프를 돌리면서 copy 함수를 이용, 자르면 되겠구요,

    아니면 이걸 일단 엑셀파일로 변환한후 만들어진 디비에 집어넣은 방법도 있겠군요.



    바라미~



  • Profile
    사발우성 • 2001.09.18 23:46
    length만 같다면 copy로 잘라서 사용하면 돼지 않을까엽??



    김성준(델초보) wrote:

    > @1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 0236756325

    > @2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875

    >

    >

    >

    > 이런 식으로 되었 있는 텍스트 파일이 있다면요??

    > 이 텍스트 파일을 DB(어떤한 DB든..)에다가 각 컬럼에 맞게 델파이로 넣어 줄수 있나요???

    > 있다면 쪼매만 갈켜 주세요.... 아님 간단한 소스라도 .... 좀.... 이번주 까지 해결 해야 되요!! ㅜ.ㅜ;;

    > 혹시 갈켜 주실 분 있으시면 멜이나 게시판에 좀 자세히 설명 좀 해 주세요.....

    > 참 그리고 txt파일의 앞에 있는 @1,@2 는 프로그램이 돌아 갈때 그넘은 만나면 어떤 테이블에 잡아 넣어야 하는 거에요.......^^ 고수님들 부탁 드립니다....

    >

    > DB의 Table 명은 pation 이고요...

    > 각 컬럼명은 patnum ; 8byte

    > patname ; 16byte

    > patsex ; 2byte

    > patjumin1 ; 6byte

    > patjumin2 ; 7byte

    > patjuso ; 160byte

    > pattel1 ; 12byte

    > pattel2 ; 12byte 입니다....

    >

    > 제발 부탁 좀 드리 겠습니다......

    > 제가 이번달에 델파이가 첨인데다가 갑자기 어려운 문제에 직면 했네요..... 부탁 드립니다....

    > 그럼 님들 오늘 오후도 행복 하세요.... 꾸벅!!!

  • Profile
    김성준(델초보) • 2001.09.19 00:16
    분명히 잘라서 사용해야 된다는 건 아는데요....

    방법을 좀 갈켜 주세요... 소스나....!!!! 에공~~

    length가 다르면 어찌 해야 하나요?????????



    사발우성 wrote:

    > length만 같다면 copy로 잘라서 사용하면 돼지 않을까엽??

    >

    > 김성준(델초보) wrote:

    > > @1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 0236756325

    > > @2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875

    > >

    > >

    > >

    > > 이런 식으로 되었 있는 텍스트 파일이 있다면요??

    > > 이 텍스트 파일을 DB(어떤한 DB든..)에다가 각 컬럼에 맞게 델파이로 넣어 줄수 있나요???

    > > 있다면 쪼매만 갈켜 주세요.... 아님 간단한 소스라도 .... 좀.... 이번주 까지 해결 해야 되요!! ㅜ.ㅜ;;

    > > 혹시 갈켜 주실 분 있으시면 멜이나 게시판에 좀 자세히 설명 좀 해 주세요.....

    > > 참 그리고 txt파일의 앞에 있는 @1,@2 는 프로그램이 돌아 갈때 그넘은 만나면 어떤 테이블에 잡아 넣어야 하는 거에요.......^^ 고수님들 부탁 드립니다....

    > >

    > > DB의 Table 명은 pation 이고요...

    > > 각 컬럼명은 patnum ; 8byte

    > > patname ; 16byte

    > > patsex ; 2byte

    > > patjumin1 ; 6byte

    > > patjumin2 ; 7byte

    > > patjuso ; 160byte

    > > pattel1 ; 12byte

    > > pattel2 ; 12byte 입니다....

    > >

    > > 제발 부탁 좀 드리 겠습니다......

    > > 제가 이번달에 델파이가 첨인데다가 갑자기 어려운 문제에 직면 했네요..... 부탁 드립니다....

    > > 그럼 님들 오늘 오후도 행복 하세요.... 꾸벅!!!

  • Profile
    사발우성 • 2001.09.19 01:09
    ^^;; copy 사용법은 게시판에 무지 무지 마너엽 ^^

    아님 F1번 help를 찾아 보시길..^^



    김성준(델초보) wrote:

    > 분명히 잘라서 사용해야 된다는 건 아는데요....

    > 방법을 좀 갈켜 주세요... 소스나....!!!! 에공~~

    > length가 다르면 어찌 해야 하나요?????????

    >

    > 사발우성 wrote:

    > > length만 같다면 copy로 잘라서 사용하면 돼지 않을까엽??

    > >

    > > 김성준(델초보) wrote:

    > > > @1 12356789 김성준 7402051678512 서울시 종로구 충신동 0165095575 0236756325

    > > > @2 44568867 김길동 7801241246579 서울시 관악구 봉천7동 028873251 0115236875

    > > >

    > > >

    > > >

    > > > 이런 식으로 되었 있는 텍스트 파일이 있다면요??

    > > > 이 텍스트 파일을 DB(어떤한 DB든..)에다가 각 컬럼에 맞게 델파이로 넣어 줄수 있나요???

    > > > 있다면 쪼매만 갈켜 주세요.... 아님 간단한 소스라도 .... 좀.... 이번주 까지 해결 해야 되요!! ㅜ.ㅜ;;

    > > > 혹시 갈켜 주실 분 있으시면 멜이나 게시판에 좀 자세히 설명 좀 해 주세요.....

    > > > 참 그리고 txt파일의 앞에 있는 @1,@2 는 프로그램이 돌아 갈때 그넘은 만나면 어떤 테이블에 잡아 넣어야 하는 거에요.......^^ 고수님들 부탁 드립니다....

    > > >

    > > > DB의 Table 명은 pation 이고요...

    > > > 각 컬럼명은 patnum ; 8byte

    > > > patname ; 16byte

    > > > patsex ; 2byte

    > > > patjumin1 ; 6byte

    > > > patjumin2 ; 7byte

    > > > patjuso ; 160byte

    > > > pattel1 ; 12byte

    > > > pattel2 ; 12byte 입니다....

    > > >

    > > > 제발 부탁 좀 드리 겠습니다......

    > > > 제가 이번달에 델파이가 첨인데다가 갑자기 어려운 문제에 직면 했네요..... 부탁 드립니다....

    > > > 그럼 님들 오늘 오후도 행복 하세요.... 꾸벅!!!
←First Page
1580 1581 1582 1583 1584 1585 1586 1587 1588 1589
Last Page→
한델 로그인 하기