tagCANDY CGI VBレスキュー(花ちゃん) - VBでFAX送信を行いたい(VB6.0) - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBでFAX送信を行いたい(VB6.0)
元に戻る スレッド一覧へ 記事閲覧
このページ内の検索ができます。(AND 検索や OR 検索のような複数のキーワードによる検索はできません。)

VBでFAX送信を行いたい(VB6.0) [No.68の個別表示]
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
日時: 2007/07/16 10:04
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[通信][][]                                                          *
* キーワード:ファックス,ファクシミリ,FAX,,,                                   *
***********************************************************************************

元質問:VBでFAX送信行いたい - 椿姫  2003/10/22-11:06 No.6316

--------------------------------------------------------------------
Re^6: VBでFAX送信行いたい - 花ちゃん   2003/10/22-15:41 No.6329
--------------------------------------------------------------------
必ず、元質問の一連のスレッドをご覧下さい。
http://hanatyan.sakura.ne.jp/logbbs/wforum.cgi?mode=allread&no=6316&page=690#6316


下記を試して見て下さい。
参照設定をする事。FAXを送るファイルのフルパスを変更する事。FAX番号を変更する事
FAX番号は-(ハイフン)を入れない事。

Private Sub Command1_Click()
    Dim objFaxServer    As FaxServer
    Dim objFaxDoc       As FaxDoc
    
    Set objFaxServer = CreateObject("FaxServer.FaxServer")
    objFaxServer.Connect CreateObject("WScript.Network").ComputerName
    Set objFaxDoc = objFaxServer.CreateDocument("FaxDocument")
    With objFaxDoc
        .DisplayName = "ドキュメント名"
        .FileName = "c:\test.txt"       'FAXで送りたいファイルをフルパスで
        .FaxNumber = "0748231234"       'ハイフンを入れずに(Fax番号)
    End With
    Call objFaxDoc.Send
    Call objFaxServer.Disconnect
    Set objFaxServer = Nothing
End Sub
メンテ

Page: 1 |

 投稿フォーム               スレッド一覧へ
題  名 スレッドをトップへソート
名  前
パスワード (記事メンテ時に使用)
投稿キー (投稿時 投稿キー を入力してください)
コメント

   クッキー保存   
スレッド一覧へ