The Problem is sometimes the destination fax number becomes empty and the fax is stuck. I don't know is the bug from WinFax (Ver 10.01) or my code?
The following is the code I'm using to send a fax:

lcOrigPrinter = set("Printer", 2)
loWinFax1 = .Null.
loWinFax1 = CREATEOBJECT("WinFax.SDKSend")
SET PRINTER TO NAME "WinFax"
IF !ISNULL(loWinFax1)
	WITH loWinFax1 
	    .ResetGeneralSettings()
		.SetTo("Friend")
		.setcountrycode(" ")
		.setareacode(" ")
	    .SetNumber(1234567)
	    .SetResolution(0)
	    .SetPrintFromApp(1)
	    .SetUseCover(0)
	    .ShowSendScreen(0)
	    .ShowCallProgress(0)
		.SetSubject("")
	    .AddRecipient()
	    .Send(0)
		REPORT FORM MyFax TO PRINTER NOEJECT NOCONSOLE
	    .Done()
	    .LeaveRunning()
	ENDWITH
	RELEASE loWinFax1
	loWinFax1 = .Null.
	set printer to name "&lcOrigPrinter"
ENDIF