<%@ Language=VBScript %> 聯絡信息
主頁
公司簡介
1040 個人稅務
1120/1065 公司稅務
會計  簿記
公司設立 商業執照
工作機會
聯絡信息
<% If Request.QueryString("ProcessForm") <> 1 Then %>

請輸入閣下寶貴資料及訊息,然後按 [送出]鍵。我們將會盡快與你聯絡。

尊姓:

大名:

聯絡電話:

-

傳真號碼:

-

傳呼:

電郵地址:

聯絡時間:

主題:

訊息:


本公司通訊資料:

Blue-Ribbon Accounting & Tax CPA
83-21 Broadway, Elmhurst, New York 11373
電話: (718)760-8800  傳真: (718)760-5200
電郵地址: aa@blueribboncpa.com

<% Else ' process form Dim objSendMail Set objSendMail = CreateObject("CDONTS.NewMail") With objSendMail .From = Request.Form("Email") .To = "aa@blueribboncpa.com" .Subject = Request.Form("Interested") .Body = "Last Name: " & Request.Form("LastName") & ", First Name: " & Request.Form("FirstName") & ", Phone: " & Request.Form("AreaCodeTel") & Request.Form("Phone") & ", Fax: " & Request.Form("AreaCodeFax") & Request.Form("Fax") & ", Beeper: " & Request.Form("Beeper") & ", Email: " & Request.Form("Email") & ", Hours to Contact: " & Request.Form("Hours") & ", Interested In: " & Request.Form("Interested") & ", Comment: " & Request.Form("Comment") .Send End With Set objSendMail = Nothing %>

謝謝! 閣下寶貴資料及訊息, 已經送出. 我們將會盡快與你聯絡。

<% End If %>