Q&A
- Mysql DB로 저장시 속도가 너무느려요.!!
안녕하세요..!! 하나가 해결되니까..! 다른 하나가 또 생기는군요..!!ㅜ.ㅜ
다름이 아니오라..!! 아래 내용을 mysql DB로 저장을 시키려 하는데...
저장 속도가 너무 느리답니다..!!
물론 아래와 같이 필드가 4개고 데이타가 적을시는 괜찮은거 같은데....
필드도 아래거보다 훨씬 많은 44개 이고(이건 상관없나..?^^)
데이타양이 시간대별로 저장되어있을시 텍스트에(양이 많음(1000건 도 넘는거 같음)
저장속가 엄청느립니다..!!
해결하는 방법좀 가르쳐 주십시요..!
Q/A 찾아보니까..query를 써서 commit을 하라고는 되어있는데...
아직 델파이 초보라서 잘 활용을 못하겠습니다..!!
고수님들의 의견 기다리겠습니다..!!^^
procedure TForm1.Button1Click(Sender: TObject);
var
f : TextFile;
s, s1, s2, s3 : String;
Str_len, Pos1_len, Pos2_len, Pos3_len, Pos4_len, i : Integer;
begin
OpenDialog1.Execute;
if OpenDialog1.FileName <> '' then
begin
Assignfile(F, OpenDialog1.FileName);
reset(F);
while Not eof(F) do
begin
readln(F,S);
Table1.Append;
Table1.Edit;
Str_len := length(S);
Pos1_len := Pos(' ', S)-1;
S1 := Copy(S, Pos1_len+2, Str_len);
Pos2_len := Pos(' ', Copy(S1, 0, Str_len))-1;
S2 := Copy(S1, Pos2_len+2, Str_len);
Pos3_len := Pos(' ', Copy(S2, 0, Str_len))-1;
S3 := Copy(S2,Pos3_len+2,Str_len);
Pos4_len := Pos(' ', Copy(S3, 0, Str_len))-1;
.
.
Table1.FieldByName('a').asString := Copy(S , 0, Pos1_len);
Table1.FieldByName('b').asString := Copy(S1, 0, Pos2_len);
Table1.FieldbyName('c').asString := Copy(S2, 0, Pos3_len);
.
.
Table1.FieldByName('d').AsString := S3;
Table1.Post;
Table1.Next;
end;
closefile(F);
end;
end;
다름이 아니오라..!! 아래 내용을 mysql DB로 저장을 시키려 하는데...
저장 속도가 너무 느리답니다..!!
물론 아래와 같이 필드가 4개고 데이타가 적을시는 괜찮은거 같은데....
필드도 아래거보다 훨씬 많은 44개 이고(이건 상관없나..?^^)
데이타양이 시간대별로 저장되어있을시 텍스트에(양이 많음(1000건 도 넘는거 같음)
저장속가 엄청느립니다..!!
해결하는 방법좀 가르쳐 주십시요..!
Q/A 찾아보니까..query를 써서 commit을 하라고는 되어있는데...
아직 델파이 초보라서 잘 활용을 못하겠습니다..!!
고수님들의 의견 기다리겠습니다..!!^^
procedure TForm1.Button1Click(Sender: TObject);
var
f : TextFile;
s, s1, s2, s3 : String;
Str_len, Pos1_len, Pos2_len, Pos3_len, Pos4_len, i : Integer;
begin
OpenDialog1.Execute;
if OpenDialog1.FileName <> '' then
begin
Assignfile(F, OpenDialog1.FileName);
reset(F);
while Not eof(F) do
begin
readln(F,S);
Table1.Append;
Table1.Edit;
Str_len := length(S);
Pos1_len := Pos(' ', S)-1;
S1 := Copy(S, Pos1_len+2, Str_len);
Pos2_len := Pos(' ', Copy(S1, 0, Str_len))-1;
S2 := Copy(S1, Pos2_len+2, Str_len);
Pos3_len := Pos(' ', Copy(S2, 0, Str_len))-1;
S3 := Copy(S2,Pos3_len+2,Str_len);
Pos4_len := Pos(' ', Copy(S3, 0, Str_len))-1;
.
.
Table1.FieldByName('a').asString := Copy(S , 0, Pos1_len);
Table1.FieldByName('b').asString := Copy(S1, 0, Pos2_len);
Table1.FieldbyName('c').asString := Copy(S2, 0, Pos3_len);
.
.
Table1.FieldByName('d').AsString := S3;
Table1.Post;
Table1.Next;
end;
closefile(F);
end;
end;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 유형종
- •
- 2001.12.27 22:59
- 1 COMMENTS
- /
- 0 LIKES
-
치치•2001.12.28 03:18그런 형태는 C 에서 Union 에 해당한다고 보면 됩니다. 구조체가 여러가지 형태를 가질수 있는 것을 그렇...
-
- 슬퍼요
- 2001.12.27 22:39
- 0 COMMENTS
- /
- 0 LIKES
-
-
델사랑•2001.12.28 01:56액션가면님이 올린 팁(이곳 한델)이 있네요... 실제 뷰는 아니고 SQL 스크립트를 마치 뷰처럼 속이는 방...
-
이경문•2001.12.27 22:30paradox는 view가 없습니다. 절망적인 답변인가요? 죄송합니다. -_-; 왕초보 wrote: > 델파이 진짜 ...
-
-
- 준허접
- 2001.12.27 21:16
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- 2001.12.27 21:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 머리쥐어뜯는자
- 2001.12.27 21:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- 2001.12.27 21:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 뭉게구름
- 2001.12.27 20:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 이슬
- 2001.12.27 20:35
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 궁금
- •
- 2001.12.27 20:14
- 1 COMMENTS
- /
- 0 LIKES
-
준허접•2001.12.27 22:15이렇게 해보시죠 var a,c:string; b:integer; begin a:='0024'; b:=strtoint(a); c:=fo...
-
- 스비
- 2001.12.27 19:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 강성용
- 2001.12.27 19:50
- 0 COMMENTS
- /
- 0 LIKES
-
- hs
- 2001.12.27 19:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 눈길
- 2001.12.27 14:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 송인표
- 2001.12.27 08:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 정소연
- 2001.12.27 08:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁그미
- 2001.12.27 06:39
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금해서 미치기 일보
- 2001.12.27 05:28
- 0 COMMENTS
- /
- 0 LIKES
-
- Commom
- •
- 2001.12.27 05:14
- 1 COMMENTS
- /
- 0 LIKES
안녕하세요..!! 하나가 해결되니까..! 다른 하나가 또 생기는군요..!!ㅜ.ㅜ 다름이 아니오라..!! 아래 내용을 mysql DB로 저장을 시키려 하는데... 저장 속도가 너무 느리답니다..!! 물론 아래와 같이 필드가 4개고 데이타가 적을시는 괜...-
^-_-^•2001.12.27 07:01yo` TTable을 사용하시네요? TQuery로 insert문을 사용하세요!! ^^'' 글쿠 텍스트파일이 정형화가 되...
TTable을 사용하시네요? TQuery로 insert문을 사용하세요!! ^^''
글쿠 텍스트파일이 정형화가 되어 있다면 load data infile 문으로 더 빨리 인서트를 할수 있습니다. mysqlimport 유틸리티를 사용해도 되고요..
RDB는 TQuery콤포같은것으로 쿼리를 이용하는것이 속도면이나, 안정성이나 좋습니다.
그럼 이만..
bLue bLood.
Commom wrote:
> 안녕하세요..!! 하나가 해결되니까..! 다른 하나가 또 생기는군요..!!ㅜ.ㅜ
> 다름이 아니오라..!! 아래 내용을 mysql DB로 저장을 시키려 하는데...
> 저장 속도가 너무 느리답니다..!!
> 물론 아래와 같이 필드가 4개고 데이타가 적을시는 괜찮은거 같은데....
> 필드도 아래거보다 훨씬 많은 44개 이고(이건 상관없나..?^^)
> 데이타양이 시간대별로 저장되어있을시 텍스트에(양이 많음(1000건 도 넘는거 같음)
> 저장속가 엄청느립니다..!!
> 해결하는 방법좀 가르쳐 주십시요..!
> Q/A 찾아보니까..query를 써서 commit을 하라고는 되어있는데...
> 아직 델파이 초보라서 잘 활용을 못하겠습니다..!!
> 고수님들의 의견 기다리겠습니다..!!^^
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> f : TextFile;
> s, s1, s2, s3 : String;
> Str_len, Pos1_len, Pos2_len, Pos3_len, Pos4_len, i : Integer;
> begin
> OpenDialog1.Execute;
> if OpenDialog1.FileName <> '' then
> begin
> Assignfile(F, OpenDialog1.FileName);
> reset(F);
>
>
> while Not eof(F) do
> begin
> readln(F,S);
> Table1.Append;
> Table1.Edit;
>
> Str_len := length(S);
> Pos1_len := Pos(' ', S)-1;
>
> S1 := Copy(S, Pos1_len+2, Str_len);
> Pos2_len := Pos(' ', Copy(S1, 0, Str_len))-1;
>
> S2 := Copy(S1, Pos2_len+2, Str_len);
> Pos3_len := Pos(' ', Copy(S2, 0, Str_len))-1;
>
> S3 := Copy(S2,Pos3_len+2,Str_len);
> Pos4_len := Pos(' ', Copy(S3, 0, Str_len))-1;
> .
> .
>
>
> Table1.FieldByName('a').asString := Copy(S , 0, Pos1_len);
> Table1.FieldByName('b').asString := Copy(S1, 0, Pos2_len);
> Table1.FieldbyName('c').asString := Copy(S2, 0, Pos3_len);
> .
> .
> Table1.FieldByName('d').AsString := S3;
> Table1.Post;
> Table1.Next;
> end;
> closefile(F);
> end;
> end;
>