Errera can be found in the code?

I can keep getting an error saying that there is a syntax error in the insert in the declaration. is ne these keywords. I'm confused. data_source = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & _ Server.MapPath ("TT.mdb) with Set = Server.CreateObject ("ADODB.Connection") con.ConnectionString = Con.Open con.execute data_source = "INSERT INTO current (name, company, street, city, stateprov, postcode, telephone, fax, email, user ID, transient) values ('"_ name &"' " and business and "" '", and street &"', '"& City &"', "and stateprov & "'," And zip "', '" & phone & fax & "','" "','" & Email & "'" & userid & "'," and pedestrian & "')"

I suspect a mission of matching pair of quotes in the statement generated. Try to store the string in a temporary variable so you can see in the debugger. I hope that helps.