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>
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<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.