⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 15386.html

📁 VB技巧问答10000例 VB技巧问答10000例
💻 HTML
字号:
<html>
  <head>
    <title>何时打电话 ?</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>何时打电话 ?</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:61191@MS1.SEEDER.NET">HH</a> on July 08, 1999 at 15:51:47:<p>
各位先进:<br>我由 MSDN 下的 SAMPLES 复制了 vbmail 的范例,<br>其中一段范例如下 <br>Private Function LogOn() As Boolean<br>      <br>    If mapSess.NewSession Then<br>        MsgBox "已连线成功", vbOKOnly + vbInformation, "讯息"<br>        Exit Function<br>    End If<br>    <br>    On Error GoTo errLogInFail<br>    With mapSess<br>        <br>        .DownLoadMail = False<br>        .LogonUI = True <p>        .SignOn <br>        LogOn = True<br>        .NewSession = True<br>        bNewSession = .NewSession<br>        mapMess.SessionID = .SessionID ' You must set this before continuing.<br>        sbrMapi.Panels("SessID") = "ID = " & .SessionID ' Just so you can see the SessionID.<br>    End With<br>    <br>    Exit Function<br>    <br>errLogInFail:<br>    Debug.Print Err.Number, Err.Description<br>    If Err.Number = 32003 Then<br>        MsgBox "取消登入"<br>        LogOn = False<br>    End If<br>    Exit Function<br>End Function<p>我试的结果=>登入时它会出现使用者设定选取对话框,看起来似乎它可成功取得  session ID 但为何不见拨号的动作呢 ?<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 15386-->
<!--top: 15392--><li><a href="15392.html">Re: 何时打电话 ?</a> <b>小小</b> <i>17:25:33 7/08/99</i>
(<!--responses: 15392-->1)
<ul><!--insert: 15392-->
<!--top: 15417--><li><a href="15417.html">Re: 何时打电话 ?</a> <b>hh</b> <i>08:56:34 7/09/99</i>
(<!--responses: 15417-->0)
<ul><!--insert: 15417-->
</ul><!--end: 15417-->
</ul><!--end: 15392-->
</ul><!--end: 15386-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

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