Bonjour à tous,
je suis un débutant en ajax et j'essaye d'envoyer une variable avec httpRequest.send mais je ne reçoit rien dans mon fichier asp ...
voici mon code :
-------------- Le fichier d'appel -----------------
<html>
<head>
<title>AJAX</title>

<script type="text/javascript">
function writediv(texte)
{
document.getElementById('contenu').innerHTML = texte;
}

function verif()
{
var search = document.formu.search.value;
texte = file('/test.asp',search);
writediv(texte);
}


function file(fichier,valeur)
{
var httpRequest = false;

if (window.XMLHttpRequest) { // Mozilla, Safari,...
httpRequest = new XMLHttpRequest();
if (httpRequest.overrideMimeType) {
httpRequest.overrideMimeType('text/xml');
// Voir la note ci-dessous à propos de cette ligne
}
} else if (window.ActiveXObject) { // IE
try {
httpRequest = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
try {
httpRequest = new ActiveXObject("Microsoft.XMLHTTP");
} catch (e) {}
}
}

if (!httpRequest) {
alert('Abandon Impossible de créer une instance XMLHTTP');
return false;
}
httpRequest.open("POST", fichier, false);
httpRequest.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
httpRequest.send("&search="+escape(valeur));
if(httpRequest.readyState == 4) return(httpRequest.responseText);
else return(false);
}
</script>
</head>
<body>

<form name="formu" action="">
<input type="text" name="search" />
<input type="button" name="b1" value="ok" onClick="verif()" />
<div id="contenu" style="background-color: #00FF00"></div>
</form>

</body>
</html>

------------- Le fichier asp ---------------------------

<!--#include file="includes/odbc.inc"-->
<!--#include file="includes/fonction.inc"-->
<%
set Conn = server.createobject("ADODB.Connection")
Conn.open ODBC_SITE
set Rs = server.createobject("ADODB.Recordset")
Dim search
search = Request("search")
response.write "--" & search & "--</ br>"

if search = "" then
search = "rien"
end if
response.write "((" & search & "))</ br>"
sql = "select * from appareil where Champ2 =" & setdatatype(search,advarchar)
Rs.open sql, Conn, 3
while not Rs.eof
response.write Rs("Champ1") & "-" & Rs("Champ3") & "</ br>"
Rs.movenext
wend

Rs.close
Conn.close
set Rs = nothing
set Conn = nothing
%>