Avatar billede mho30 Nybegynder
10. april 2006 - 00:35 Der er 2 kommentarer

Opdatering af felter udfra et valg i en selectboks

Prøver lige igen med lidt flere point...

Jeg har en asp fil med en selectboks som skal vise alle i databasen indskrevne elementer, når brugeren derefter vælger et af elementerne, skal tilhørende formfelter opdateres med indholdet fra den pågældende entry i databasen, men det driller mig rigtig meget.

Jeg er lidt forvirret over koden, men filen ser således ud, måske er der nogen der kan hjælpe.


<!--#include file ="../opendb.asp"-->
<%
kommuneId = request.queryString("kommuneId")

sql= "select * from Tstemme order by stemmeId;"
set rs = conn.execute(sql)
arrStemme = rs.GetRows

sql= "select * from Tkommune order by kommune;"
set rs = conn.execute(sql)
arrKommune = rs.GetRows

%>

<html>
<head>
</head>

<body>
<FORM method="POST" name="visningsForm">
<table border="0" width="78%">
    <tr>
        <td>Vælg en by</td>
        <td>
            <select name="kommune" size=1 onchange="window.location='visStemme.asp?kommuneId">
                <%for i = 0 to Ubound(arrKommune,2) %>
                    <option value="<%=arrKommune(0,i)%>" <%if trim(arrKommune(0,i)) = trim(kommuneId) then%>selected<%end if%>>
                        <%=arrKommune(1,i)%>
                    </option>
                    <%next%>
            </select>
        </td>
    </tr>
    <tr>
        <td>Navn</td>
        <td><%=arrStemme(1,index)%></td>
    </tr>
    <tr>
        <td>Kommentar</td>
        <td><%=arrStemme(4,index)%></td>
    </tr>
</table>
<a href="http://asp.vaka.dk/skodby/index.htm">Til forsiden</a>
</body>
</html>
Avatar billede weis Nybegynder
11. april 2006 - 21:01 #1
hmm... jeg har et andet forslag, ved ikke om det kan bruges men her er det:

<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")

if request.QueryString("id") <> "" then

    id = request.QueryString("id")

        strSQL2 = "select * from tabel where id = " & id
            Set rs2 = Conn.execute(strSQL2)
       
            navn = rs2("felt2")
            kommentar = rs2("felt3")
       
        rs2.close
        Set rs2 = Nothing
end if
%>
<html>
<head>
<title>Side</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function menu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>

<body>
<table border="0" width="78%">
    <tr>
        <td>Vælg en by</td>
        <td>
          <%    strSQL = "select * tabel db"
            Set rs = Conn.execute(strSQL)
       
            if rs.EOF then
                response.write "Der er intet i databasen"
            else %>
            <form name="form1" method="post" action="">
              <select name="menu1" onChange="menu('self',this,0)">
                <% do until rs.EOF %>
                <option value="knapper.asp?id=<% =rs("id") %>" <% if CInt(request.QueryString("id")) = rs("id") then response.write "selected" end if %>><% =rs("felt1") %></option>
                <%    rs.MoveNext
                    Loop %>
              </select>
            </form>
            <%    end if
                rs.Close
                Set rs = Nothing %>
        </td>
    </tr>
    <tr>
        <td>Navn</td>
        <td><%=navn%></td>
    </tr>
    <tr>
        <td>Kommentar</td>
        <td><%=kommentar%></td>
    </tr>
</table>
<a href="http://asp.vaka.dk/skodby/index.htm">Til forsiden</a>
</body>
</html>
<% Conn.Close
    Set Conn = Nothing %>
Avatar billede mho30 Nybegynder
01. maj 2006 - 11:43 #2
Jeg fik løst problemet tak for hjælpen.
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