Question

asp 如何实现无刷新获取数据库中的值？

<td><input type=text name="number" id="number" onblur="upperCase()"></td>
<td align=left width=31%>"name"的值</td>
在文本框内输入一个number的值，焦点离开后在下面的单元格中显示name的值，数据库表的字段number和name，谢谢各位高手，比较急！

Answer 1

//执行页面test.asp
<%
response.charset = "GB2312"
%>
<script type="text/javascript">
if(typeof XMLHttpRequest == "undefined" && window.ActiveXObject) {
function XMLHttpRequest() {
var a = ["MSXML2.XMLHTTP.5.0","MSXML2.XMLHTTP.4.0","MSXML2.XMLHTTP.3.0","MSXML2.XMLHTTP","Microsoft.XMLHTTP"];
for(var i=0; i<a.length; i++) {
try{
var oXMLHTTP = new ActiveXObject(a[i]);
return oXMLHTTP;
}catch(oError) {}
}
throw new Error("XMLHTTP");
}
}

function upperCase(ref) {

var oHTTP = XMLHttpRequest();
var path = "test2.asp"; //处理数据的网页
var path += "?num=" + ref.value;
oHTTP.open("get", path, true);
oHTTP.onreadystatechange = function() {
if(oHTTP.readyState == 4 && oHTTP.status == 200) {
document.getElementById("nameID").innerHTML = oHTTP.responseText;
}
};
oHTTP.send(null);

}
</script>

<td><input type=text name="number" id="number" onblur="upperCase(this)"></td>
<td align=left width="31%" id="nameID">"name"的值</td>

//处理页面test2.asp
<!--#include file="coon.asp" -->
<%
response.charset = "GB2312"
dim sName
sName = conn.execute("select name from 表名 where number = " & request("num"))(0)
response.write(sName)

%>