insert fel...

Saknar en parentes

strSQL = "INSERT INTO tabellen(forening, konPerson, adress, postnr, ort, tele, telekv, mobil, epost, klass, ordtroja, restroja, intboende, boende) VALUES('"&Session("forening")&"', '"&Session("konperson")&"', '"&Session("adress")&"', '"&Session("postnr")&"', '"&Session("ort")&"', '"&Session("tele")&"', '"&Session("telekv")&"', '"&Session("mobil")&"', '"&Session("epost")&"', '"&Session("klass")&"', '"&Session("ordtroja")&"', '"&Session("restroja")&"', "&Session("intboende")&", '"&Session("Satt")&"'[b])[/b]"

OJOJOJ...tack LarsG

nu till nästa...

jag har ju även ett ID fält i denna tabell som är av sorten "räknare" hur får jag fatt i vilket nr det är i ID fältet när jag gör en insert ...

@@identity eller något liknade fanns i Access2000. Sök

jepps, rossi!

om du kör access2000 eller sql server kan du göra så här:

strSQL = "INSERT INTO tabellen(forening, konPerson, adress, postnr, ort, tele, telekv, mobil, epost, klass, ordtroja, restroja, intboende, boende) VALUES('"&Session("forening")&"', '"&Session("konperson")&"', '"&Session("adress")&"', '"&Session("postnr")&"', '"&Session("ort")&"', '"&Session("tele")&"', '"&Session("telekv")&"', '"&Session("mobil")&"', '"&Session("epost")&"', '"&Session("klass")&"', '"&Session("ordtroja")&"', '"&Session("restroja")&"', "&Session("intboende")&", '"&Session("Satt")&"'); [b]SELECT @@IDENTITY[/b]"
set objRecSet = objConn.execute (strSQL)
id = objRecSet(0)
objRecSet.Close

typ, liksom ba.

Microsoft JET Database Engine error '80040e14'

Tecken efter slutet av SQL-uttryck.

/moraibf/confirm.asp, line 200

...

strSQL = "INSERT INTO moraibf(forening, konPerson, adress, postnr, ort, tele, telekv, mobil, epost, klass, ordtroja, restroja) VALUES('"&Session("forening")&"', '"&Session("konperson")&"', '"&Session("adress")&"', '"&Session("postnr")&"', '"&Session("ort")&"', '"&Session("tele")&"', '"&Session("telekv")&"', '"&Session("mobil")&"', '"&Session("epost")&"', '"&Session("klass")&"', '"&Session("ordtroja")&"', '"&Session("restroja")&"'); SELECT @@IDENTITY"
				[b]Set ObjRecSet = Objconn.execute(strSQL)[/b]
				LagID = ObjRecSet(0)
				ObjRecSet.Close

200 i fet stil

varför...???

Jag är tveksam om Access har stöd för att utföra flera sql-satser på det sättet. Tror nog att du får göra två anrop.

har du lust att visa en kodsnutt:

jag har bara det här i tanken.

Select ID from tabellen WHERE forening = '"Session("forening")%"' AND konPerson = '"%Session("konperson")%"'...osv osv...

kan jag göra det på nått snabbare sätt

strSQL = "INSERT INTO moraibf(forening, konPerson, adress, postnr, ort, tele, telekv, mobil, epost, klass, ordtroja, restroja) VALUES('"&Session("forening")&"', '"&Session("konperson")&"', '"&Session("adress")&"', '"&Session("postnr")&"', '"&Session("ort")&"', '"&Session("tele")&"', '"&Session("telekv")&"', '"&Session("mobil")&"', '"&Session("epost")&"', '"&Session("klass")&"', '"&Session("ordtroja")&"', '"&Session("restroja")&"')"
Objconn.execute strSQL,,128
strSQL = "SELECT @@IDENTITY"
Set ObjRecSet = Objconn.execute(strSQL)
LagID = ObjRecSet(0)
ObjRecSet.Close

