20. juli 2005 - 13:34Der er
41 kommentarer og 1 løsning
Sessions Hvordan skal man arbejde med dem
Jeg er ved at skal have en sisson inkluderet på mine sider kunne f.eks. være testpilot_dk´s
if Request.QueryString("language") <> "" then Session("Sprog") = Request.QuestString("language") end if
Men hvordan bør/kan man gøre.
- Kan man "putte" kode ind på alle siderne. - Kan det være via en fil f.eks. session.txt - Kan man med have det med i en fil man har inkluderet på alle sine sider f.eks. header.asp
I dette særtema om aspekter af AI ser vi på skiftet fra sprogmodeller til AI-agenter, og hvordan virksomheder kan navigere i spændet mellem teknologisk hastighed og behovet for menneskelig kontrol.
Du kan gøre det at når en bruger vælger et sprog så redirecter du brugeren til en ny side hvor du laver if Request.QueryString("language") <> "" then Session("Sprog") = Request.QuestString("language") end if efter det sender du brugeren tilbage til den side hvor brugeren valgte sprog. Når du så skal hente menuen kan du benytte Sessionen som et parameter i den sql sætning.
dr. chaos det er vel ik sådan at du kan/vil komme med et eksempel på det. Altså hvordan søren for man sendt brugeren videre? Og hvordan kommer brugeren tilbage. Der udover hvordna får man lige den session ind i en sql sætning.
Det er noget af en stor mundfuld du kom med. Ik lige noget jeg kan hitte ud af. Der er jeg alt for ny ((håber ik det er fordi jeg er fat svag *GG*))
Du skal lave sprog valget som et link til en side: <a href="nytsprog.asp?Sprog=Tysk">Tysk</a>
på den nye aspside nytsprog.asp benytter du if Request.QueryString("Sprog") <> "" then Session("Sprog") = Request.QuestString("Sprog") Response.Redirect("enellerandenside.asp") end if med enellerandenside.asp mener jeg den side som brugeren kom fra hvor der blev valgt sprog.
Der hvor du har din sqlsætning som f.eks. udvælger menupunkterne bruger du if
doh kom til at trykke send 2 sek mere så får du resten
Der hvor du har din sqlsætning som f.eks. udvælger menupunkterne bruger du if Session("Sprog") <> "" then strSQL = "SELECT * FROM Menu WHERE Sprog ='"&Session("Sprog")&"'
Hvis du kigger på http://web74301.ta25.talkactive.net/ Så har jeg den der menu. Som bliver dannet via et db udtræk. Hvor alle sprog henviser til samme sine index.asp
Men mit sql halløjsa er 'SQl udtræk fra databaseb via Case sprog = request.querystring("language") Select Case sprog Case "dk" strSql = "Select ID,menu_dk AS sprog,link from menu" Case "uk" strSql = "Select ID,menu_uk AS sprog,link from menu" Case "de" strSql = "Select ID,menu_de AS sprog,link from menu" Case Else strSql = "Select ID,menu_dk AS sprog,link from menu" End Select
brug: 'SQl udtræk fra databaseb via Case sprog = Session("Sprog") Select Case sprog Case "dk" strSql = "Select ID,menu_dk AS sprog,link from menu" Case "uk" strSql = "Select ID,menu_uk AS sprog,link from menu" Case "de" strSql = "Select ID,menu_de AS sprog,link from menu" Case Else strSql = "Select ID,menu_dk AS sprog,link from menu" End Select
<% 'SQl udtræk fra databaseb via Case sprog = request.querystring("language") Select Case sprog Case "dk" strSql = "Select ID,overskrift_dk,tekst_dk AS sprog from indhold" strOver = "overskrift_dk" Case "uk" strSql = "Select ID,overskrift_uk,tekst_uk AS sprog from indhold" strOver = "overskrift_uk" Case "de" strSql = "Select ID,overskrift_de,tekst_de AS sprog from indhold" strOver = "overskrift_de" Case else strSql = "Select ID,overskrift_dk,tekst_dk AS sprog from indhold" strOver = "overskrift_dk" End Select
' Set RS skal komme efter SQL forespørgsel for at lukke tro jeg nok Set RS = Conn.Execute(strSQL)
Do While Not rs.EOF
'Udskrivning til skærm. Først overskriften der efter teksten Response.Write RS(strOver) Response.Write "<p>" & RS("sprog") & " "
<% 'SQl udtræk fra databaseb via Case sprog = request.querystring("language") Select Case sprog Case "dk" strSql = "Select ID,menu_dk AS sprog,link from menu" Case "uk" strSql = "Select ID,menu_uk AS sprog,link from menu" Case "de" strSql = "Select ID,menu_de AS sprog,link from menu" Case Else strSql = "Select ID,menu_dk AS sprog,link from menu" End Select
' Set RS skal komme efter SQL forespørgsel for at lukke tro jeg nok Set RS = Conn.Execute(strSQL)
Do While Not rs.EOF 'Udskrivning til skærm Response.Write("<A HREF=""" & RS("link") & """>" & RS("sprog") & "</A>") & "<br>" rs.MoveNext Loop %>
<% 'SQl udtræk fra databaseb via Case sprog = Session("Sprog") Select Case sprog Case "dk" strSql = "Select ID,overskrift_dk,tekst_dk AS sprog from indhold" strOver = "overskrift_dk" Case "uk" strSql = "Select ID,overskrift_uk,tekst_uk AS sprog from indhold" strOver = "overskrift_uk" Case "de" strSql = "Select ID,overskrift_de,tekst_de AS sprog from indhold" strOver = "overskrift_de" Case else strSql = "Select ID,overskrift_dk,tekst_dk AS sprog from indhold" strOver = "overskrift_dk" End Select
' Set RS skal komme efter SQL forespørgsel for at lukke tro jeg nok Set RS = Conn.Execute(strSQL)
Do While Not rs.EOF
'Udskrivning til skærm. Først overskriften der efter teksten Response.Write RS(strOver) Response.Write "<p>" & RS("sprog") & " "
<% 'SQl udtræk fra databaseb via Case sprog = Session("Sprog") Select Case sprog Case "dk" strSql = "Select ID,menu_dk AS sprog,link from menu" Case "uk" strSql = "Select ID,menu_uk AS sprog,link from menu" Case "de" strSql = "Select ID,menu_de AS sprog,link from menu" Case Else strSql = "Select ID,menu_dk AS sprog,link from menu" End Select
' Set RS skal komme efter SQL forespørgsel for at lukke tro jeg nok Set RS = Conn.Execute(strSQL)
Do While Not rs.EOF 'Udskrivning til skærm Response.Write("<A HREF=""" & RS("link") & """>" & RS("sprog") & "</A>") & "<br>" rs.MoveNext Loop %>
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.