physics
一般會員
![](./myimg/board/mystar_empty.gif)
![](images/icon_photo_none.gif) 發表:11 回覆:11 積分:9 註冊:2002-05-21
發送簡訊給我
|
小弟又有一個問題:
我知道可以用
ShellExecute(NULL,NULL,"mailto:john@yahoo.com?Subject=Test",NULL,NULL,SW_SHOW);
來啟動預設 E-Mail 軟體開啟一個新郵件並填入 subject.
但如果也想填入 mail 內容, 甚至 attach 一個 file,
又該如何呢? 感謝指導.
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
小弟又有一個問題:
我知道可以用
ShellExecute(NULL,NULL,"mailto:john@yahoo.com?Subject=Test",NULL,NULL,SW_SHOW);
來啟動預設 E-Mail 軟體開啟一個新郵件並填入 subject.
但如果也想填入 mail 內容, 甚至 attach 一個 file,
又該如何呢? 感謝指導.
physics 你好:
試試下面這段 sample code
< class="code">
char szMailto[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szSubject[64]={0};
char szBody[64]={0};
char szMailStr[256]={0}; sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szAttach, "%s%s%s", szBuf, "c:\\temp.txt", szBuf);
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test");
sprintf(szMailStr, "%s?%s&%s&%s", szMailto, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
-- Enjoy Researching & Developing --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
Cooky Kid
初階會員
![](./myimg/board/mystar.gif)
![](images/icon_photo_none.gif) 發表:5 回覆:68 積分:44 註冊:2002-07-11
發送簡訊給我
|
引言:
試試下面這段 sample code
< class="code">
char szMailto[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szSubject[64]={0};
char szBody[64]={0};
char szMailStr[256]={0}; sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szAttach, "%s%s%s", szBuf, "c:\\temp.txt", szBuf);
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test");
sprintf(szMailStr, "%s?%s&%s&%s", szMailto, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
RaynorPao 大大:
看來用指令列字串可以『玩』出email的更多功能....
不知哪兒有較為完整的指令列?
像是『副本』『密件副本』.....等之類的項目...
thanks!!!!
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
RaynorPao 大大:
看來用指令列字串可以『玩』出email的更多功能....
不知哪兒有較為完整的指令列?
像是『副本』『密件副本』.....等之類的項目...
thanks!!!!
呵呵~~
既然有人問了~~那我就再把上面的 >
< class="code">
char szMailto[64]={0};
char szCC[64]={0};
char szBCC[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szSubject[64]={0};
char szBody[64]={0};
char szMailStr[256]={0}; sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szCC, "%s", "cc=xxx@mail.com");
sprintf(szBCC, "%s", "bcc=xxx@mail.com");
sprintf(szAttach, "%s%s%s", szBuf, "c:\\temp.txt", szBuf);
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test");
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s", szMailto, szCC, szBCC, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
-- Enjoy Researching & Developing --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
tony115722
一般會員
![](./myimg/board/mystar_empty.gif)
![](images/icon_photo_none.gif) 發表:53 回覆:63 積分:23 註冊:2002-07-09
發送簡訊給我
|
請問有 help 文件嗎?? I like DeBug
------ I like DeBug
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
請問有 help 文件嗎?? I like DeBug
嗯~~你問到重點了
其實~~我也曾經嘗試去 > --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
Cooky Kid
初階會員
![](./myimg/board/mystar.gif)
![](images/icon_photo_none.gif) 發表:5 回覆:68 積分:44 註冊:2002-07-11
發送簡訊給我
|
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char szMailto[64]={0};
char szCC[64]={0};
char szBCC[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szSubject[64]={0};
char szBody[64]={0};
char szMailStr[256]={0}; sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szCC, "%s", "cc=xxx@mail.com");
sprintf(szBCC, "%s", "bcc=xxx@mail.com");
sprintf(szAttach, "%s%s%s", szBuf, "c:\\temp.txt", szBuf);
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test");
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s", szMailto, szCC, szBCC, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
RaynorPao 大大:
感謝你將辛苦搜尋的mail指令po出來....< >
我用 >『附加檔案』>?
>
我是哪兒出現問題勒??< >< >
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
我用 BCB5(win98) 執行時,在 C: 下已有 aaa01.txt 測試檔,
收信&寄信工具是 Outlook Express 5, 其他功能正常,但始終無法完成『附加檔案』?
why?? < >
我是哪兒出現問題勒??< >
>>< face="Verdana, Arial, Helvetica"> Cooky Kid你好:
請問你的 code 是這樣子嗎??
如果不是~~方便 >
< class="code">
//---------------------------------------------------------------------------
......................
char szAttach[64]={0};
char szBuf[2]={34, 0};
......................
sprintf(szAttach, "%s%s%s", szBuf, "c:\\aaa01.txt", szBuf);
......................
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s", szMailto, szCC, szBCC, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
-- Enjoy Researching & Developing --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
Cooky Kid
初階會員
![](./myimg/board/mystar.gif)
![](images/icon_photo_none.gif) 發表:5 回覆:68 積分:44 註冊:2002-07-11
發送簡訊給我
|
引言:
Cooky Kid你好:
請問你的 code 是這樣子嗎??
如果不是~~方便 >
< class="code">
//---------------------------------------------------------------------------
......................
char szAttach[64]={0};
char szBuf[2]={34, 0};
......................
sprintf(szAttach, "%s%s%s", szBuf, "c:\\aaa01.txt", szBuf);
......................
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s", szMailto, szCC, szBCC, szSubject, szBody, szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
RaynorPao 大大:
是啊...我是直接copy你的code .....還是『八字不合』??
ㄟ..為了少添你判斷的麻煩...我就把我執行的程式碼附上...
拍謝啦~~~讓 >
我先在 class="code">
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char szMailto[64]={0};
char szCC[64]={0};
char szBCC[64]={0};
char szSubject[64]={0};
char szBody[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szMailStr[256]={0};
sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szCC, "%s", "cc=xxx@mail.com");
sprintf(szBCC, "%s", "bcc=xxx@mail.com");
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test&Date");
sprintf(szAttach, "%s%s%s", szBuf, "C:\\aaa01.txt", szBuf);
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s",
szMailto,
szCC,
szBCC,
szSubject,
szBody,
szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOWDEFAULT);
}
//---------------------------------------------------------------------------
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
我先在unit1.h 中加入 #include 〈stdio.h〉
Unit1.cpp
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char szMailto[64]={0};
char szCC[64]={0};
char szBCC[64]={0};
char szSubject[64]={0};
char szBody[64]={0};
char szAttach[64]={0};
char szBuf[2]={34, 0};
char szMailStr[256]={0};
sprintf(szMailto, "%s", "mailto:xxx@mail.com");
sprintf(szCC, "%s", "cc=xxx@mail.com");
sprintf(szBCC, "%s", "bcc=xxx@mail.com");
sprintf(szSubject, "%s", "Subject=Test");
sprintf(szBody, "%s", "Body=Test&Date");
sprintf(szAttach, "%s%s%s", szBuf, "C:\\aaa01.txt", szBuf);
sprintf(szMailStr, "%s?%s&%s&%s&%s&%s",
szMailto,
szCC,
szBCC,
szSubject,
szBody,
szAttach);
ShellExecute(NULL, "open", szMailStr, NULL, NULL, SW_SHOWDEFAULT);
}
//---------------------------------------------------------------------------
Cooky Kid你好:
我已經試過 Outlook Express 了
的確~~會像你所說的那樣(附件不見了)
我另外再抽時間看看能不能找到這方面的資料
你也可以到 > --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
Cooky Kid
初階會員
![](./myimg/board/mystar.gif)
![](images/icon_photo_none.gif) 發表:5 回覆:68 積分:44 註冊:2002-07-11
發送簡訊給我
|
引言:
Cooky Kid你好:
我已經試過 Outlook Express 了
的確~~會像你所說的那樣(附件不見了)
我另外再抽時間看看能不能找到這方面的資料
你也可以到 >
>>< face="Verdana, Arial, Helvetica"> RaynorPao 大大:
在老外是這樣做的,如後面程式碼↓< >,
原則上算是可以加入『附加檔案』啦...但非我們想要的檔案,< >
檔案路徑無法正確的指向我們指定的檔案,
終是『咫尺天涯、鏡花水月』.....
---------------------
看看你這兒有沒管道 class="code">
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString AttFile = "c:\\aaa01.txt";
AnsiString Address = "Enter@address.here";
AnsiString Subject ="Email subject";
AnsiString Body = "Email body";
//與下行交替執行-- AnsiString Attachment = AttFile;
AnsiString Attachment = "\"" AttFile "\"";
AnsiString MailToCommand = "mailto:" Address '?'
"Subject=" Subject '&'
"Body=" Body '&'
"Att:filename=" Attachment;
ShellExecute(NULL,
"open",
MailToCommand.c_str(),
NULL,
NULL,
SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
|
lcsboy
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](images/icon_photo_none.gif) 發表:87 回覆:622 積分:394 註冊:2002-06-18
發送簡訊給我
|
呵~~~~ 謝謝各位的熱心! 讓大家獲益不少!
我也學到不少, 因為還不知道可以這樣子叫出outlook
可見MS的的確確暗槓不少東西
|