AJAX veritabanı ile etkileşimli iletişim için kullanılabilir.
AJAX Veritabanı Örneği
Aşağıdaki örnek bir web sayfası AJAX ile bir veritabanından bilgileri alabilmesi nasıl gösterecektir:
Örnek Açıklaması - HTML sayfası
Bir kullanıcı yukarıdaki açılır listede bir müşteri olarak adlandırılan bir işlev seçtiğinde " showCustomer() " yürütülür. Fonksiyon tarafından tetiklenir "onchange" olayı:
<!DOCTYPE html>
<html>
<head>
<script>
function showCustomer(str)
{
if (str=="")
{
document.getElementById("txtHint").innerHTML="";
return;
}
if (window.XMLHttpRequest)
{// code for IE7+, Firefox, Chrome, Opera, Safari
xmlhttp=new XMLHttpRequest();
}
else
{// code for IE6, IE5
xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
}
xmlhttp.onreadystatechange=function()
{
if (xmlhttp.readyState==4 && xmlhttp.status==200)
{
document.getElementById("txtHint").innerHTML=xmlhttp.responseText;
}
}
xmlhttp.open("GET","getcustomer.asp?q="+str,true);
xmlhttp.send();
}
</script>
</head
<body>
<form>
<select name="customers" onchange="showCustomer(this.value)">
<option value="">Select a customer:</option>
<option value="ALFKI">Alfreds Futterkiste</option>
<option value="NORTS ">North/South</option>
<option value="WOLZA">Wolski Zajazd</option>
</select>
</form>
<br>
<div id="txtHint">Customer info will be listed here...</div>
</body>
</html>Kaynak kod açıklama:
Hiçbir müşteri seçilirse (str.length==0) , fonksiyon txtHint yer tutucu içeriğini siler ve işlevini çıkar.
Bir müşteri seçilirse, showCustomer() fonksiyonu aşağıdaki yürütür:
- XMLHttpRequest nesnesi oluştur
- sunucu yanıtı hazır olduğunda yürütülecek işlevi oluşturma
- sunucuda bir dosyaya istek dışı gönder
- Bir parametre dikkat edin (q) (açılan listesinin içeriği) URL ilave edilir
ASP Dosyası
JavaScript tarafından çağrılan sunucu üzerinde sayfa adında bir ASP dosyasıdır "getcustomer.asp" .
Kaynak kodu "getcustomer.asp" bir veritabanı sorgusu çalıştırır ve bir HTML tablosu olarak döner:
<%
response.expires=-1
sql="SELECT * FROM CUSTOMERS WHERE CUSTOMERID="
sql=sql & "'" & request.querystring("q") & "'"
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("/ datafolder /northwind.mdb"))
set rs=Server.CreateObject("ADODB.recordset")
rs.Open sql,conn
response.write("<table>")
do until rs.EOF
for each x in rs.Fields
response.write("<tr><td><b>" & x.name & "</b></td>")
response.write("<td>" & x.value & "</td></tr>")
next
rs.MoveNext
loop
response.write("</table>")
%>