RecSet.Update vid redigering

11 svar · 171 visningar · startad av Jörgen HP 22 feb. 2001

Jörgen HPMedlem sedan feb. 20012 412 inlägg

Frågan22 feb. 2001 21:35#1

Hej!

Försöker få Palles Bannerutyte att fungera. Allt funkar utom att ändra uppgifter i Tabellen. Har för mig att det brukar bli problem med RecSet.Update när man inte anger metoden för ny rad RecSet.AddNew. Men vid ändringar ska den ju inte skriva ny rad. Får följande meddelande:

ADODB.Recordset.1 error '80004005'
Statement with cursor named in this statement's CURRENT-OF-CURSOR clause is not a SELECT FOR UPDATE.

Vill minnas att jag hört något om detta innan, vet någon hur man fixar till detta?

Mvh
Jörgen

------%< ------------

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DSN="
Set RecSet = Server.CreateObject("ADODB.Recordset")

Uppdatera = "SELECT * FROM all_data WHERE ID= " & Request.Querystring("ID")
RecSet.Open Uppdatera, Connect, adOpenDynamic, adLockOptimistic

RecSet("NPS") = Request.Form("nps")
RecSet("ATS") = Request.Form("ats")
RecSet("ATB") = Request.Form("atb")
RecSet("APB") = Request.Form("apb")

RecSet("M_ATS") = Request.Form("m_ats")
RecSet("M_ATB") = Request.Form("m_atb")
RecSet("M_APB") = Request.Form("m_apb")
RecSet.Update
%>

PatrikBMedlem sedan mars 20002 836 inlägg

22 feb. 2001 22:10#2

.. prova med RecSet.UpdateBatch ..

cya,

------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function

jorgenMedlem sedan feb. 20012 412 inlägg

22 feb. 2001 22:19#3

Då får jag detta felmed. istället:

Microsoft VBScript runtime error '800a01bd'

Object doesn't support this action

mvh
Jörgen

LarsGMedlem sedan dec. 200012 464 inlägg

22 feb. 2001 23:23#4

Kan det vara så att din select-fråga inte ger någon träff?

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

PatrikBMedlem sedan mars 20002 836 inlägg

23 feb. 2001 00:06#5

byt ut adLockOptimistic med en 3 och även adOpenDynamic

------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function

jorgenMedlem sedan feb. 20012 412 inlägg

23 feb. 2001 12:58#6

Hjälper inte får samma meddelande än då.

ADODB.Recordset.1 error '80004005'
Statement with cursor named in this statement's CURRENT-OF-CURSOR clause is not a SELECT FOR UPDATE.

mvh

Jörgen

PatrikBMedlem sedan mars 20002 836 inlägg

23 feb. 2001 13:54#7

hur ser din kod ut nu ....

------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function

ToonsterMedlem sedan feb. 20001 590 inlägg

23 feb. 2001 15:33#8

kör
response.write uppdatera

och kolla att verkligen ID finns med där.

Varför recordset när bara en post skall uppdateras, lite overkill eller?
såvida det inte krävs en låsning.

------------------
"Den som väntar på någon som gått behöver inte vänta längre..."

jorgenMedlem sedan feb. 20012 412 inlägg

23 feb. 2001 21:26#9

Hej!

Tack för er hjälpsamhet!

Jag tröttnade och gjorde om hela klabbet med Insert kommando i ren SQL då funkade det.

Sade en som aldrig ska använda RecSet.Update mer :-)

mvh

Jörgen

PallemanMedlem sedan dec. 2000557 inlägg

23 feb. 2001 22:38#10

jorgen:

Jag är evigt tacksam för ideér om hur jag kan få det hela att fungera på ett smidigare sätt. :)

Jag bygger mest för att lära mig så det vore kul att få lite nya vinklar.
Har du någar tips? :q

Evigt tacksam. :D

------------------
// Palleman
www.wiicom.nu/palle

jorgenMedlem sedan feb. 20012 412 inlägg

24 feb. 2001 19:46#11

Hej Palle!

Jag behöll din kod för att räkna klick samt lägga till banners, sedan hämtade jag alla poster från databasen där jag kan välja på var post "modifiera" eller "radera". iom jag klickar på något skickar jag med en variabel till insertfilen som ädrar posten. Kanske lite rörigt, men jag kan sända dig filerna om intresse finns?

Mvh

Jörgen

PallemanMedlem sedan dec. 2000557 inlägg

25 feb. 2001 16:52#12

Visst!
Det är alltid kul att kolla hur andra gjort för att nå samma resultat... :)

--> pallez@swipnet.se

------------------
// Palleman
www.wiicom.nu/palle