<% ' change to address of your own SMTP server strHost = "smtp.cbn.net.id" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress "info@harrisma.com" ' message subject Mail.Subject = "Inquiry from Web Site" ' message body Mail.Body = Request("Body") strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %> Contact Us

HomeSitemap

[IMAGE] HARRISMA

Contact Us

Feel free to contact us if you have any question regarding our products or services. You can reach us using various options below.

Head Office:

General Info

+62 21 5857413
+62 21 5845550

info@harrisma.com

Sales Department

+62 21 5857413
+62 21 5845550

sales@harrisma.com

Citrix Division

citrix@harrisma.com
djuniarto@harrisma.com

Wyse Division

josef@harrisma.com

3Com Division

donny@harrisma.com

Xerox Division

yansen@harrisma.com

BigFix

djuniarto@harrisma.com

ThinPrint

josef@harrisma.com

Adtran Division

wahyu@harrisma.com

Hewlett Packard & Others

sales@harrisma.com

 

Support Office:

Phone:

+62 21 5845550
+62 21 5845551

 

> Our branch offices address

<% If strErr <> "" Then %>

Error occurred: <% = strErr %>

<% End If %> <% If bSuccess Then %>

Your message has been sent. Thank you for contacting us.

<% End If %>

Alternatively, you can also contact us by using the form below. We will reply back at you as soon as possible.

Name

Email Address

Message