Har olika "alternativ" beroende pa vad formularet redigera inneholl.... Funkar att fa ratt pa radera och stang, men inte pa flytta, varden "ramlar" ur selecten och hamnar vid sidan av, varfor?
[red]
<%
If session("level") = "1" then
response.redirect "login_err.asp"
else
sql = "select * from t_forum"
set rs = objConn.execute(sql)
forumID = request.form("forumID")
tradID = request.form("threadID")
response.write "<form name=""redigerar"" method=""post"" action=""edit_thread2.asp"">"
If request.form("redigera") = "Flytta" then
response.write "<font face=""Verdana"" size=""2""><b>Flytta tråden till forum:</b></font><br>"
response.write "<select name=""forum"" class=""form"">"
response.write "<input type=""hidden"" name=""flytta"" value=""flytta"">"
do until rs.eof
response.write "<option value=""" & rs("forumID") &""">"& rs("f_title") &""
rs.movenext
loop
response.write "</select>"
response.write "<input type=""submit"" value=""OK"" class=""knapp"">"
response.write "<input type=""hidden"" value="""& forumID &""" name=""forumID"">"
response.write "<input type=""hidden"" value="""& tradID &""" name=""tradID"">"
elseif request.form("redigera") = "Radera" then
response.write "<a href=""edit_thread2.asp?radera="& tradID &"&typ=radera"">"& tradID &"</a> Radera hela denna tråd"
else
response.write "<input type=""text"" name=""tradID"" value="""& tradID &""">"
response.write "<input type=""submit"" value=""Stäng tråden!"">"
End if
response.write "</form>"
End IF
%>