<%@ Page Language="vb" %> <% 'The strFileType is a constant in this sample. 'In your application, change it to the real type (e.g., HTML,PS, etc.) ' Dim objWS As Interfax.Interfax 'Reference to local webservice proxy connector Dim SendFaxResult as integer objWS = new Interfax.Interfax ' ' Form variables ' SendFaxResult = objWS.SendCharFax("","","+1 212 345 6789","My fax contents", "txt") objWS = Nothing If SendFaxResult > 0 Then Response.Write("Fax submitted. Transaction ID: " & SendFaxResult) Else Response.Write("Error sending fax. Return code: " & SendFaxResult) End If %>