rst.Open "INSERT INTO books (name,writer,valued,count,cat) VALUES ('ghf','fgh','ghf','hf','ghf')", cnn