Skicka till databas.

13 svar · 333 visningar · startad av Bire 28 juni 2000

BireMedlem sedan dec. 199919 074 inlägg

Frågan28 juni 2000 20:27#1

Hmm..

Varför funkar inte detta måntro?

<FORM ACTION=add.asp METHOD=POST>
<select name=Kon size=1>
<option value=>VÄLJ !</option>
<option value=dam>Dam</option>
<option value=herr>Herr</option>
</select>
<input type=hidden name=ProdId value="<%= RS("ProdId") %>">
<input type=hidden name=Titel value='RS(''Titel'')'>
<font face=Verdana Size=1 color=#000000>Antal:</font>
<input type=text name=Antal size=1 value=1>
<input id=submit1 name=Lägg i din 
korg name=I1 alt=Handla border=0 type=image src=shop.gif>
</form>

..och detta är "add.asp":

<%
Response.Status = "204 No Content"
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open Session("shopdata")
SQLStmt = "INSERT INTO KORG"
SQLStmt = SQLStmt & "(AnvId, ProdId, Antal, Kon)"
SQLStmt = SQLStmt & "VALUES(" & Session.SessionId & ", " & Request.Form("ProdId") & ", " & Request.Form("Kon") & ", " & Request.Form("Antal") & ")"
Connection.Execute(SQLStmt)
Connection.Close
%>

Inget av infon hamnar i db... Tar jag väck "Kon" så funkar det..

Ser nån vart felet ligger eller är jag helt ute o cyklar än en gång ? ;)

------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

[Redigerat av Bire den 28 jun 2000]

VideMedlem sedan dec. 19998 577 inlägg

28 juni 2000 23:11#2

Hmmm... ser inte direkt vad som är fel Bire... men borde du inte byta plats på Request.Form("Kon") och Request.Form("Antal")?

Och skall verkligen Response.Status = "204 No Content" ligga före databas-exekveringen?

------------------
www.webeye.nu

BireMedlem sedan dec. 199919 074 inlägg

28 juni 2000 23:15#3

Jag har flyttat runt dem på många olika sätt utan att det gjort nån skillnad. Jag har även haft dem i rätt ordning ;)

Response.Status = "204 No Content" har alltid legat där, och funkat..
Jag har endast lagt till "Kon" i dag och det var då det sket sig.

------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

VideMedlem sedan dec. 19998 577 inlägg

28 juni 2000 23:22#4

OK, testa att ta bort Response.Status = "204 No Content" och se om du får nått felmeddelande, eller om du skriver ut SQL-satsen... så kanske man hittar nått fel...

------------------
www.webeye.nu

BireMedlem sedan dec. 199919 074 inlägg

28 juni 2000 23:25#5

Testade det och då ser det ut så här:

<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open Session("shopdata")
SQLStmt = "INSERT INTO KORG"
SQLStmt = SQLStmt & "(Kon, AnvId, ProdId, Antal)"
SQLStmt = SQLStmt & "VALUES(" & Request.Form("Kon") & ", " & Session.SessionId & ", " & Request.Form("ProdId") & ", " & Request.Form("Antal") & " )"

Connection.Execute(SQLStmt)
Connection.Close

%>
<%Response.Redirect("basket.asp")%>

Fel:

Microsoft OLE DB Provider for ODBC Drivers fel '80040e14'

[Microsoft][Drivrutin för ODBC Microsoft Access] Syntaxfel i INSERT INTO-uttryck.

/golf/add.asp, rad 8

------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

fredrikMedlem sedan dec. 19991 072 inlägg

29 juni 2000 06:08#6

Hur ser det ut om du skriver ut SQLStmt?

------------------
Fredrik Klarqvist
fredrik.klarqvist@swipnet.se
www.streetwise.se/fredrik/

VideMedlem sedan dec. 19998 577 inlägg

29 juni 2000 06:10#7

Testa att byta ut:
SQLStmt = SQLStmt & "VALUES

Mot:
SQLStmt = SQLStmt & " VALUES

Om inte det funkar, så testa (precis som fredrik säger) att skriva ut SQL-satsen:
Response.write SQLStmt

