75 svar · 500 visningar · startad av hacktheplanet
jag håller på med ett community vill att när användaren i kompislistan klickar på snabb mess ikonen ska användaren i markeras i kompislistan i mess sidan där användaren markeras i selectboxen annars funkar det finnt men vill att användaren markeras.
så här ser länken ut:
Jag har försökt och försökt det går inte bra :-(
Selectbox
<select name="to" style="border: 1px solid #000000; background-color: #C0C0C0; background-image: url('Bilder/Bakgrund_rutig.gif'); font-size:10px; font-family:Arial">
<option selected>Välj en kompis</option>
<%Do Until RecSet.EOF%>
<option value="<%=RecSet("ID2")%>"><%=RecSet("namn")%></option>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
<%end if%>
skriv_meddelande.asp?toID=<%=RecSet("ID2")%>&direct=yes&kompis=<%=RecSet("namn")%>
[Redigerat av hacktheplanet den 26 dec 2001]
Du får helt enkelt göra en kontroll på varje värde som skrivs ut:
Response.Write "<OPTION VALUE=""" & username & """" & isSelected("Greger", username) & ">"
Funktionen:
Function isSelected(Value, compareVal)
If Value = compareVal Then
isSelected = " SELECTED"
End If
End Function
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
det e för avancerad för mig går det inte fixa på lättare sett????
Lyckas du skapa ett community så är det här absolut inte för avancerat för dig! Testa och fråga när du får problem!
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
okej men jag håller med en som e skit enkelt okej ska försöka
kan man inte fixa med querystrings??
Hur menar du då?
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
Request.QueryString
Jaha, och vad vill du göra med den?
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
Ja, det är ju hela idéen med funktionen ovan. Om du vill kan du skapa ett nytt option element med samma innehåll, fast den läggs först i listan. Då är det ju bara att lägga till följande innan hela listan skrivs ut:
username = Request.QueryString("kompis")
Response.Write "<OPTION VALUE=""" & username & """" & username & ">"
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
nu får jag bara ut texten
Skrev fel. Så här ska det vara.
Response.Write "<OPTION VALUE=""" & username & """>" & username
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
funkar inte:
Response.Write "<OPTION VALUE=""" & username & """>" & username ">"
Ta bort ">" på slutet.
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
nu får jag Kompileringsfel i Microsoft VBScript (0x800A0400)
Programsats förväntas.
/skriv_meddelande.asp, line 175
Hur ser koden ut då?
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
<%username = Request.QueryString("kompis")
<%Response.Write "<OPTION VALUE=""" & username & """>" & username%>
Det ska väl vara:
Response.Write "<OPTION VALUE=""" & username & """>" & username & ">"
:q
------------------
Vad har det med min tama orangutang att göra?
username = Request.QueryString("kompis")
Response.Write "<OPTION VALUE=""" & username & """>" & username
%>
casca: Nej, då blir det ju <OPTION VALUE="greger">greger>
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."