værdi fra radioknap til tekst
Jeg har et indtastningsfelt, hvor brugeren indtaster en destination (i index.asp).Ud fra værdi i feltet vises der nogle forslag til:
Destination - Adresse - Postnr og By.
Hvordan får jeg overført værdien der vises (både navn,adresse, postnr og by) til tekstfelterne på samme side (altså på index.asp).
Siden hvor brugeren indtaster destination og får vist forslagene er her(index.asp):
----
<html>
<head>
<script src="clienthint.js"></script>
</head>
<body>
<table style="width: 54%">
<tr>
<td valign="top" style="width: 408px"><form id="form1" runat="server" style="width: 389px">
<table style="width: 40%">
<tr>
<td style="width: 119px">Destination: </td>
<td style="width: 387px">
<input type="text" id="txt1"
onkeyup="showHint(this.value)" name="txt_destination" style="width: 277px"></td>
</tr>
<tr>
<td style="width: 119px">Adresse</td>
<td style="width: 387px">
<input type="text" id="txt2" name="txt_adresse"></td>
</tr>
<tr>
<td style="width: 119px">Post nr</td>
<td style="width: 387px">
<input type="text" id="txt2" name="txt_postnr"></td>
</tr>
<tr>
<td style="width: 119px">By</td>
<td style="width: 387px"> <input type="text" id="txt2" name="txt_by"></td>
</tr>
</table>
</form>
</td>
<td valign="top">Forslag:<br><span id="txtHint"></span><br>
</td>
</tr>
</table>
</body>
</html>
----
Koden er viser forslagene (gethints.asp) kommer her:
-----
<%
q=request.querystring("q")
dim con,rs
set con=Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db.mdb")&";"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open "SELECT tjenesterejser.destination_adresse, tjenesterejser.destination_navn, tjenesterejser.destination_husnr, tjenesterejser.destination_postnr, tjenesterejser.destination_by, tjenesterejser.rejseanulleret, tjenesterejser.id FROM tjenesterejser GROUP BY tjenesterejser.destination_adresse, tjenesterejser.destination_navn, tjenesterejser.destination_husnr, tjenesterejser.destination_postnr, tjenesterejser.destination_by, tjenesterejser.rejseanulleret, tjenesterejser.id HAVING tjenesterejser.destination_navn Like '"&q&"%' AND tjenesterejser.destination_postnr<>'' AND tjenesterejser.rejseanulleret=False",con,1,2%>
<table border="1" cellpadding="0" style="border-collapse: collapse">
<%
do until rs.eof
%>
<tr>
<td><input type="radio" value="<%=rs("id")%>" name="R1"></td>
<td><%=Server.HTMLEncode(rs("destination_navn"))%></td>
</tr>
<tr>
<td> </td>
<td><%=Server.HTMLEncode(rs("destination_adresse"))%> <%=Server.HTMLEncode(rs("destination_husnr"))%></td>
</tr>
<tr>
<td> </td>
<td><%=Server.HTMLEncode(rs("destination_postnr"))%> <%=Server.HTMLEncode(rs("destination_by"))%></td>
</tr>
<%
rs.movenext
loop
set rs=nothing
set con=nothing
%></table>
-----
Og *.js filen kommer her (clienthint.js)
-----
var xmlHttp
function showHint(str)
{
if (str.length==0)
{
document.getElementById("txtHint").innerHTML="";
return;
}
xmlHttp=GetXmlHttpObject()
if (xmlHttp==null)
{
alert ("Your browser does not support AJAX!");
return;
}
var url="forslag.asp";
url=url+"?q="+str;
url=url+"&sid="+Math.random();
xmlHttp.onreadystatechange=stateChanged;
xmlHttp.open("GET",url,true);
xmlHttp.send(null);
}
function stateChanged()
{
if (xmlHttp.readyState==4)
{
document.getElementById("txtHint").innerHTML=xmlHttp.responseText;
}
}
function GetXmlHttpObject()
{
var xmlHttp=null;
try
{
// Firefox, Opera 8.0+, Safari
xmlHttp=new XMLHttpRequest();
}
catch (e)
{
// Internet Explorer
try
{
xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
}
catch (e)
{
xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
}
}
return xmlHttp;
}
-----
