FIXATJag håller på att få hjärnsläpp. Har en form action="ShowAndAdd.asp" method="post"
som sedan ska visa på sidan. Det fungera utmärk den skriver till databasen sedan skrivs det ut på sidan. Nu till problemet om jag vill ha två

textarea name="namn" input type="text" ROWS="8" COLS="40"
input type="text" name="who"

I coden har jag prövat än det ena än det andra men det fungerar inte Kolumena i databasen heter... txt och namn.....

Min code


strName = Request.Form("namn")
strName = Request.Form("who")

Set connect = Server.CreateObject("ADODB.Connection")
connect.open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("forslag.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM Recept"

If strName = "" Then
RecSet.open Addera,connect,adOpenForwardOnly,adLockReadOnly,adCmdText

Else
RecSet.open Addera,connect,adOpenKeyset,adLockOptimistic,adCmdText
RecSet.addNew
RecSet("txt") = strName
RecSet("namn") = strName
RecSet.Update


RecSet.MoveFirst
End If


Nu skriv bara input who ut...vad är felet.... Gråhårig Thomas

Båda variablerna heter ju strName!!! Byt namn på den ena så ska det nog gå bättre...

/Johan

Ge ett förslag nu har jag rört i hop allting...

<code>
Min code


strName = Request.Form("namn")
strwho = Request.Form("who")

Set connect = Server.CreateObject("ADODB.Connection")
connect.open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("forslag.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM Recept"

If strName = "" Then
RecSet.open Addera,connect,adOpenForwardOnly,adLockReadOnly,adCmdText

Else
RecSet.open Addera,connect,adOpenKeyset,adLockOptimistic,adCmdText
RecSet.addNew
RecSet("txt") = strwho
RecSet("namn") = strName
RecSet.Update


RecSet.MoveFirst
End If


</code>

Det verkar iaf som att fältet "who" är texten som skall läggas in.
Nu är det iaf olika namn på variablarna...

edit: såg att det var fixat i efterhand men ändå...