txt="INSERT INTO Claims VALUES(?,?,?)"
SQL1.ExecNonQuery2(txt, Array As String("Dowling & O'Neil Insurance Agency","76667455","New York"))
txt="INSERT INTO Claims VALUES(?,?,?)"
SQL1.ExecNonQuery2(txt, Array As String("Norah O'Donnel","551221176","Belfast"))