varför funkar inte detta?

6 svar · 194 visningar · startad av Cactuz 13 okt. 2001

CactuzMedlem sedan okt. 2001670 inlägg

Frågan13 okt. 2001 23:37#1

varför funkar inte det här?

Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("lista.mdb")

SQL = "UPDATE spel SET 1 = '" & Request.Form("1") & "', 2 = '" & Request.Form("2") & "', 3 = '" & Request.Form("3") & "', 4 = '" & Request.Form("4") & "', 5 = '" & Request.Form("5") & "', 6 = '" & Request.Form("6") & "', 7 = '" & Request.Form("7") & "', 8 = '" & Request.Form("8") & "', 9 = '" & Request.Form("9") & "', 10 = '" & Request.Form("10") & "', 11 = '" & Request.Form("11") & "', 12 = '" & Request.Form("12") & "', 13 = '" & Request.Form("13") & "', 14 = '" & Request.Form("14") & "', 15 = '" & Request.Form("15") & "', 16 = '" & Request.Form("16") & "', 17 = '" & Request.Form("17") & "', 18 = '" & Request.Form("18") & "', 19 = '" & Request.Form("19") & "', 20 = '" & Request.Form("20") & "', 21 = '" & Request.Form("21") & "', 22 = '" & Request.Form("22") & "', 23 = '" & Request.Form("23") & "', 24 = '" & Request.Form("24") & "', 25 = '" & Request.Form("25") & "'"
Set rs = db.Execute(SQL)

Set rs = nothing
Set db = nothing

Response.Redirect "lista.asp"

icaaqMedlem sedan okt. 20005 273 inlägg

13 okt. 2001 23:47#2

är det tal så ska det inte vara några fnuttar(') ;)

------------------
[Har aldrig redigerats av någon den 11 okt 2001]

icaaqMedlem sedan okt. 20005 273 inlägg

13 okt. 2001 23:49#3

....Förresten....

Välkommen till wF

------------------
[Har aldrig redigerats av någon den 11 okt 2001]

icaaqMedlem sedan okt. 20005 273 inlägg

13 okt. 2001 23:54#4

sen kan du byta ut:

Set rs = db.Execute(SQL)

mot

db.Execute(SQL),,128

och ,,128 betyder att man inte skapar något recordset :OO vilket inte behövs vid en update ;)

------------------
[Har aldrig redigerats av någon den 11 okt 2001]

CactuzMedlem sedan okt. 2001670 inlägg

14 okt. 2001 00:22#5

får bara upp detta felmeddelande:

Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: 'db.Execute'
/cactuz/lista/spelista.asp, line 8

@ndersMedlem sedan juni 200032 967 inlägg

14 okt. 2001 09:44#6

Hur ser din kod ut nu?

------------------
All your base are belong to me.

LarsGMedlem sedan dec. 200012 464 inlägg

14 okt. 2001 10:51#7

Använder du 1 som kolumnnamn?

Det brukar bara ställa till problem (som nu).

Jag tycker att du bör använda namn som associerar till vilken typ av data som kolumnen kan innehålla.

Om du vill använda sådana namn i sql så måste man ange dom inom []

dvs

SQL = "UPDATE spel SET [1] = '" & Request.Form("1") & "',[2] = '" & 
'etc
db.Execute SQL

------------------
essentitia preter non sans multiplicandum