Follow Us: Questions? Comments? 1-800-974-1841

Our Office in Michigan
39555 Orchard Hill Place
Suite 600
Novi, Michigan 48375

Phone: 248 232 9967
Toll Free: 800 974 1841
FAX: 248 232 9967


Indiana Office
908 E. Wayne St
South Bend, Indiana 46617
www.informationandrecords.com
1 866 335 5656

Our Office in INDIA
SBS Pvt. Ltd.
#401, Chillapalli Complex
Dwarakanagar 1st lane
Vizag, A.P. India - 530 016
www.sbsportals.com
Off:+91-891-6631708
*First name
*Last name
*E-mail address
*Phone
Area Code or Country Code first, excluding 1, 011, and + dialing directions
*Company
*Describe your
  requirements

Get in Touch

  • Our Office in Michigan
    39555 Orchard Hill Place
    Suite 600
    Novi, Michigan 48375
  • Indiana Office
    908 E. Wayne St
    South Bend, Indiana 46617
    www.informationandrecords.com


Copyright © 2005 - 2015 SBS Portals. All Rights Reserved

<% Dim strBody If Request.Form("Submit")= "Submit Request" Then If TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) Then Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(cdoSendUsingMethod) = cdoSendUsingPort .Item(cdoSMTPServer) = "relay-hosting.secureserver.net" .Update End With strBody = "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "Stone Bridge Business Solutions" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "
Contact Us

First Name:" & Request.Form("firstname") & "
Last Name:" & Request.Form("lastname") & "
Email:" & Request.Form("email") & "
Phone:" & Request.Form("phone") & "
Company:" & Request.Form("companyname") & "
Requirements:" & Request.Form("requirements") & "
" strBody = strBody & "" strBody = strBody & "" Set cdoMessage = CreateObject("CDO.Message") With cdoMessage Set .Configuration = cdoConfig .From = "info@stonebridgebusinesssolutions.com" .To = "tbeckwith@sbsportals.com" .BCC = "chekuri@sbsportals.com,katta@sbsportals.com" .Subject = "SaaS Software Suite Contact Us" .HTMLBody = strBody .Send End With Set cdoMessage = Nothing Response.Redirect("success.html") Else Response.Write("") End IF End If %> <% function TestCaptcha(byval valSession, byval valCaptcha) dim tmpSession valSession = Trim(valSession) valCaptcha = Trim(valCaptcha) if (valSession = vbNullString) or (valCaptcha = vbNullString) then TestCaptcha = false else tmpSession = valSession valSession = Trim(Session(valSession)) Session(tmpSession) = vbNullString if valSession = vbNullString then TestCaptcha = false else valCaptcha = Replace(valCaptcha,"i","I") if StrComp(valSession,valCaptcha,1) = 0 then TestCaptcha = true else TestCaptcha = false end if end if end if end function %>