Hej denna kod uppdaterar en access databas som ligger på en webserver och om jag stänger rs och db efter så får jag 500 internal server error men om jag inte stänger efter mig så funkar det ska man gör på något annat sätt ? Jag skicka iväg en sträng till Asp sidan via vb 6.

<%
db= Server.MapPath("../../../db/Regson.mdb")
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db%>

<%Set Rs = Server.CreateObject("ADODB.Recordset")

SQL = "Update Tider Set Anr=''" & Request.QueryString("Anr") & "'', Sett1=''" & Request.QueryString("Sett1") & "'', B_Av=''" & Request.QueryString
("B_Av") & "'', Aktion=''" & Request.QueryString("Aktion") & "'', Rätt_L=''" & Request.QueryString("Rätt_L") & "'', Fp=''" & Request.QueryString("Fp") & "'', 
Instr=''" & Request.QueryString("Instr") & "'', Check1=''" & Request.QueryString("Check1") & "'', Ov=''" & Request.QueryString("Ov") & "'', RestO=''" & 
Request.QueryString("RestO") & "'', ROrder=''" & Request.QueryString("ROrder") & "'' WHERE ID =" & Request.QueryString("ID")

conn.Execute(SQL) 

''RS.CLOSE
''CONN.CLOSE
''SET RS = NOTHING
''SET CONN = NOTHING
%>

Vad jag kan se så öppnar du aldrig något RecordSet, så det är inte så konstigt att det inte går att stänga.

Sedan bör du läsa på lite om SQL-injection.

Johan

Hejsan!

Nu har jag fått reda på att om jag kör programmet från vb6 funkar det perfekt men inte som .exe fil då får jag Run-Time error '35600' Index out of bounds vad kan detta bero på


Har jag gjort något fel tro?

Tobbe

Har också kommit på att det funkar som exe fil hemma men inte borta ex. på mitt jobb vad kan det bero på.

Testar lite saker som ni kanske redan förstått!!!!!

Tobbe

Om du får index out of bound kallar du på ett objekt som inte finns eller är skapat i din kollektion. Troligaste orsaken är att det inte blir någon träff på några poster när du skapar din sql-sats.

Börja med att köra

response.write sql
response.end

Därefter tar du SQL-satsen och kör den i din databas för att se om du får någon matchning. Eftersom du kör ExecuteQuery kommer du aldrig få något data tillbaks, eftersom detta kommando bygger på att du troligen kör INSERT, UPDATE, DELETE.

Titta gärna på asp-artiklarna här på pellesoft så tror jag du får kläm på hur du kan göra på bästa sätt. Säg till om du behöver mer hjälp

Hej
Tack för svaret jag ska jobba lite med det.

Har upptäckt att om jag ändrar data med ex update och utför en ny sökning så visar inte ändringen fören jag startar om programmet.

Har jag glömt något eller kan det ha något med att webbrowser1 inte uppdateras som den ska?

Tobbe