2

これは、私が開始した以前のスレッドに関連していますが、実際に機能するメソッドを扱っています。

ColdFusion が実行して特定の番号にファックスを送信する VBScript を作成しました。以下は、Microsoft TechNet サイトから取得した、私が作成した VBScript です。

Set objFaxDocument = WScript.CreateObject("FAXCOMEX.FaxDocument")
Set objFaxServer = WScript.CreateObject("FAXCOMEX.FaxServer")
Dim JobID

objFaxServer.Connect("")
objFaxDocument.Body = "C:\*PATHNAME*\testfax.pdf"
objFaxDocument.DocumentName = "My First Fax"
objFaxDocument.Priority = "2"

objFaxDocument.Recipients.Add("8885551212")

objFaxDocument.AttachFaxToReceipt = True

objFaxDocument.CoverPageType = "1"
objFaxDocument.CoverPage = "generic"
objFaxDocument.Note = "Here is the info you requested"
objFaxDocument.ReceiptAddress = "test@test.com"

objFaxDocument.Subject = "Today's fax"
objFaxDocument.Sender.Title = "Mr."
objFaxDocument.Sender.Name = "Test Man"
objFaxDocument.Sender.City = "Test City"
objFaxDocument.Sender.State = "FL"
objFaxDocument.Sender.Company = "Test Company"
objFaxDocument.Sender.Country = "USA"
objFaxDocument.Sender.Email = "test@test.com"
JobID = objFaxDocument.ConnectedSubmit(objFaxServer)
MsgBox("The Job ID is :" & JobID(0))

objFaxServer.Disconnect()

以下は、この vbscript を実行するために使用する ColdFusion コードです。

<cfexecute name="C:\Windows\System32\cscript.exe"
    arguments="C:\*SCRIPTPATH*\test.vbs">
</cfexecute>

Windows Server 2003 を搭載したマシンでは、ドキュメントが Windows FAX サービス アプリケーションに正常に送信され、FAX が送信トレイに正しく保存されました。ただし、Windows Server 2008 でこれを試みたところ、機能しません。同じバージョンの ColdFusion (8) が使用されていますが、2008 マシンは 64 ビットで、2003 マシンは 32 ビットであることに注意してください。

これは他の場所で回答されている可能性があります（そうであれば、私を案内してください）が、私はこれで最も苦労しました. 私は何かが欠けていることを知っていますが、何がわかりません。誰でも助けることができますか？

4

1 に答える 1

0

「うまくいかない」を定量化していないため、これに正確に答えるのは困難です。どのように機能しないのですか？画面にエラーはありませんか？ログファイルのどこかにエラーはありませんか? VBS は呼び出されますが、失敗しますか (呼び出し方法が気まぐれである可能性があります)。

そうは言っても、CF が実行されているサービス アカウントに、VBS、または VBS が使用する他のリソースにアクセスまたは実行する権限がない場合だと思われます。

ユーザーCFが使用するようにログインすると、コマンドラインからそのステートメントを実行できますか?

于 2012-06-29T07:08:32.603 に答える