Web Development

<br />
On the client side:<br />
function GetAssyRecs(TheOperator)<br />
{<br />
var szRequest = "";<br />
szRequest += "<TheOperator>" + TheOperator + "</TheOperator>";<br />
szRequest += "";<br />
<br />
var objHTTP = new ActiveXObject("Microsoft.XMLHTTP");<br />
var szURL = "GetAssyRecs.asp";<br />
var szHttpMethod = "POST";<br />
objHTTP.Open(szHttpMethod, szURL, false);<br />
objHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded");<br />
objHTTP.Send(szRequest);<br />
<br />
var szReply = objHTTP.ResponseText;<br />
alert("status: " + objHTTP.status + " Reply: " + szReply);<br />
}<br />
<br />
On the server side (GetAssyRecs.asp):<br />
<%@ Language=JScript %><br />
<% Response.Expires=0; %><br />
<br />
<%<br />
var adOpenKeyset = 1;<br />
var adPersistXML = 1;<br />
<br />
var objXmlDOM = Server.CreateObject("Microsoft.XMLDOM");<br />
var szXmlRequest = Request.Form;<br />
if (!objXmlDOM.loadXML(szXmlRequest))<br />
{<br />
var sErrMsg = "Invalid XML Request String: " + szXmlRequest;<br />
Response.Write(sErrMsg);<br />
return;<br />
}<br />
<br />
var TheUser = objXmlDOM.selectSingleNode("//TheOperator");<br />
if ((TheUser == null) || (TheUser.text == ""))<br />
{<br />
var sErrMsg = "No TheOperator specified: " + szXmlRequest;<br />
Response.Write(sErrMsg);<br />
return;<br />
}<br />
<br />
var sql="Select idnum, serial_number, rework_done, thedatetime from IDC_OperatorCounts where operator = '" + TheUser.text + "' and thedatetime > dateadd(hh, -13, getdate()) order by thedatetime asc;";<br />
<br />
var conn=Server.CreateObject("adodb.connection");<br />
conn.ConnectionString="driver={SQL Server};server=xidc-mrtline;database=IDC_Xerox;Trusted_Connection=yes";<br />
conn.Open;<br />
var rs=Server.CreateObject("adodb.recordset");<br />
rs.Open (sql,conn,adOpenKeyset);<br />
rs.Save (Response, adPersistXML);<br />
<br />
rs.close;<br />
rs=null;<br />
<br />
conn.Close;<br />
conn=null;<br />
<br />
objXmlDOM = null;<br />
}<br />
%><br />