Eastman Strings

<% if (Request.Form("submit")="Submit") then SET rs=SERVER.CREATEOBJECT("ADODB.RECORDSET") rs.open "select * from customer_information",con,3,3,1 rs.addnew rs("sitename") = "Eastman Strings" rs("fname") = request.Form("fname") rs("lname") = request.Form("lname") rs("address") = request.Form("address") rs("city") = request.Form("city") If request.Form("country") = "USA" then rs("state") = request.Form("state") ElseIf request.Form("country") = "Canada" Then rs("state") = request.Form("state1") Else rs("state") = request.Form("otherstate") End if rs("zip") = request.Form("zip") rs("country") = request.Form("country") rs("email") = request.Form("email") rs("telephone") = request.Form("telephone") rs("sex") = request.Form("sex") If request.Form("age")<>"" then rs("age") = request.Form("age") End if If request.Form("years")<>"" then rs("years") = request.Form("years") End If rs("profession") = request.Form("profession") rs("schoolsattended") = request.Form("schoolsattended") rs("teachersstudied") = request.Form("teachersstudied") mstatus = request.Form("status") If mstatus <> "" Then aid=split(mstatus,",") if ubound(aid) > 0 then for i=0 to ubound(aid) if i < ubound(aid) then mstr="," else mstr="" end if response.write aid(i) & "
" If aid(i)="Educator" then rs("edu_contact") = request.Form("edu_mcontact") rs("edu_conother") = request.Form("edu_mconother") rs("edu_dealer") = request.Form("edu_dealer") rs("edu_city") = request.Form("edu_city") rs("edu_state") = request.Form("edu_state") End If If Trim(aid(i))="Performing Artist" then rs("pa_play") = request.Form("pa_play") rs("pa_ensemblenamegrp") = request.Form("pa_ensemblenamegrp") End if Next Else response.write aid(0) End If End if rs("musicstatus") = request.Form("status") 'rs("musicstatus") = request.Form("status") If request.Form("status")="Educator" then rs("edu_contact") = request.Form("edu_mcontact") rs("edu_conother") = request.Form("edu_mconother") rs("edu_dealer") = request.Form("edu_dealer") rs("edu_city") = request.Form("edu_city") rs("edu_state") = request.Form("edu_state") End If If request.Form("status")="Performing Artist" then rs("pa_play") = request.Form("pa_play") rs("pa_ensemblenamegrp") = request.Form("pa_ensemblenamegrp") End if rs("classical") = request.Form("Classical") rs("jazz") = request.Form("Jazz") rs("pop") = request.Form("Pop") rs("bigband") = request.Form("BigBand") rs("blues") = request.Form("Blues") rs("rock") = request.Form("Rock") rs("bebop") = request.Form("Be-Bop") rs("folk") = request.Form("Folk") rs("musiccountry") = request.Form("musiccountry") rs("othermus") = request.Form("Othermus") rs("othermusic") = request.Form("othermusic") rs("magazines") = request.Form("magazines") rs("purchasinginstrument") = request.Form("purchasinginstrument") rs("purchaseinstrumentin") = request.Form("purchaseinstrumentin") rs("telephone") = request.Form("telephone") 'rs("instrumentbrand") = request.Form("instrumentbrand") 'rs("serialno") = request.Form("serial") 'rs("fieldofinterest") = request.Form("fieldofinterest") rs("fieldofinterest") = request.Form("inst1") rs("instrumentbrand") = request.Form("make1") rs("serialno") = request.Form("serial1") rs("model0") = request.form("model1") rs("inst2") = request.Form("inst2") rs("make2") = request.Form("make2") rs("serial2") = request.Form("serial2") rs("model2") = request.form("model2") rs("inst3") = request.Form("inst3") rs("make3") = request.Form("make3") rs("serial3") = request.Form("serial3") rs("model3") = request.form("model3") rs("inst4") = request.Form("inst4") rs("make4") = request.Form("make4") rs("serial4") = request.Form("serial4") rs("model4") = request.form("model4") rs("inst5") = request.Form("inst5") rs("make5") = request.Form("make5") rs("serial5") = request.Form("serial5") rs("model5") = request.form("model5") rs("inst6") = request.Form("inst6") rs("make6") = request.Form("make6") rs("serial6") = request.Form("serial6") rs("model6") = request.form("model6") If request.Form("teach1") ="" Then thstr = "N" Else thstr = "Y" End If If request.Form("teach2") ="" Then thstr = thstr + ", N" Else thstr =thstr + ", Y" End If If request.Form("teach3") ="" Then thstr = thstr + ", N" Else thstr =thstr + ", Y" End If If request.Form("teach4") ="" Then thstr = thstr + ", N" Else thstr =thstr + ", Y" End If If request.Form("teach5") ="" Then thstr = thstr + ", N" Else thstr =thstr + ", Y" End If If request.Form("teach6") ="" Then thstr = thstr + ", N" Else thstr =thstr + ", Y" End If If request.Form("spec1") ="" Then spstr = "N" Else spstr = "Y" End If If request.Form("spec2") ="" Then spstr = spstr + ", N" Else spstr =spstr + ", Y" End If If request.Form("spec3") ="" Then spstr = spstr + ", N" Else spstr =spstr + ", Y" End If If request.Form("spec4") ="" Then spstr = spstr + ", N" Else spstr =spstr + ", Y" End If 'rs("teach") = request.Form("teach") 'rs("specialize") = request.Form("specialize") rs("teach") = thstr rs("specialize") = spstr rs("trial") = request.Form("trial") rs("dt") = Now 'rs("stname") = "Strings" rs.update rs.close response.redirect "thankyou.asp" end if response.flush %> Eastman Strings

WORKSHOP TOUR — HISTORY — EXTRA INSIGHT — WARRANTY — ONLINE REGISTRATION — CONTACT US
CREATE YOUR PORTFOLIO

EASTMAN MUSIC COMPANY

Eastman Strings Customer Portfolio

At Eastman we want to know about your preferences in musical instrument choice. As we develop new instruments and strive to serve our end users better, we like to utilize information from you, our valued customer. The information that you give us in this portfolio will help us send you information about new instruments, upcoming events, and also help your local dealer contact you about
new /additional instrument purchase. As our company grows we want you to be able to update your portfolio and we will provide extra features to enable you to connect with the company.

Thank you for taking the time to complete this portfolio and welcome to the Eastman family.

First Name*

Last Name*

Address*

Email*

City*

State*

Zip/Postal Code*

Country*

Telephone*

Sex

Male Female

Age

Profession

Years Playing

School(s) attended

Teachers Studied with

Musical Status

Educator Performing Artist Student Part Time For Pleasure

* Please list only one instrument per line.
Instrument Played	Make	Model	Serial Number

Music Preference

Classical	Jazz	Pop	Big Band	Blues
Rock	Be-Bop	Folk	Country

Other

What magazines do you read?

Interested in purchasing an instrument

Yes No

If yes, when?

Interested in doing a trial?

Yes No

I teach:

Privately Elementary School Middle School High School College/University N/A

I specialize in:

Suzuki Classroom teaching Private Teaching N/A

Eastman Privacy Policy: We will never sell or share your personal information with anyone, ever. We will only store it for use in the unlikely event that you need to make a warranty related claim at some time in the future. The demographic and sales data we collect helps us with our future marketing efforts. With your permission, we might send information about new products, sales initiatives, or topics of general interest to musicians. However, you will always have the option to discontinue these occasional notices at any time. Thanks again!

Eastman Music Company