---
title: "Uppdatering av databas."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/7209-uppdatering-av-databas"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "CapooN"
published: "2000-11-23T00:53:00.000Z"
updated: "2000-11-23T00:59:00.000Z"
replies: 1
views: 139
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/7209-uppdatering-av-databas"
---

# Uppdatering av databas.

## #1 — CapooN, 2000-11-23T00:53Z

Jag håller på med ett rakning system och det funkar bra. Men jag har problem med ett admin system där man ska kunna uppdaterad databasen ifrån.
Sidan som slänger fram lagen ser ut såhär.

\<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db.mdb")
SQL = "SELECT \* FROM lag Order by poeng Desc"
Set RS = Connection.Execute(SQL)
%\> \<%
i = 0
Do Until RS.EOF or i = 10
%\>

\<%=Rs("lag1")%\>

\<%=Rs("land")%\>

\<%=Rs("poeng")%\>

\<% i = i +1
Rs.MoveNext
Loop %\>

Såhär långt funkar allt bra och den slänger fram lagen efter poäng ordning. Men när ja ska uppdatera den så har jag gjort såhär.

En Add sida:
\<form action="Add_lag.asp" method="POST"\>
    Lag: 
    \<input type="TEXT" name="Lag1" size="40"\>
    \<br\>
    \<br\>
    Land: 
    \<input type="TEXT" name="Land" size="20"\>
    \<br\>
    \<br\>
    Po&auml;ng 
    \<input type="TEXT" name="poeng" size="20"\>
    \<br\>
    \<br\>
    \<input type="SUBMIT" value="Lägg till" name="SUBMIT"

Sen Add_lag sida:
""Det är denna som krånglar""

\<%
'vi hämtar informationen som man har fyllt i
Lag1 = Request.form("lag1")
land = Request.form("land")
poeng = Request.form("poeng")

'Kollar så att man inte har glömt någon ruta
If Lag1 = "" Then

	Response.write("Du måste fylla i ett lag")

ElseIf land = "" Then

	Response.write("Du måste fylla i ett land")

Else

'öppnar databasen
	Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db.mdb")
	SQL = "Select \* from lag"
	set Rs = Server.CreateObject("ADODB.Recordset")
	Rs.Open sql, conn, 3, 3

	
'Lägger till informationen
	Rs.Addnew

	Rs("lag1") = lag1
	Rs("land") = land
	Rs("poeng") = poeng
	
    Rs.Update

	Rs.close
	Conn.close

	Response.write("Du har nu lagt till ett lag med namnet:\<br\>")
	Response.write( lag1 & "\<br\>")
	Response.write("Tillbaka till \<a href='index.asp'\>Listan\</a\>")

End if
%\>

Jag får error messet 
ADODB.Recordset error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

/news/Add_Pers_Do.asp, line 30 

Line 30 ser ut såhär.
Rs.Open sql, conn, 3, 3

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

## #2 — CapooN, 2000-11-23T00:59Z

Hmm det löste sig när jag öppnade databasen på ett annat sätt.

set Conn=server.createobject("adodb.connection")
	path="DBQ=" & server.mappath("DB.mdb")
	conn.open "driver={microsoft access driver (\*.mdb)}; " & path," ",""

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/7209-uppdatering-av-databas