webForumDet fria alternativet

Vad är det för fel på koden...?

ASP

3 svar · 170 visningar · startad av schmoo

Medlem sedan jan. 20022 inlägg
Frågan#1

detta blir lite svårt att förklara men jag ska testa (jag kommer inte vidare, detta är ända utvägen)....

När jag lägger till en apa (apa är inte det jag lägger till igentligen, men iallafall) vid min "form" sida, så väljer jag vilken typ av apa det ska vara med hjälp av en vanlig rullnings list(plus massa annat tjaffs som namn och dylikt). Men informationen läggs inte till i databasen, ie6.0 klagar inte heller på min kod så jag vet ej vad det är för fel.

så här ser en del av formen ut....
-----------------------------
<select name="aptyp">
<option>typ..
<option>hoppande
<option>skrikande
<option>ätande
</select>
-----------------------------

så här ser add skriptet ut....
-----------------------------
<%

Dim Addera, objConn, Connect

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq = c:\webshare\wwwroot\asp\cd\cd.mdb"

Set RecSet = Server.CreateObject("ADODB.Recordset")

If Request.Form("aptyp") = "hoppande" then
Addera = "SELECT * FROM apa"
End If

If Request.Form("aptyp") = "skrikande" then
Addera = "SELECT * FROM apa2"
End If

If Request.Form("aptyp") = "ätande" then
Addera = "SELECT * FROM apa3"
End If

objConn.Open Addera, Connect, adOpenStatic, adLockOptimistic

RecSet.AddNew

RecSet("namn") = Request.Form("namn")
RecSet("typ") = Request.Form("typ")
RecSet("antal") = Request.Form("antal")

RecSet.Update
RecSet.Close
Connect.Close

%>
-----------------------------

som sagt så klagar inte ie på mig.....

------------------
//Schmoo

[Redigerat av schmoo den 14 jan 2002]

[Redigerat av schmoo den 14 jan 2002]

Medlem sedan mars 20002 836 inlägg
#2

Du har ingen value satt i option taggen

cya,
PatrikB

------------------
-=* IF there is a wrong way to do something, then someone will do it *=-

Medlem sedan dec. 200012 464 inlägg
#3

Du öppnar aldrig recset (utan något som heter objconn istället).

recset.Open Addera, Connect, adOpenStatic, adLockOptimistic

------------------
essentitia preter non sans multiplicandum

Medlem sedan jan. 20022 inlägg
#4

Det var value som var felet (stora tack)

det andra felet som ni påpekade var grejer som jag glömt ändra sen ett försök som jag ej genom förde lyckat.

Men tack tack ska ni ha :D

------------------
//Schmoo

322 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
135 ms — deklarationer (db)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)
191 ms — ändringar (db)