Har nog strulat till det igen :(

Använder nedanstående kod och får felmeddelande när jag ska exa sql strängen.

<%
Dim adat
adat = date()
fields = "namn, "&_
	"forstyp, "&_
	"ordermot, "&_
	"produkt, "&_
	"ar, "&_
	"ordernr, "&_
	"f_kundnr, "&_
	"l_kundnr, "&_
	"f_foretag, "&_
	"l_foretag, "&_
	"f_avdelning, "&_
	"l_avdelning, "&_
	"f_kman, "&_
	"l_kman, "&_
	"f_adress, "&_
	"l_adress, "&_
	"f_postnr, "&_
	"l_postnr, "&_
	"f_ort, "&_
	"l_ort, "&_
	"f_telefon, "&_
	"l_telefon, "&_
	"f_fax, "&_
	"l_fax, "&_
	"f_epost, "&_
	"l_epost, "&_
	"f_orgnr, "&_
	"l_orgnr, "&_
	"Artnr-012, "&_
	"Artnr-022, "&_
	"Artnr-032, "&_
	"Artnr-042, "&_
	"Antal-012, "&_
	"Antal-022, "&_
	"Antal-032, "&_
	"Antal-042, "&_
	"Benamning-012, "&_
	"Benamning-022, "&_
	"Benamning-032, "&_
	"Benamning-042, "&_
	"anmtyp_1, "&_
	"anmtyp_2, "&_
	"anmtyp_3, "&_
	"anmtyp_4, "&_
	"Ant_anv-012, "&_
	"Ant_anv-022, "&_
	"Ant_anv-032, "&_
	"Ant_anv-042, "&_
	"Pris-012, "&_
	"Pris-022, "&_
	"Pris-032, "&_
	"Pris-042, "&_
	"InPris-012, "&_
	"InPris-022, "&_
	"InPris-032, "&_
	"InPris-042, "&_
	"diverse, "&_
	"adat"
	
vals = "'" & session ("namn") & "', "&_
	"'" & session("forstyp") & "',  "&_
	"'" & session ("ordermot") & "', "&_
	"'" & session ("produkt") & "', "&_
	"'" & session ("ar") & "', "&_
	"'" & session ("ordernr") & "', "&_
	"'" & session ("f_kundnr") & "', "&_
	"'" & session ("l_kundnr") & "', "&_
	"'" & session ("f_foretag") & "', "&_
	"'" & session ("l_foretag") & "', "&_
	"'" & session ("f_avdelning") & "', "&_
	"'" & session ("l_avdelning") & "', "&_
	"'" & session ("f_kman") & "', "&_
	"'" & session ("l_kman") & "', "&_
	"'" & session ("f_adress") & "', "&_
	"'" & session ("l_adress") & "', "&_
	"'" & session ("f_postnr") & "', "&_
	"'" & session ("l_postnr") & "', "&_
	"'" & session ("f_ort") & "', "&_
	"'" & session ("l_ort") & "', "&_
	"'" & session ("f_telefon") & "', "&_
	"'" & session ("l_telefon") & "', "&_
	"'" & session ("f_fax") & "', "&_
	"'" & session ("l_fax") & "', "&_
	"'" & session ("f_epost") & "', "&_
	"'" & session ("l_epost") & "', "&_
	"'" & session ("f_orgnr") & "', "&_
	"'" & session ("l_orgnr") & "', "&_
	"'" & session ("Artnr-012") & "', "&_
	"'" & session ("Artnr-022") & "', "&_
	"'" & session ("Artnr-032") & "', "&_
	"'" & session ("Artnr-042") & "', "&_
	"'" & session ("Antal-012") & "', "&_
	"'" & session ("Antal-022") & "', "&_
	"'" & session ("Antal-032") & "', "&_
	"'" & session ("Antal-042") & "', "&_
	"'" & session ("Benamning-012") & "', "&_
	"'" & session ("Benamning-022") & "', "&_
	"'" & session ("Benamning-032") & "', "&_
	"'" & session ("Benamning-042") & "', "&_
	"'" & session ("anmtyp_1") & "', "&_
	"'" & session ("anmtyp_2") & "', "&_
	"'" & session ("anmtyp_3") & "', "&_
	"'" & session ("anmtyp_4") & "', "&_
	"'" & session ("Ant_anv-012") & "', "&_
	"'" & session ("Ant_anv-022") & "', "&_
	"'" & session ("Ant_anv-032") & "', "&_
	"'" & session ("Ant_anv-042") & "', "&_
	"'" & session ("Pris-012") & "', "&_
	"'" & session ("Pris-022") & "', "&_
	"'" & session ("Pris-032") & "', "&_
	"'" & session ("Pris-042") & "', "&_
	"'" & session ("InPris-012") & "', "&_
	"'" & session ("InPris-022") & "', "&_
	"'" & session ("InPris-032") & "', "&_
	"'" & session ("InPris-042") & "', "&_
	"'" & session ("diverse") & "', "&_
	"#"& adat & "#"
	
SQL = "INSERT INTO mall ("& fields &") VALUES ("& vals &")"
Session.abandon
Databas.Execute SQL
Databas.Close
Set Databas = Nothing
%>

Har testat att skriva ut allt och det verkar inte vara några problem :(

Detta ser väll ändå rätt ut?

Fälten i databasen

alla fält i databasen är text
förutom:
adat (tid/datum)
Diverse (pm)
check (number)
id (autonumber)

Databassökvägen ÄR rätt, kan nämligen uppdatera fältet check om jag själv skriver i databasen och fortsätter min registrering :D

------------------
McD- Burgers for the people!

www.McDz.net www.SweQuake.com