04. januar 2011 - 16:29Der er
6 kommentarer og 1 løsning
problem med ASP (Mysql,Html,ASP)
Hej
jeg har nedenstående kode.
tabellen "sider" indeholder siden med et felt der hedder "menu_punkt" som referer til ID i tabellen "menu"
meningen er jo så at når man looper tabllen "menu" ud og den kommer til ID = menu_punkt så skal den markere det felt i selected boksen.
<BODY><h3>Ret Side</h3><p> Her kan du rette din Side.<p> <form method="POST" action="?s1=16&s2=side&action=ret_side&do=update&id=<%=rs("id")%>"> <table border="0" cellpadding="5" cellspacing="5" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1"> <% strSQL = "SELECT * FROM sider where id = " & request("id") set rs = conn.execute(strSQL)
strSQL2 = "Select * from menu order by placering ASC" Set rss = Conn.Execute(strSQL2)
Set objFS = CreateObject("Scripting.FileSystemObject") Set objFolder = objFS.GetFolder(Server.MapPath(ImageDir)) Set objFiles = objFolder.Files %> <tr>
Godt nytår hilsen andreas
<td width="17%">Menu punkt:</td> <td width="83%"><select name="menu_punkt" size="0"> <% menupunkt = rs("menu_punkt") if menupunkt = "top" then response.write "<option value='top' selected>Du kan ikke ændre dette menupunkt!!</option>" else do id = rss("id") link = rss("link") if menupunkt <> id then response.write "<option value='" & id & "'>" & link & "</option>" else response.write "<option value='" & id & "' selected>" & link & "</option>" end if rss.movenext loop while not rss.eof end if %> </select></td> </tr>
<BODY><h3>Ret Side</h3><p> Her kan du rette din Side.<p> <form method="POST" action="?s1=16&s2=side&action=ret_side&do=update&id=<%=rs("id")%>"> <table border="0" cellpadding="5" cellspacing="5" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1"> <% strSQL = "SELECT * FROM sider where id = " & request("id") set rs = conn.execute(strSQL)
strSQL2 = "Select * from menu order by placering ASC" Set rss = Conn.Execute(strSQL2)
Set objFS = CreateObject("Scripting.FileSystemObject") Set objFolder = objFS.GetFolder(Server.MapPath(ImageDir)) Set objFiles = objFolder.Files %> <tr>
<td width="17%">Menu punkt:</td> <td width="83%"><select name="menu_punkt" size="0"> <% menupunkt = rs("menu_punkt") if menupunkt = "top" then response.write "<option value='top' selected>Du kan ikke ændre dette menupunkt!!</option>" else do id = rss("id") link = rss("link") if menupunkt <> id then response.write "<option value='" & id & "'>" & link & "</option>" else response.write "<option value='" & id & "' selected>" & link & "</option>" end if rss.movenext loop while not rss.eof end if %> </select></td> </tr>
det første jeg ville gøre var at udskrive dine variabler så du kan se hvad der reelt bliver sammenlignet - dvs fx
response.write menupunkt & " - " & id
hvis de ser ud som forventet og det også ser ud som om der er noget der burde matche skyldes det sikkert at du sammentligner to forskellige datatyper - fx tal med tekst - så hvis du caster dem til samme type foregår der en reel sammenligning - fx
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.