当前位置: 首页 > 图文教程 > 网络编程 > Javascript > AJAX教程(9):AJAX 请求 源代码

Javascript
JavaScript 图片放大镜(可拖放、缩放效果)
javascript textarea支持图形编辑
各种效果的jquery ui(接口)介绍
js点小图显示大图的切换功能代码
js怎样实现下拉框改变,它旁边的图像也改变
js模拟电脑选择多文件夹效果_选区代码
js实现小鱼吐泡泡在页面游动特效
Javascript拖拽系列文章2之offsetLeft、offsetTop、offsetWidth、offsetHeight属性
js抓人游戏
JavaScript的学习入门整理篇
Js动态创建div
Javascript拖拽&拖放系列文章3之细说事件对象
javascript不同页面传值的改进版
select组合框option的捕捉实例代码
初学JavaScript第一章
初学JavaScript_03(ExtJs Grid的简单使用)
jquery的颜色选择插件实例代码
鼠标跟随效果代码
JS版网站风格切换实例代码
javascript支持IE和firefox(FF)的渐变透明效果

Javascript 中的 AJAX教程(9):AJAX 请求 源代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-28   浏览: 339 ::
收藏到网摘: n/a

AJAX Suggest 源代码的实例

下面的源代码属于上一节的 AJAX 实例。

您可以拷贝粘贴这些代码,然后亲自测试一下。

AJAX HTML 页面

这是 HTML 页面。它包含了一个简单的 HTML 表单,以及一个指向 JavaScript 的链接。

<html>
<head>
<script src="clienthint.js"></script>
</head>
<body>
<form>
First Name:<input type="text" id="txt1" onkeyup="showHint(this.value)" />
</form>
<p>Suggestions: <span id="txtHint"></span></p>
</body>
</html>

下面列出了 JavaScript 代码。

AJAX JavaScript

这是 JavaScript 代码,存储在文件 "clienthint.js" 中:

var xmlHttp
function showHint(str)
{ if (str.length==0) { document.getElementById("txtHint").innerHTML=""; return; } xmlHttp=GetXmlHttpObject() if (xmlHttp==null) { alert ("您的浏览器不支持AJAX!"); return; } var url="gethint.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;
}

AJAX 服务器页面 - ASP 和 PHP

其实不存在什么“AJAX 服务器”。AJAX 页面可以由任一因特网服务器提供服务。

在上一节的例子中被 JavaScript 调用的服务器页面是一个简单的名为 "gethint.asp" 的 ASP 文件。

下面我们列出了这个服务器页面代码的实例,使用 ASP 来编写。

AJAX ASP 实例

"gethint.asp" 页面中的代码针对 IIS 使用 VBScript 编写。它会检查一个名字数组,然后向客户端返回相应的名字:

<%
response.expires=-1
dim a(30)
'用名字为数组赋值
a(1)="Anna"
a(2)="Brittany"
a(3)="Cinderella"
a(4)="Diana"
a(5)="Eva"
a(6)="Fiona"
a(7)="Gunda"
a(8)="Hege"
a(9)="Inga"
a(10)="Johanna"
a(11)="Kitty"
a(12)="Linda"
a(13)="Nina"
a(14)="Ophelia"
a(15)="Petunia"
a(16)="Amanda"
a(17)="Raquel"
a(18)="Cindy"
a(19)="Doris"
a(20)="Eve"
a(21)="Evita"
a(22)="Sunniva"
a(23)="Tove"
a(24)="Unni"
a(25)="Violet"
a(26)="Liza"
a(27)="Elizabeth"
a(28)="Ellen"
a(29)="Wenche"
a(30)="Vicky"
'从URL取得参数q
q=ucase(request.querystring("q"))
'如果q的长度大于0,则查找所有的hint
if len(q)>0 then hint="" for i=1 to 30 if q=ucase(mid(a(i),1,len(q))) then if hint="" then hint=a(i) else hint=hint & " , " & a(i) end if end if next
end if
'如果找不到hint,则输出"no suggestion"
'或者输出正确的值
if hint="" then response.write("no suggestion")
else response.write(hint)
end if
%>