index.asp

javasrcipt编写的Ajax的类库

<!--#include file="../ajaxed.asp"-->
<%
set page = new AjaxedPage
page.draw()

sub init() : end sub

sub callback(action)
	if action = "add" then
		page.return(add(page.RF("a"), page.RF("b")))
	end if
end sub

function add(a, b)
	if not isnumeric(a) then a = 0
	if not isnumeric(b) then b = 0
	add = cint(a) + cint(b)
end function

sub main() %>

	<script>
		function added(sum) {
			$('c').value = sum;
		}
	</script>

	<form id="frm">
		<input type="Text" name="a" id="a">+
		<input type="Text" name="b" id="b">=
		<input type="Text" name="c" id="c">
		<button onclick="ajaxed.callback('add', added, null, null, 'index.asp')" type="button">calculate</button>
	</form>
	
<% end sub %>