14. marts 2006 - 14:19Der er
5 kommentarer og 1 løsning
Sessions - start en session med henblik på udtræk fra database
Hej!
Jeg har en formular, hvor brugerne indtaster data, som skrives ned i en database (Access), hvorefter brugeren dirigeres hen til en side, hvor han/hun kan printe sine indtastede oplysninger ind.
Min idé er at starte en session, når brugeren skriver data ned i databasen, hvorefter jeg på print-siden vil lave en SQL-forespørgsel i forhold til den pågældende session.
Session skal være "GameID" som er autonummerering i databasen.
Jeg har forsøgt at indsætte session-koden i nedenstående script, som skriver data ned i databasen, men den giver fejl (Object required: '') på line 37.
Nogen, der kan hjælpe med at lave den rigtige session-kode? På forhånd tak.
strkols = " Entry " strVals = " Now() " for i = 1 to 57 if Request.Form("Q"&i) <> "" then strkols = strkols & ", Q" & i strvals = strvals & ", " & Request.Form("Q"&i) end if next for i = 58 to 63 if Request.Form("Q"&i) <> "" then strkols = strkols & ", Q" & i strvals = strvals & ", '" & Request.Form("Q"&i) & "' " end if next
sSQL = "insert into Games (" & strKols & ") values (" & strVals & ")"
'Udskriv SQL 'Response.Write sSQL
'Session start
sSQL = "Select GameID from Games" Session.Timeout=5
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Du kan ikke hente fra databasen inden du har oprettet en forbindelse: <%@ Language="VBScript" %> <% Option Explicit %> <html> <head> <title>benchmark_insert.asp</title> </head> <body> <% 'Definer variabler Dim sConnString, connection, sSQL, strkols, strVals, i, rs
strkols = " Entry " strVals = " Now() " for i = 1 to 57 if Request.Form("Q"&i) <> "" then strkols = strkols & ", Q" & i strvals = strvals & ", " & Request.Form("Q"&i) end if next for i = 58 to 63 if Request.Form("Q"&i) <> "" then strkols = strkols & ", Q" & i strvals = strvals & ", '" & Request.Form("Q"&i) & "' " end if next
sSQL = "insert into Games (" & strKols & ") values (" & strVals & ")"
Du vil nok også fortrække at bruge @@IDENTITY i stedet, da den automatisk henter det ID der lige er indsat i stedet for "Select GameID from Games order by gameID desc":
set rs = connection.Execute("SELECT @@IDENTITY as thisID") Session("GameID") = rs("thisID")
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.