Före du exekverar den...

------------------
www.webeye.nu

[Redigerat av Vide den 29 jun 2000]

BireMedlem sedan dec. 199919 074 inlägg

29 juni 2000 09:18#8

Nu har jag gjort så här:

<FORM ACTION=add.asp METHOD=POST>
<select name=Kon size=1>
<option value=dam>Dam</option>
<option value=herr>Herr</option>
</select>

<input type=hidden name=ProdId value="<%= RS("ProdId") %>">
<input type=hidden name=Titel value='RS(''Titel'')'>
<font face=Verdana Size=1 color=#000000>Antal:</font>
<input type=text name=Antal size=1 value=1>
<input id=submit1 name=Lägg i din 
korg name=I1 alt=Handla border=0 type=image src=shop.gif>
</form>

"add.asp":

<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open Session("shopdata")
SQLStmt = "INSERT INTO KORG"
SQLStmt = SQLStmt & "(AnvId, Kon, ProdId, Antal)"
SQLStmt = SQLStmt & " VALUES(" & Session.SessionId & ", " & Request.Form("Kon") & ", " & Request.Form("ProdId") & ", " & Request.Form("Antal") & ") "
Response.write SQLStmt

Connection.Execute(SQLStmt)
Connection.Close

%>
<%Response.Redirect("basket.asp")%>

Felmeddelande:

INSERT INTO KORG(AnvId, Kon, ProdId, Antal) VALUES(412909550, dam, 870, 1)
Microsoft OLE DB Provider for ODBC Drivers fel '80040e10'

[Microsoft][Drivrutin för ODBC Microsoft Access] För få parametrar angavs. 1 förväntades.

/golf/add.asp, rad 9

??? Fattar inte vad som är fel..------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

[Redigerat av Bire den 29 jun 2000]

MattiasWMedlem sedan jan. 2000144 inlägg

29 juni 2000 10:03#9

Prova med enkelfnuttar runt dam
Exempel:
INSERT INTO KORG(AnvId, Kon, ProdId, Antal) VALUES(412909550, 'dam', 870, 1)

Är det en sträng i databasen skall man ha enkelfnuttar runtom.

BireMedlem sedan dec. 199919 074 inlägg

29 juni 2000 16:33#10

Det hjälper inte !

Rad 9 = Connection.Execute(SQLStmt)

Där är felet tydligen ?!?!?

Jag får fnatt..

------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

emissionMedlem sedan dec. 19996 721 inlägg

29 juni 2000 17:15#11

<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open Session("shopdata")
SQLStmt = "INSERT INTO KORG"
SQLStmt = SQLStmt & " (AnvId, Kon, ProdId, Antal)"
SQLStmt = SQLStmt & " VALUES(" & Session.SessionId & ",'" & Request.Form("Kon") & "'," & Request.Form("ProdId") & "," & Request.Form("Antal") & ")"
Response.write SQLStmt
Connection.Execute(SQLStmt)
Connection.Close

%>
<%Response.Redirect("basket.asp")%>

------------------
Gunnar Liljas - webbutvecklare
Leon Reklambyrå AB

BireMedlem sedan dec. 199919 074 inlägg

29 juni 2000 17:26#12

Gunnar :

Först ska jag byta kön. Sen ska du & jag......

It works... :e :e :e :e :e :e :e :e :e :e :e :e :e

HUR mycket tack som helst !!
------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>

[Redigerat av Bire den 29 jun 2000]

emissionMedlem sedan dec. 19996 721 inlägg

3 juli 2000 00:02#13

Först ska jag byta kön. Sen ska du & jag......

Oj! Det verjar som om jag snarast bör bege mig till IKEA för att införskaffa kyskhetsbältet Nenne... :e

------------------
Gunnar Liljas - webbutvecklare
Leon Reklambyrå AB

BireMedlem sedan dec. 199919 074 inlägg

3 juli 2000 12:06#14

:e + horn

------------------
Explorer in a further region of experience.
<A HREF="http://www.lifestyleshop.nu" TARGET=_blank>www.LifeStyleShop.nu</A>