7895.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 35 行

HTML
35 行
字号 
<html>
  <head>
    <title>Re: 各位通讯高手请照过来好吗!拜托!!</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 各位通讯高手请照过来好吗!拜托!!</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:w100@ms1.url.com.tw">洪扬</a> on December 01, 1998 at 22:57:23:<p>
In Reply to: <a href="7879.html">各位通讯高手请照过来好吗!拜托!!</a> posted by Gary Chen on December 01, 1998 at 15:24:43:<p>
: 小弟想要做的是我在Basic中所产生出来的报表 .txt档案和所要送去的传真号码<br>: 直接给予传真程式然后它就会开始传真的动作了.<br>: 请问我该如何才能让程式去控制传真的动作,而不需要在每次传真时就要去操作传真程式<p>WinFax Pro这套传真程式的线上说明有利用DDE功能<br>直接在VB程式传送传真的范例,摘录如下给你参考,<br>看是不是你所需要的,WinFax Pro里有更详细的说明,<br>请自行参阅,如果试验成功,还请不吝公布让大家分享<br>一下你的心得! 祝好运!<p>Sub Command1_Click ()<br>FAXNumber$ = "555-1212"<br>SendTime$ = "06:00:00"<br>SendDate$ = "12/25/96"<br>FAXName$ = "Benjamin Smith"<br>Company$ = "Data Processing Services"<br>Subject$ = "Joy of Faxing"<br>Keyword$ = "fax, joy"<br>BillingCode$ = "5905-001-xx"<br>Mode$ = "Fax"<br>CoverPage$ = "C:\DATA\WINFAX\COVERS\GENERAL.CVP"<br>CoverText$ = "Do enjoy this seasonal message."<br>Attachment$ = "C:\DATA\OTHER\XMASTREE.FXR"<p>'This is the start of the DDE to WinFax.<br>'Create the link and disable<br>'automatic reception in WinFax. <p>Label1.LinkTopic = "FAXMNG32|CONTROL"<br>Label1.LinkMode = 2<br>Label1.LinkTimeout = -1<br>Label1.LinkExecute "GoIdle"<br>Label1.LinkMode = 0<p>'Create a new link with the TRANSMIT topic.<p>Label1.LinkTopic = "FAXMNG32|TRANSMIT"<br>Label1.LinkMode = 2<br>Label1.LinkTimeout = -1<br>Label1.LinkItem = "sendfax"<p>'Start DDEPokes to control WinFax.<p>recip$ = "recipient(" & Chr$(34) & FAXNumber$ & Chr$(34) & "," & Chr$(34) & SendTime$ & Chr$(34) & "," & Chr$(34) & SendDate$ & Chr$(34) & ","<br>recip$ = recip$ & Chr$(34) & FAXName$ & Chr$(34) & "," & Chr$(34) & Company$ & Chr$(34) & "," & Chr$(34) & Subject$ & Chr$(34) & ","<br>recip$ = recip$ & Chr$(34) & Keyword$ & Chr$(34) & "," & Chr$(34) & BillingCode$ & Chr$(34) & "," & Chr$(34) & Mode$ & Chr$(34) & ")"<br>Label1.Caption = recip$<br>Label1.LinkPoke<p>'setcoverpage<br>Label1.Caption = "setcoverpage(" & Chr$(34) & CoverPage$ & Chr$(34) & ")"<p>Label1.LinkPoke<p>'fillcoverpage<br>Label1.Caption = "fillcoverpage(" & Chr$(34) & CoverText$ & Chr$(34) & ")"<p>Label1.LinkPoke<p>'attach<br>Label1.Caption = "attach(" & Chr$(34) & Attachment$ & Chr$(34) & ")"<p>Label1.LinkPoke<p>'showsendscreen<br>Label1.Caption = "showsendscreen(""1"")"<p>Label1.LinkPoke<p>'resolution<br>Label1.Caption = "resolution(""HIGH"")"<p>Label1.LinkPoke<p>'The SendfaxUI parameter is used only<br>'when a fax-ready cover page and/or<br>'attachments are included and you do <br>□ot need to print to the WinFax printer<br>□river. <p>Label1.Caption = "SendfaxUI"<br>Label1.LinkPoke <p>'Send the fax.<p>Label1.LinkTopic = "FAXMNG32|CONTROL"<br>Label1.LinkMode = 2<br>Label1.LinkTimeout = -1<br>Label1.LinkExecute "GoActive"<p>'Close the link between the applications. <p>Label1.LinkMode = 0<p>End Sub<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 7895-->
<!--top: 7914--><li><a href="7914.html">Re: 各位通讯高手请照过来好吗!拜托!!</a> <b>尧仔</b> <i>11:36:31 12/02/98</i>
(<!--responses: 7914-->2)
<ul><!--insert: 7914-->
<!--top: 7923--><li><a href="7923.html">Re: 各位通讯高手请照过来好吗!拜托!!请教尧仔先生</a> <b>Gary Chen</b> <i>16:58:33 12/02/98</i>
(<!--responses: 7923-->1)
<ul><!--insert: 7923-->
<!--top: 7965--><li><a href="7965.html">Re: 各位通讯高手请照过来好吗!拜托!!请教尧仔先生</a> <b>尧仔</b> <i>12:58:05 12/03/98</i>
(<!--responses: 7965-->0)
<ul><!--insert: 7965-->
</ul><!--end: 7965-->
</ul><!--end: 7923-->
</ul><!--end: 7914-->
</ul><!--end: 7895-->
<br><hr size=7 width=75%><p>

</body></html>

7895.html - 源码说明

本页面展示了「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.」中的 7895.html 源码文件，采用 HTML 编程语言编写，共 35 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与电子书相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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