Q&A
- 데이타베이스에 있는 멜주소로 멜 보내는 방법
안녕하세여..
지금 데이타베이스에 있는 멜주소로 단체로 메일을 보낼려구 합니다.
근데..
어떻게 해야할지 잘 생각이 나지 않는군여..
혹시 이에 관련하여 알고 계시는 고수분들이 있다면 답변 좀 부탁드립니다.
어떤 오브젝트로 어떻해야 할지 도저히 생각이 나지 않아서여 ㅠ,.ㅠ
데이타베이스는 ms-sql2000 이구여
알려주신다면 참 감사하겠습니다.
우선 저도 연구해 보구여
지금 데이타베이스에 있는 멜주소로 단체로 메일을 보낼려구 합니다.
근데..
어떻게 해야할지 잘 생각이 나지 않는군여..
혹시 이에 관련하여 알고 계시는 고수분들이 있다면 답변 좀 부탁드립니다.
어떤 오브젝트로 어떻해야 할지 도저히 생각이 나지 않아서여 ㅠ,.ㅠ
데이타베이스는 ms-sql2000 이구여
알려주신다면 참 감사하겠습니다.
우선 저도 연구해 보구여
2
COMMENTS
-
-
강인규 wrote:
> FastNet에 있는 NMSMTP컴퍼넌트를 이용하여 기능을 구현하실 수 있습니다.
> 디비의 종류는 어느것이든 상관없구 그냥 루프로 돌리시면 됩니다.
>
> var
> Content : String;
> begin
>
>
> With NMSMTP1 do
> begin
> //connect하는 알고리즘과 같이 처리하면 에러가 생길 수 있습니다.
> //프로시져를 하나 두시는게 좋을 듯....
> Charset:='euc-kr';
> Host:='메일서버 호스트명';
> Port:=25;
> UserID:='접속아이디';
> Connect;
>
> PostMessage.FromName:=Edit3.Text; //보내는넘 이름
> PostMessage.FromAddress:=Edit4.Text; //보내는넘 메일주소
> PostMessage.Subject:=Edit2.Text; //제목
>
> if Edit6.Text <> '' then PostMessage.Attachments.Add(Edit6.Text);
> //첨부화일이 있을경우 FullPath로 적어줍니다.
> // Query1.First;
> intCNT := 1;
> Edit1.Text:=IntToStr(intCNT);
> while not Query1.Eof do
> begin
> PostMessage.ToAddress.Add(Query1.FieldByName('mail').asString);
> Content := memo1.Text;
>
> PostMessage.Body.Add(Content);
> Try
> SendMail;
> PostMessage.Body.Clear;
> PostMessage.ToAddress.Clear;
> PostMessage.Body.Clear;
> Query1.Next;
> except
> PostMessage.Body.Clear;
> PostMessage.ToAddress.Clear;
> PostMessage.Body.Clear;
> Query1.Next;
> end;
> intCNT:=intCNT+1;
> Edit1.Text:=IntToStr(intCNT);
> end;
> Disconnect;
> PostMessage.ToAddress.Clear;
> PostMessage.Body.Clear;
> PostMessage.Attachments.Clear;
> ShowMessage('모든 메일이 발송되었습니다');
> end;
>
> 주석이 빈약해 개발세발이군여...그래두 찬찬히 보시면 알아먹을만은 합니다.
> 즐프하세여~ ^-^
>
> 모름이 wrote:
> > 안녕하세여..
> > 지금 데이타베이스에 있는 멜주소로 단체로 메일을 보낼려구 합니다.
> > 근데..
> > 어떻게 해야할지 잘 생각이 나지 않는군여..
> > 혹시 이에 관련하여 알고 계시는 고수분들이 있다면 답변 좀 부탁드립니다.
> > 어떤 오브젝트로 어떻해야 할지 도저히 생각이 나지 않아서여 ㅠ,.ㅠ
> > 데이타베이스는 ms-sql2000 이구여
> > 알려주신다면 참 감사하겠습니다.
> > 우선 저도 연구해 보구여
> >
> >
(NOTICE) You must be logged in to comment on this post.
-
- 궁굼이
- •
- 2001.02.02 05:45
- 1 COMMENTS
- /
- 0 LIKES
-
서록•2001.02.02 06:58실제로 특정 서비스에 대한 고정된 양식은 없습니다. 원하신다면 80번 포트에서 FTP서비스를 하셔도 좋고....
-
- 이주연
- •
- 2001.02.02 05:45
- 6 COMMENTS
- /
- 0 LIKES
-
아폴론•2001.02.03 04:00
-
윤광석•2001.02.02 06:18
-
이주연•2001.02.02 06:45
-
이주연•2001.02.02 06:47
-
^-_-^•2001.02.02 09:35
-
델초보•2001.02.02 19:02
-
- 서영택
- 2001.02.02 05:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 잡동사니
- •
- 2001.02.02 04:41
- 2 COMMENTS
- /
- 0 LIKES
-
강인규•2001.02.02 05:43잘은 모르겠으나 Get파라미터의 전송제한이 문제가 아닐까 생각됩니다. 정확한 크기는 생각나지 않으나 Ge...
-
잡동사니•2001.02.02 20:16감사합니다. 사실 제가 여자 친구에게 채였거든요.. ^.^ 요즘 마음이 심란해서 일도 안되고.. 정신 집...
-
- 눈부신너
- 2001.02.02 04:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 이세경
- •
- 2001.02.02 04:26
- 1 COMMENTS
- /
- 0 LIKES
-
JDHwang•2001.02.03 00:21이세경 wrote: > 안녕하세요.. > 음..제가 ActiveX폼안에서 퀵레포트를 이용해 웹상의 내용을 출력하려는...
-
- 칠라기
- 2001.02.02 04:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 박진수
- •
- 2001.02.02 04:44
- 3 COMMENTS
- /
- 0 LIKES
-
바보감자•2001.02.02 03:58박진수 wrote: > 쿼리한 내용을 txt 저장하려고 하는데 공백만 나오네요 > > > 소스는 다음과 같습...
-
박진수•2001.02.02 04:45바보감자 wrote: > 박진수 wrote: > > 쿼리한 내용을 txt 저장하려고 하는데 공백만 나오네요 > > >...
-
...•2001.02.02 08:51박진수 wrote: > 바보감자 wrote: > > 박진수 wrote: > > > 쿼리한 내용을 txt 저장하려고 하는데 공백...
-
- 뿌요
- •
- 2001.02.02 03:34
- 3 COMMENTS
- /
- 0 LIKES
-
강인규•2001.02.02 04:09머 정석적인 방법이라고는 생각되지 않습니다만 이런 방법도 괜찮을거 같습니다. 스트링형으로 전역변수...
-
김광섭•2001.02.02 03:49뿌요 wrote: > 여러모로 생각했는데 넘 막혀서 도와주세요.. > > procedure TForm1.ButtonClick(Sender...
-
뿌요•2001.02.02 04:01음.. 버튼은 하나구요... 버튼을 누르기전에 focus가 어디에 있다가 왔는지를 알면될것같은데.. 만약 e...
-
- 김양미
- 2001.02.02 03:30
- 0 COMMENTS
- /
- 0 LIKES
-
-
정대연•2001.02.02 03:35passio wrote: > 고객관리 프로그램을 수정 중에 있습니다. > 하나의 파일을 만든후(예, 주문서) 저정을 ...
-
-
- 수시아
- •
- 2001.02.02 03:27
- 1 COMMENTS
- /
- 0 LIKES
-
정대연•2001.02.02 03:32수시아 wrote: > 안녕하세요...여러고수님들... > 프로그램 초보자입니다... > 델파이에서 쿼리를 써서 ...
-
- 김연숙
- 2001.02.02 03:22
- 0 COMMENTS
- /
- 0 LIKES
-
- 나야
- •
- 2001.02.02 02:20
- 1 COMMENTS
- /
- 0 LIKES
-
서철기•2001.02.02 04:13var hApp :HWND; begin WinExec로 실행 시키고.. 그녀석의 핸들값을 FindWindow로 핸들을 잡아서 ...
-
- ?????
- •
- 2001.02.02 02:13
- 1 COMMENTS
- /
- 0 LIKES
-
뿌요•2001.02.02 03:39project의 option속성에 main form이 다른 것으로 설정되어 있는건 아닌지요.. ????? wrote: > 여러분...
-
- 맥스맨
- •
- 2001.02.02 01:52
- 5 COMMENTS
- /
- 0 LIKES
-
아폴론•2001.02.02 03:00
-
맥스맨•2001.02.02 03:27
-
오명탁•2001.02.02 03:48
-
맥스맨•2001.02.02 04:28
-
오명탁•2001.02.02 07:11
-
- 델초보
- 2001.02.02 01:44
- 0 COMMENTS
- /
- 0 LIKES
-
- 맥스맨
- •
- 2001.02.02 01:31
- 3 COMMENTS
- /
- 0 LIKES
-
모름이•2001.02.02 01:34맥스맨 wrote: > dm.tmp_qr.ApplyUpdates; 위에 문장에서 이것을 쓰면 > edit,insert가 안된다나 그러면...
-
맥스맨•2001.02.02 01:39모름이 wrote: > 맥스맨 wrote: > > dm.tmp_qr.ApplyUpdates; 위에 문장에서 이것을 쓰면 > > edit,ins...
-
델초보•2001.02.02 03:40전 초본데 제가 워낙 고생한거라 도움이 될까해서 올리네여. 그냥.. Tquery만 사용했습니다. var sz...
-
- 써니
- •
- 2001.02.02 01:27
- 2 COMMENTS
- /
- 0 LIKES
-
강인규•2001.02.02 01:33테이블이나 쿼리컴퍼넌트의 Field Editer를 열어서(컴퍼넌트를 더블클릭하심 됩니다) 필드를 추가하...
-
써니•2001.02.02 02:00땡큐땡큐
-
- 모름이
- •
- 2001.02.02 01:19
- 2 COMMENTS
- /
- 0 LIKES
안녕하세여.. 지금 데이타베이스에 있는 멜주소로 단체로 메일을 보낼려구 합니다. 근데.. 어떻게 해야할지 잘 생각이 나지 않는군여.. 혹시 이에 관련하여 알고 계시는 고수분들이 있다면 답변 좀 부탁드립니다. 어떤 오브젝트로 어떻해...-
강인규•2001.02.02 08:00FastNet에 있는 NMSMTP컴퍼넌트를 이용하여 기능을 구현하실 수 있습니다. 디비의 종류는 어느것이든 상관...
-
모름이•2001.02.02 19:31강인규 wrote: > FastNet에 있는 NMSMTP컴퍼넌트를 이용하여 기능을 구현하실 수 있습니다. > 디비의 종...
디비의 종류는 어느것이든 상관없구 그냥 루프로 돌리시면 됩니다.
var
Content : String;
begin
With NMSMTP1 do
begin
//connect하는 알고리즘과 같이 처리하면 에러가 생길 수 있습니다.
//프로시져를 하나 두시는게 좋을 듯....
Charset:='euc-kr';
Host:='메일서버 호스트명';
Port:=25;
UserID:='접속아이디';
Connect;
PostMessage.FromName:=Edit3.Text; //보내는넘 이름
PostMessage.FromAddress:=Edit4.Text; //보내는넘 메일주소
PostMessage.Subject:=Edit2.Text; //제목
if Edit6.Text <> '' then PostMessage.Attachments.Add(Edit6.Text);
//첨부화일이 있을경우 FullPath로 적어줍니다.
// Query1.First;
intCNT := 1;
Edit1.Text:=IntToStr(intCNT);
while not Query1.Eof do
begin
PostMessage.ToAddress.Add(Query1.FieldByName('mail').asString);
Content := memo1.Text;
PostMessage.Body.Add(Content);
Try
SendMail;
PostMessage.Body.Clear;
PostMessage.ToAddress.Clear;
PostMessage.Body.Clear;
Query1.Next;
except
PostMessage.Body.Clear;
PostMessage.ToAddress.Clear;
PostMessage.Body.Clear;
Query1.Next;
end;
intCNT:=intCNT+1;
Edit1.Text:=IntToStr(intCNT);
end;
Disconnect;
PostMessage.ToAddress.Clear;
PostMessage.Body.Clear;
PostMessage.Attachments.Clear;
ShowMessage('모든 메일이 발송되었습니다');
end;
주석이 빈약해 개발세발이군여...그래두 찬찬히 보시면 알아먹을만은 합니다.
즐프하세여~ ^-^
모름이 wrote:
> 안녕하세여..
> 지금 데이타베이스에 있는 멜주소로 단체로 메일을 보낼려구 합니다.
> 근데..
> 어떻게 해야할지 잘 생각이 나지 않는군여..
> 혹시 이에 관련하여 알고 계시는 고수분들이 있다면 답변 좀 부탁드립니다.
> 어떤 오브젝트로 어떻해야 할지 도저히 생각이 나지 않아서여 ㅠ,.ㅠ
> 데이타베이스는 ms-sql2000 이구여
> 알려주신다면 참 감사하겠습니다.
> 우선 저도 연구해 보구여
>
>