---
title: "Too few parameters, igen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11692-too-few-parameters-igen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "KoTTeN"
published: "2001-09-19T16:28:00.000Z"
updated: "2001-09-19T18:08:00.000Z"
replies: 5
views: 137
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/11692-too-few-parameters-igen"
---

# Too few parameters, igen

## #1 — KoTTeN, 2001-09-19T16:28Z

Tja, hade problem me ett asp script där man ska kunna ändra lite info om sig själv som inloggad användare. Skrev om de förut där alla sa att felet låg i SQL:en. Så ja försökte fixa de men de gick åt helvete... Så ja undrar om ni kan hjälpa mig igen? 
Föst kommer man till de klasiska forumet som ser ut så här: 

```
<!-- #include file="adovbs.inc" -->

<% If Request.QueryString("prat") = "" Then %>

<%	Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("..\data\data.mdb")

	strAdressID = UCase(Request.QueryString("AdressID"))
	Set RecSet = Server.CreateObject("ADODB.Recordset")
	visa = "SELECT * FROM users WHERE username  LIKE '" & strAdressID & "%'" ' " 
   RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>
	
	<form method="POST" action="installningar2.asp">

	<input type="hidden" name="ad" value="<% =Request.QueryString("adressID") %>">

	<FONT CLASS="m">&nbsp;Lösenord<BR>		
	<input type="password" size="28" name="password" value="<% =RecSet("password") %>"><br><BR>	

	<FONT CLASS="m">&nbsp;För och efternamn:<BR>		
	<input type="text" size="28" name="namn" value="<% =RecSet("namn") %>"><br><BR>	
	
	<FONT CLASS="m">&nbsp;Ålder<BR>		
	<input type="text" size="28" name="alder" value="<% =RecSet("alder") %>"><br><BR>	

	<FONT CLASS="m">&nbsp;bor<BR>		
	<input type="text" size="28" name="bor" value="<% =RecSet("bor") %>"><br><BR>	

	<FONT CLASS="m">&nbsp;bild 
	<input type="text" size="28" name="bild" value="<% =RecSet("bild") %>"><br><BR>	

	&nbsp;Lite om dig själv 

	<textarea rows="5" cols="79"  name="text"> <% =RecSet("omsigsjalv") %></textarea><BR><BR>	

	<FONT CLASS="m">&nbsp;Mail:<BR>		
	<input type="text" size="33" name="mail" value="<% =RecSet("mail") %>"><br><BR>

	<FONT CLASS="m">&nbsp;Hemsida:<BR>		
	<input type="text" size="33" name="hemsida" value="<% =RecSet("hemsida") %>"><br><BR>

	<FONT CLASS="m">&nbsp;ICQ:<BR>		
	<input type="text" size="33" name="icq" value="<% =RecSet("icq") %>"><br><BR>

	<FONT CLASS="m">&nbsp;Lunarstorm:<BR>		
	<input type="text" size="33" name="lunar" value="<% =RecSet("lunar") %>"><br><BR

	<input type="submit" value="Uppdatera">

	</form>

<% End If %>
```

Som sen går vidare till installningar2.asp:

```
<!-- #include file="adovbs.inc" -->

<%	Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("..\data\data.mdb")

	strAdressID = UCase(Request.QueryString("AdressID"))
	Set RecSet = Server.CreateObject("ADODB.Recordset")
	visa = "SELECT * FROM users WHERE username  LIKE '" & strAdressID & "%'" ' " 
  	RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic

	RecSet("Password") = Request.Form("password")
	RecSet("namn") = Request.Form("namn")
	RecSet("alder") = Request.Form("alder")
	RecSet("bor") = Request.Form("bor")
	RecSet("bild") = Request.Form("bild")
	RecSet("omsigsjalv") = Request.Form("omsigsjalv")
	RecSet("mail") = Request.Form("mail")
	RecSet("hemsida") = Request.Form("hemsida")
	RecSet("icq") = Request.Form("icq")
	RecSet("lunar") = Request.Form("lunar")

	RecSet.Update
	RecSet.Close %>
```

Tillägas kan vara att det inte behöver vara säkert alls, bara de funkar =)

Just ja, felmedelandet oxå: 

```
Microsoft OLE DB Provider for ODBC Drivers error '80040e10' 

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1. 

/login/installningar2.asp, line 49
```

Hoppas nån orkar med mig igen =)
// KoTTeN

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

## #2 — Addeladde, 2001-09-19T16:40Z

Vilken rad är 49

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

## #3 — KoTTeN, 2001-09-19T17:31Z

Just ja, visste att jag glömde nå!

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

strAdressID = UCase(Request.QueryString("AdressID"))
Set RecSet = Server.CreateObject("ADODB.Recordset")
visa = "SELECT * FROM users WHERE username LIKE '" & strAdressID & "%'" ' " 
-- RAD 49 -->> RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic

RecSet("Password") = Request.Form("password")
RecSet("namn") = Request.Form("namn")
RecSet("alder") = Request.Form("alder")
RecSet("bor") = Request.Form("bor")
RecSet("bild") = Request.Form("bild")
RecSet("omsigsjalv") = Request.Form("omsigsjalv")
RecSet("mail") = Request.Form("mail")
RecSet("hemsida") = Request.Form("hemsida")
RecSet("icq") = Request.Form("icq")
RecSet("lunar") = Request.Form("lunar")

RecSet.Update
RecSet.Close %>
```

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

## #4 — jorgen, 2001-09-19T17:40Z

I denna snutt hittar jag följade "fel":

```
visa = "SELECT * FROM users WHERE username LIKE '" & strAdressID & "%'"
```

1\. Jag hade inte använt LIKE utan:

```
visa = "SELECT * FROM users WHERE username = '" & strAdressID & "'"
```

och då får du ta bort ett %. Dock fattades du ett % också. Kolla också så du har ett värde i variablen strAdressId.

mvh Jörgen

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

## #5 — pirro, 2001-09-19T17:50Z

kan vara så att kolumnen username inte finns

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

## #6 — KoTTeN, 2001-09-19T18:08Z

Tackar! 
Nu funkar de!!!

// KoTTeN

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/11692-too-few-parameters-igen