Avatar billede tblaster Nybegynder
25. oktober 2002 - 19:51 Der er 13 kommentarer og
1 løsning

Radio knap med 2 oplysninger?!?!?!

Hejsa

Er det muligt at lagre 2 informationer i en radio knap?

response.write"<input type=""radio"" name=""Bordopstilling"" Value=""" & BordopstillingNavn & """ document.formname.submit();> &nbsp;" & rs("Pris") & ",00kr"


Lige nu har jeg BordopstillingNavn men vil også gerne have at jeg kan kalde prisen ... rs("Pris") ... frem på næste side

Jeg bruger følgende til at kalde navnet frem ... hvis jeg lagre 2 informationer i den hvad skal jeg så bruge?
<%=request.form("Bordopstilling")%>
Avatar billede erikjacobsen Ekspert
25. oktober 2002 - 19:59 #1
Du kan putte flere ting i

  value="Bord nummer 5,200.00 kr"

og så se hvad der står på hver side af kommaet på næste side
Avatar billede tblaster Nybegynder
25. oktober 2002 - 20:03 #2
hvordan ser jeg så det der er på hver side af kommaet på min næste side?

Hvis jeg nu har brugt følgende:

response.write"<input type=""radio"" name=""Bordopstilling","rs(""Pris"")"" Value=""" & BordopstillingNavn & """ document.formname.submit();> &nbsp;" & rs("Pris") & ",00kr"
Avatar billede hells Nybegynder
25. oktober 2002 - 20:05 #3
du kan adskille de to oplysninger i value-attributten med et tegn, og så kan du kende forskel på dem på den næste side.
f. eks.:
Response.Write "<input type=""radio"" name=""Bordopstilling"" value=""" & BordopstillingNavn & "|" & rs("pris") & """/>"

og på næste side:
<%
Bordopstilling = Split(Request.Form,"|")' laver input om til array

Response.Write Bordopstilling(0)' udskriver bordopstillingnavn, som er første del af arrayet

Response.Write Bordopstilling(1)' udskriver rs("Pris")
%>
Avatar billede tblaster Nybegynder
25. oktober 2002 - 20:21 #4
hells ... jeg syntes ikke at kunne skille informationerne på næste side ... De informationer jeg får skal bruges her:

<% If request.form("Bordopstilling") = "" Then
Response.Write "Ingen"
End If
%>
<%=request.form("Bordopstilling")%>
<%=request.form("Pris")%>
Avatar billede hells Nybegynder
25. oktober 2002 - 20:24 #5
du er så vidt jeg ved nødt til at lave dem om til et array som jeg skriver.
Avatar billede tblaster Nybegynder
25. oktober 2002 - 20:28 #6
Hvordan vil du skrive det ... da jeg gjorde det skrev den bare en masse tal og bogstaver ud i min:

Response.Write Bordopstilling(0)
Avatar billede hells Nybegynder
25. oktober 2002 - 20:31 #7
hvis du har copy/pastet min kode, så må jeg undskylde for fejl :). jeg vil tro det her virker:
<%
Bordopstilling = Split(Request.Form("Bordopstilling"),"|")' laver input om til array

Response.Write Bordopstilling(0)' udskriver bordopstillingnavn, som er første del af arrayet

Response.Write Bordopstilling(1)' udskriver rs("Pris")
%>
Avatar billede tblaster Nybegynder
25. oktober 2002 - 20:35 #8
Nu udskriver den Boropstillin(0) fint nok men jeg har problemer med følgende:

If request.form("Bordopstilling") = "" Then
SamletPris = SamletPris + CInt(Bordopstilling(0))
End If
Avatar billede tblaster Nybegynder
25. oktober 2002 - 20:37 #9
Glemte at skrive at det gav følgende:

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'CInt'


og jeg ved at rs("pris") er noget i stil med 100 eller 150 eller 300!!!
Avatar billede hells Nybegynder
25. oktober 2002 - 20:39 #10
hvad er problemet? hvis det er at der ikke lægges noget til samletpris er det nok fordi den kun lægger noget til variablen, hvis der ikke er noget at lægge til.
Avatar billede hells Nybegynder
25. oktober 2002 - 20:40 #11
så prøv:
If request.form("Bordopstilling") = "" Then
SamletPris = CInt(SamletPris) + CInt(Bordopstilling(0))
End If
Avatar billede tblaster Nybegynder
25. oktober 2002 - 22:15 #12
Jeg får det samme så ... jeg ved at SamletPris = SamletPris + CInt(Bordopstilling(0)) virker da jeg bruger det i andre sammenhæng!

Følgende virker fint:

If Request.Form("Kaffe") <> "" Or Request.Form("The") <> "" Then
SamletPris = Session("KaffePris")
End If

If Request.Form("Formidagsbrød") <> "" Then
SamletPris = SamletPris + CInt(Session("FormidagsbrødPris"))
End If

If Request.Form("Eftermidagskage") <> "" Then
SamletPris = SamletPris + CInt(Session("EftermidagskagePris"))
End If

If Request.Form("antal") <> "" Then
SamletPris = SamletPris * CInt(Request.Form("antal"))
End If
Avatar billede tblaster Nybegynder
28. oktober 2002 - 17:50 #13
Jeg fik det til at virke ... smid et svar hells og du skal få point for din hjælp!
Avatar billede hells Nybegynder
28. oktober 2002 - 17:51 #14
ok her er et
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