📄 10265.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<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 + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -