Integrated Plant Genetics | Become a Partner

<% @LANGUAGE = VBScript %> <% Dim strConnString Dim objConn Dim strSQL Dim strFirstnameField Dim strLastnameField Dim strEmailField Dim strCityField Dim strPhoneField Dim strFaxField Dim strOccupationField Dim strSubjectField Dim strMessageField If Request.Form("action") <> "Save Form Data" Then %> Integrated Plant Genetics | Become a Partner

Become a Partner or Investor

Integrated Plant Genetics Inc. is a growing company that is constantly seeking ways to expand in scope and operation. If you or your company would like to initiate a dialogue with IPG Inc. on the possibility of becoming an investor (institutional, corporate or Reg D qualified individuals only, please) in our company or a marketing partner, we encourage you to contact us either using this form or directly using our contact details above.

Please complete the following fields, if applicable. Your first and last name, e-mail address and occupation are required fields. " method="post">


First Name:		Last Name:
E-Mail:		City:
Phone:		Fax:
Occupation:		Subject:

Message Text:

<% Else strFirstnameField = replace(Request.Form("firstname"),"'","´") strLastnameField = replace(Request.Form("lastname"),"'","´") strEmailField = replace(Request.Form("email"),"'","´") strCityField = replace(Request.Form("city"),"'","´") strPhoneField = replace(Request.Form("phone"),"'","´") strFaxField = replace(Request.Form("fax"),"'","´") strOccupationField = replace(Request.Form("occupation"),"'","´") strSubjectField = replace(Request.Form("subject"),"'","´") strMessageField = replace(Request.Form("message"),"'","´") set objConn = server.createObject("ADODB.Connection") strConnection = "DSN=ipg_database;Database=investor;" strConnection = strConnection & "UID=gabriel;PWD=1010;" & "Connect Timeout=15" objConn.Open strConnection strSQL = "" strSQL = strSQL & "INSERT INTO investor" strSQL = strSQL & "(firstname, lastname, email, city, phone, fax, occupation, subject, message) " & vbCrLf strSQL = strSQL & "VALUES (" strSQL = strSQL & "'" & strFirstnameField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strLastnameField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strEmailField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strCityField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strPhoneField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strFaxField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strOccupationField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strSubjectField & "'" strSQL = strSQL & ", " strSQL = strSQL & "'" & strMessageField & "'" strSQL = strSQL & ");" objConn.Execute strSQL objConn.Close Set objConn = Nothing %> Integrated Plant Genetics | Investor Form Auto-Response

Become an Investor

Thanks for submitting your information to us! Depending on the nature of your inquiry, someone will get in touch with you shortly.
<% End If %>

For general inquiries, please send e-mail to info@ipgenetics.com. For web site errors or content issues, please e-mail webmaster@ipgenetics.com.