---
title: "Formular problem."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/68003-formular-problem"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Känning"
published: "2003-02-11T22:38:06.000Z"
updated: "2003-02-11T22:44:41.000Z"
replies: 1
views: 121
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/68003-formular-problem"
---

# Formular problem.

## #1 — Känning, 2003-02-11T22:38Z

Hej

Jag har en spelsida och tänkte att när man skulle rätta spel så ska man välja mellan 0 och den ev vinsten.

Så jag har ett formular som ser ut så här:

\<select name="vinst"\>
\<option value="fel"\>\<% =RecSet("vinst") %\>\</option\>
\<option value="ratt"\>\<% =ev %\>\</option\>
\</select\>

"RecSet Vinst" = 0 eftersom jag skickar in det så när jag bokar spelet, "ev" är ev vinst. 

Problemet är alltså när jag ska skicka det till databasen, jag får inte rätt värde  :( 

Jag får ett felmeddelande, är det kanske inte möjligt att göra så här? men det måste det ju vara.

För att vara tydlig så skickar jag med hela koden:

change.asp
\-----------------------------
\<!--#include file="adovbs.inc"--\>
\<HTML\>
\<head\>
\</head\>
\<BODY\>
\<table border="0" cellpadding="2" cellspacing="2"\>
\<tr\>
\<td\>
\<p\>
\<%	

	ev = 0

	Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("spel.mdb")&";"

	Set RecSet = Server.CreateObject("ADODB.Recordset")
   Visa = "SELECT \* FROM spel WHERE id = " & Trim(Request.QueryString("id")) & " "
   RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %\>
        \</p\>
        \<p\>\<strong\>&Auml;ndra spel\</strong\>\</p\>
		
		\<%
ev = RecSet("odds") \* RecSet("insats")
%\>

\<form method="POST" action="change2.asp"\>
\<table border="0" cellpadding="2" cellspacing="2"\>
\<tr\>
\<td\>\<input type="hidden" name="AD" value="\<% =Request.QueryString("id") %\>"\>\</td\>
\<td\>\</td\>
\</tr\>
\<tr\>
\<td\>Match:\</td\>
\<td\>\<input type="text" size="30" name="match" value="\<% =RecSet("match") %\>"\>\</td\>
\</tr\>
\<td\>Odds:\</td\>
\<td\>\<input type="text" size="30" name="odds" value="\<% =RecSet("odds") %\>"\>\</td\>
\</tr\>\<tr\>
\<td\>Insats:\</td\>
\<td\>\<input type="text" size="30" name="insats" value="\<% =RecSet("insats") %\>"\>\</td\>
\</tr\>\<tr\>
\<td\>Bolag:\</td\>
\<td\>\<input type="text" size="30" name="bolag" value="\<% =RecSet("bolag") %\>"\>\</td\>
\</tr\>
\<tr\>
\<td\>Vinst:\</td\>
\<td\>
\<select name="vinst"\>
\<option value="fel"\>\<% =RecSet("vinst") %\>\</option\>
\<option value="ratt"\>\<% =ev %\>\</option\>
\</select\>
\</td\>
\</tr\>
\<tr\>
\<td\>Resultat:\</td\>
\<td\>\<input type="text" size="30" name="res" value="\<% =RecSet("res") %\>"\>\</td\>
\</tr\>
\</table\>
	

\<INPUT TYPE="submit" name="btn1" value="Skicka till databasen"\>

\</form\>

\<% 
RecSet.Close
Connect.Close 
%\>

\<p\>\<a href="alla.asp"\>Redigera annan post!\</a\>
\</td\>
\</tr\>
\</table\>
\</body\>
\</html\>

\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
change2.asp
\------------------------

\<!-- #include file = "adovbs.inc" --\>
\<%	Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("spel.mdb")&";"

	Set RecSet = Server.CreateObject("ADODB.Recordset")
   Uppdatera = "SELECT \* FROM spel WHERE ID = " & Request.Form("ad") & " "

   RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic 

	RecSet("match") = Request.Form("match")
	RecSet("odds") = Request.Form("odds")
	RecSet("bolag") = Request.Form("bolag")
	RecSet("vinst") = Request.Form("vinst")
	RecSet("res") = Request.Form("res")
	RecSet("insats") = Request.Form("insats")	
	RecSet.Update
	RecSet.Close
	Connect.Close 
	Response.Redirect "main.asp"
	%\>

Permalänk: https://www.webforum.nu/p/68003

## #2 — Känning, 2003-02-11T22:44Z

Hittade felet, det e sent nu  :)

\<select name="vinst"\>
\<option value="\<% =RecSet("vinst") %\>"\>\<% =RecSet("vinst") %\>\</option\>
\<option value="\<% = ev %\>"\>\<% =ev %\>\</option\>
\</select\>

Så ska det givetvis vara  ;)

Permalänk: https://www.webforum.nu/p/949058

---

Tråden på webben: https://www.webforum.nu/amne/asp/68003-formular-problem