... fast har man otur så är det inte rätt id som kommer tillbaka ... fast som sagt, riktig otur så hinner ngn komma emellan med en ny insert

Skulle lika görna kunna köra en:

strSQL = "SELECT Max(ID) FROM moraibf ORDER BY ID DESC"
Set objRS = objConn.Execute(strSQL)
intLastID = objRS(0)
objRS.Close
Set objRS = Nothing

Vill man vara 100% säker så är det insert med ADODB.Recordset som . Då har man id direkt användbart efter att objRS.Update utförts

cya,
PatrikB

riktig otur så hinner ngn komma emellan med en ny insert

nu har jag inte testat såklart, men @@identity har historiskt sett (sql server) innehållit id(måste givetvis vara räknare) för post som senast lagts till i samma connection, dvs, den posten som lades till senast i koden ovan. om sedan hundra pers har hunnit med att sparka in saker emellan spelar det inte någon roll.

som sagt, inte testat.

Jag är tveksam om Access har stöd för att utföra flera sql-satser på det sättet.
om det nu är så (tja, LarsG brukar ju ha rätt), varför i hela helskotta ska då folk (och access) envisas med att slänga in ett semikolon efter sql-frågan?

hmm...

med tanke på vad ni har sagt så kör jag som jag sa i mitt förra inlägg:

strSQL = "INSERT INTO tabellen(forening, konPerson, adress, postnr, ort, tele, telekv, mobil, epost, klass, ordtroja, restroja, intboende, boende) VALUES('"&Session("forening")&"', '"&Session("konperson")&"', '"&Session("adress")&"', '"&Session("postnr")&"', '"&Session("ort")&"', '"&Session("tele")&"', '"&Session("telekv")&"', '"&Session("mobil")&"', '"&Session("epost")&"', '"&Session("klass")&"', '"&Session("ordtroja")&"', '"&Session("restroja")&"', "&Session("intboende")&", '"&Session("Satt")&"')"
Objconn.execute strSQL

sen direkt efteråt så

Select ID from tabellen WHERE forening = '"Session("forening")%"' AND konPerson = '"%Session("konperson")%"'...osv osv...

då bör jag ju få rätt ID eller hur ?

Jag ska överföra en kundkorg från en tabbel till en annan

så här ser koden ut:

 sqlString = "INSERT INTO ordrar (" &_
  "order_id, " &_
  "order_produktID, " &_
  "order_produktantal, " &_
  "order_kundID, " &_
  "order_userID, " &_
  "order_alternativ1, " &_
  "order_alternativ2, " &_
  "order_kopID, " &_
  "order_datum, " &_
  "order_status " &_
  ") SELECT " &_
  "korg_id, " &_
  "korg_produktID, " &_
  "korg_antal, " &_
  "korg_userID, " &_
  "korg_userID, " &_
  "korg_alternativ1, " &_
  "korg_alternativ2, " &_
  " & ordernr & ", " &_
  "getdate(), " &_
  "0 " &_
  "FROM korg WHERE " &_
  "korg_userID =" & userID2

Con.Execute sqlString

Observera denna rad " & ordernr & ", " &_
ordernr ska inte hämtas från tabbelen korg utan är en variabel som ska införas i tabbellen ordrar i kolumnen order_kopID

Jag får inte detta att fungera.

sqlString = "INSERT INTO ordrar (" &_
"order_id, " &_
"order_produktID, " &_
"order_produktantal, " &_
"order_kundID, " &_
"order_userID, " &_
"order_alternativ1, " &_
"order_alternativ2, " &_
"order_kopID, " &_
"order_datum, " &_
"order_status " &_
") SELECT " &_
"korg_id, " &_
"korg_produktID, " &_
"korg_antal, " &_
"korg_userID, " &_
"korg_userID, " &_
"korg_alternativ1, " &_
"korg_alternativ2, " &_
ordernr & ", " &_
"getdate(), " &_
"0 " &_
"FROM korg WHERE " &_
"korg_userID =" & userID2
Con.Execute sqlString