Avatar billede sjc Nybegynder
25. marts 2002 - 18:06 Der er 7 kommentarer og
1 løsning

Overføring af 2 variabler mellem 2 Web sider via en Hyberlink

Jeg har Frontpage 2002.
Jeg har en web side hvorfra jeg skal sende 2
variabler til en ny webside via en hyberlink.

Web side 2 hedder:  Komponent_Un_Grp.asp
De 2 variabler hedder:
Under_Grp_Fra
henholsvis
Under_Grp_Til

Jeg kan overføre en variabel således på Adresselisten:

Komponent_Un_Grp.asp?Under_Grp_Fra=<%=FP_FieldLink(fp_rs,"Under_Grp_Fra")%>

HVORDAN SKAL DEN SE UD MED BEGGE VARIABLER !!
Avatar billede whatever Nybegynder
25. marts 2002 - 18:09 #1
Komponent_Un_Grp.asp?Under_Grp_Fra=<%=FP_FieldLink(fp_rs,"Under_Grp_Fra")%>&Under_Grp_Til=<%=FP_FieldLink(fp_rs,"Under_Grp_Til")%>
Avatar billede sjc Nybegynder
25. marts 2002 - 20:15 #2
Tak for hjælpen - det virkede.
Kan du ikke fortælle mig hvor jeg kan se det
hedder &Under for en anden gangs skyld.
Jeg har ledt på Google.
Avatar billede sjc Nybegynder
25. marts 2002 - 20:16 #3
Tak
Avatar billede sjc Nybegynder
25. marts 2002 - 20:17 #4
Jeg kan ikke finde ud af hvordan du får dine point.
Vil du skrive det til mig
Avatar billede whatever Nybegynder
25. marts 2002 - 21:20 #5
Jeg laver et svar, hvorfor du kan tildele mig pointene.
Avatar billede sjc Nybegynder
25. marts 2002 - 21:21 #6
Jeg har et lignende spørgsmål:
Dette er et Log-In
Jeg skal i disse koder have índflættet at variablen:
Brugernavn  bliver overført til Kunder.asp

Nb fortæl mig hvorfan jeg giver point

<%
SET RS = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("fpdb/SJC-web.mdb")

If Request("mode") = "Check" then

Function unQuote(strTekst)
  strTekst = Trim(strTekst)
  unQuote = Replace(strTekst,"%","53")
End Function

    ' Gemmer formfelterne i Variabler
        strBrugernavn = unQuote(request("Brugernavn"))
        strAdgangskode = unQuote(request("Adgangskode"))

  Sql = "Select Count(*) as Found from Adgangskode_Kunder where (Brugernavn = '" & strBrugernavn  & "') and (Adgangskode ='" & strAdgangskode  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = ""
    error = "Du blev ikke godkendt af systemet"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("fpdb/SJC-web.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM Adgangskode_Kunder where (Brugernavn = '" & Request("Brugernavn") & "') and (Adgangskode ='" & Request("Adgangskode") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "yes mate"
    Response.Redirect "Kunder.asp"
    EZ.Close
    RS.Close
    Conn.Close
  end if
end if

%>
Avatar billede whatever Nybegynder
25. marts 2002 - 21:24 #7
Du skal ikke skrive &Under, men istedet & mellem dine variabler. F.eks:

http://www.sitet.dk?fornavn=peter&efternavn=hansen

eller f.eks.:

http://www.sitet.dk?fornavn=hans&efternavn=jensen
Avatar billede whatever Nybegynder
25. marts 2002 - 21:26 #8
Så ændrer du:

Response.Redirect "Kunder.asp"

til:

Response.Redirect "Kunder.asp?brugernavn="& strBrugernavn  &""
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