Avatar billede janomel Nybegynder
20. juli 2005 - 13:34 Der 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

Eller hvordan kan man lige gøre det?
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:38 #1
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.
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:39 #2
ovenstående kommentar er den samme som jeg lavede i det andet spørgsmål.
Avatar billede janomel Nybegynder
20. juli 2005 - 13:45 #3
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*))
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:47 #4
jo 2 sek
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:54 #5
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
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:56 #6
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")&"'
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 13:56 #7
else
strSQL = "SELECT * FROM Menu WHERE Sprog ='Dansk'
Hvis dansk er standard sproget.
Avatar billede janomel Nybegynder
20. juli 2005 - 13:58 #8
Ved ikke om det ændre noget men siden ligger pt på http://web74301.ta25.talkactive.net/
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:02 #9
det ændre ikke noget din nytsprog.asp side skal bare ligge i samme mappe som din index.asp
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:03 #10
du skal så bare benytte:
Response.Redirect("index.asp")
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:07 #11
er det hjælp nok eller skal der mere til ?
Avatar billede janomel Nybegynder
20. juli 2005 - 14:08 #12
Tak for du lige kom med den bemærkning, for sad faktisk og tænkte på det :)

Kommer tilbage om lidt med en medling
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:11 #13
oki
Avatar billede janomel Nybegynder
20. juli 2005 - 14:23 #14
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
Avatar billede janomel Nybegynder
20. juli 2005 - 14:24 #15
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

og syntes ik lige jeg kan få det til at makke ret
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:30 #16
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
Avatar billede janomel Nybegynder
20. juli 2005 - 14:42 #17
Nu er jeg røget ind i at den ikke hiver noget ud af database, altså den blive ved med at være dansk, selv om jeg vælge andet sprog
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:49 #18
prøv at udskrive Session("Sprog") med Response.Write
for at se om den indeholder noget.
Avatar billede janomel Nybegynder
20. juli 2005 - 14:51 #19
ok lige et øjeblik
Avatar billede janomel Nybegynder
20. juli 2005 - 14:55 #20
Der er indhold
Giver ' sprog'
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 14:56 #21
prøv lige at smide kildekoden til index.asp og nytsprog.asp her ind
Avatar billede janomel Nybegynder
20. juli 2005 - 14:57 #22
Har måtte hente backup ind igen, da jeg har fået rodet rundt så meget i det, at intet virkede til sidst.. Startet lige forfra
Avatar billede janomel Nybegynder
20. juli 2005 - 14:58 #23
Inden jeg startede så det sådan ud:<!--#include virtual="/include/header.asp"-->

<div id="title"> <!-- #include virtual="/include/top.asp"--> </div>

<div id="content">

<%
'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") & " "

rs.MoveNext 
Loop
%>

</div>

<div id="leftmenu"> <!-- #include virtual="/include/left.asp"--> </div>

<div id="rightmenu"> <!-- #include virtual="/include/right.asp"--> </div>

<div id="footer" align="center"> <!-- #include virtual="/include/footer.asp"--> </div>
Avatar billede janomel Nybegynder
20. juli 2005 - 14:59 #24
Min Menu fil:

<%
'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
%>
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:01 #25
smid lige top.asp med her ind
Avatar billede janomel Nybegynder
20. juli 2005 - 15:03 #26
<a href="../index.asp">
<img src="../images/Logo/LogoJan.gif" border="0"></a>
|
<a href="./index.asp?language=dk">Dansk</a>|
<a href="./index.asp?language=uk">Engelsk</a>|
<a href="./index.asp?language=de">Tysk</a>|
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:04 #27
top.asp
<a href="../index.asp">
<img src="../images/Logo/LogoJan.gif" border="0"></a>
|
<a href="./nytsprog.asp?language=dk">Dansk</a>|
<a href="./nytsprog.asp?language=uk">Engelsk</a>|
<a href="./nytsprog.asp?language=de">Tysk</a>|
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:05 #28
nytsprog.asp:
if Request.QueryString("language") <> "" then
  Session("Sprog") = Request.QuestString("language")
  Response.Redirect("index.asp")
end if
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:06 #29
<!--#include virtual="/include/header.asp"-->

<div id="title"> <!-- #include virtual="/include/top.asp"--> </div>

<div id="content">

<%
'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") & " "

rs.MoveNext
Loop
%>

</div>

<div id="leftmenu"> <!-- #include virtual="/include/left.asp"--> </div>

<div id="rightmenu"> <!-- #include virtual="/include/right.asp"--> </div>

<div id="footer" align="center"> <!-- #include virtual="/include/footer.asp"--> </div>
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:07 #30
Menu fil:

<%
'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
%>
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:07 #31
Er det bedre ?
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:08 #32
nytsprog.asp placeres samme sted som index.asp
Avatar billede janomel Nybegynder
20. juli 2005 - 15:19 #33
Jeg loader det lige op så du kan se
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:20 #34
ok
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:22 #35
i nytsprog.asp skal
Session("Sprog") = Request.QuestString("language")
rettes til
Session("Sprog") = request.querystring("language")
Avatar billede janomel Nybegynder
20. juli 2005 - 15:24 #36
Men skal nytsprog kode ikke ind i <%  %> tag?
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:24 #37
jo
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:26 #38
<%if Request.QueryString("language") <> "" then
  Session("Sprog") = Request.QueryString("language")
  Response.Redirect("index.asp")
end if %>
Avatar billede janomel Nybegynder
20. juli 2005 - 15:26 #39
DU ER EN HELT TAAAAAAAAAAAAAAAAAAAAAaak
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:28 #40
Hehe glad for at kunne hjælpe.
Smider lige et svar :)
Held og lykke med projektet :)
Avatar billede janomel Nybegynder
20. juli 2005 - 15:30 #41
Takker, og mange tak for hjælpen... Og du kommer med på min Hall Of Fame side. En side med tak til alle der har hjulpet. Pt kun på forsiden ;)
Avatar billede dr_chaos Nybegynder
20. juli 2005 - 15:31 #42
hehe jeg så det godt :)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester