Dropdownbox menu!
jeg har fikset et script sammen.. dette er en dropdown box der henter indholdet fra en Access databse.. dropdown boxen har så den anden effekt at den skal bruges som menu.. og man så klikker på noget i dropdownen kommer den til den side den skal.men det virker kun en gang i mellem..
den kommer med en fejl som følge:
Provider error '80004005'
Unspecified error
/test.asp, line 6
der er jo nok en fejl i scriptet men kan ik selv lige tænke mig til det..
<%
Response.Buffer = True
%>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open ("Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/database.mdb"))
SQL ="SELECT url, text FROM Menu ORDER BY text"
Set rs = Connect.Execute(SQL)
%>
<csscriptdict import>
<script type="text/javascript" src="CSS/CSScriptLib.js"></script>
</csscriptdict>
<form method="POST" name="dropdown">
<select name="dropdown" onchange="CSURLPopupShow(/*CMP*/'dropdown', /*CMP*/'dropdown', 'hoved');
">
<option value="#" selected>Quick Menu</option>
<%Do While Not rs.eof %>
<option value="<%=rs("url")%>"><%=rs("text")%>
</option>
<%
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
%>
<%
conn.close
set conn = nothing
%>
