10265.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 23 行

HTML
23
字号
<html>
  <head>
    <title>Re: 我不想用MAPI送信</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 我不想用MAPI送信</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by Honey on February 23, 1999 at 11:04:54:<p>
In Reply to: <a href="10075.html">我不想用MAPI送信</a> posted by superman on February 11, 1999 at 17:57:39:<p>
: 用MAPI似乎一定要安装MS Mail or Exchange<br>: 我觉得此法不好ㄝ,请问有无用其他方式解决?<p>: 因我只是用来送信,不用来收信<p>那就用外部的程式去寄信<br>先用以下宣告<br>PRIVATE Declare Function _<br>ShellExecute Lib "shell32.dll" _<br>Alias "ShellExecuteA" _<br>(ByVal hwnd As Long, _<br>ByVal lpOperation As String, _<br>ByVal lpFile As String, _<br>ByVal lpParameters As String, _<br>ByVal lpDirectory As String, _<br>ByVal nShowCmd As Long) As Long<p><br>后呼叫<br>dim dd as string<br>DD="honey0@tcts1.seed.net.tw"<br>CALL ShellExecute(ME.hwnd, "open", "mailto:" & _<br>DD, "", "", 5)<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 10265-->
</ul><!--end: 10265-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?