Global.asa filen vill inte funka!

[jepp]

Hej!

Tack för tipsen i mitt tidigare inlägg...

Nu skulle jag vilja ha hjälp med en pryl till.

 

Jag får inte min global.asa att funka!

Jag vill att användarens ifyllda poster i basen ska raderas när han lämnar sidan.

Min .asa ser ut enligt följande:

**********************************************

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnStart

End Sub

</SCRIPT>

 

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnEnd

 

Set MinCon = Server.CreateObject("ADODB.Connection")

Set rs = Server.CreateObject("ADODB.Recordset")

MinCon.Open "DSN=bas;UID=;PWD="

SQL = "DELETE FROM tabell Where AnvId = '" & Session.SessionID & "'"

rs.Open SQL, MinCon

 

End Sub

</SCRIPT>

 

Vet nån varför posten inte raderas!?

Tack på förhand

/J.

[Per Lundkvist]

Lägger du alltså in en ny person med AnvID=Session.SessionID när man kommer in på sidan eller? Så du är säker på att AnvID är likamed Session.SessionID?

[jepp]

Japp det stämmer!

Jag har fortfarande inte klurat ut det?!

Hjälp mig nån, snälla?!

[Hedvig]

Prova att istället för att öppna ett recordset som inte returnerar något (eftersom du bara gör en delete) köra execute direkt mot dbkopplingen :

mindbkoppling.execute "delete from...."

 

Så gör jag alla mina delete, jag har aldrig provat om det går att göra en delete i en "opensats"

 

 

Dessutom så som det är nu lämnar du dbkopplingen

och recordset öppen när du lämnar sessionen.

 

Sätt alltid:

mittrecordset.close

set mittrecordset=nothing

 

mindbkoppling.close

set mindbkoppling=nothing

 

 

på slutet av sidan

 

Hoppas det hjälper!