Öppna databasen?

magnusfeldthMedlem sedan jan. 20034 480 inlägg

Frågan26 dec. 2003 20:51#1

Jag använder följande kod:

<% Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("db/hhgsdb.mdb")
	Set RecSet = Server.CreateObject("ADODB.Recordset")
    RecSet.Open
    SQL = "Update marknadinlagg set budaccepterat = 'Ja', accepteratbud = " & Request.Querystring("MarknadID") & " WHERE TradID=" & Request.Querystring("TradID")& " Or MarknadID=" & Request.Querystring("TradID")
    Connect.Execute SQL,,128
   
    
	RecSet.Update
	RecSet.Close
	Connect.Close 

%>

för att uppdatera flera kolumner på flera poster i en databas. Men jag får det här felmesset:

ADODB.Recordset (0x800A0E7D)
Det går inte att använda anslutningen för den här åtgärden. Den är stängd eller ogiltig i det här sammanhanget.
/hhgspunktse/hhgs/index.asp, line 305

Hur ska jag skriva i denna formen för att se till att databasen är öppen?

Mika3lMedlem sedan nov. 20018 492 inlägg

26 dec. 2003 21:33#2

Förstår inte riktigt hur du har tänkt dig i ditt kodande, vad jag förstår så använder du två olika metoder för att uppdatera samtidigt. ;)

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

SQL = "Update marknadinlagg set budaccepterat = 'Ja', accepteratbud = " & Request.Querystring("MarknadID") & " WHERE TradID=" & Request.Querystring("TradID")& " Or MarknadID=" & Request.Querystring("TradID")
Connect.Execute(SQL)

Connect.Close
Set Connect = Nothing