记录我学习ASP For AJAX的旅程,做了一个简单的发布留言的功能,但是体验性不错。
<!--#include file="../ajaxed.asp"-->
<%
'实例化对象p
set p=new ajaxedPage
'打开数据库连接
p.DBConnection=true
'加载整个页面
p.draw()
'初始化页面
sub init():end sub
sub callback(action)
if action = "do" then
p.return(dos(p.RF("tle"),p.RF("uname"),p.RF("mal"),p.RF("ste"),p.RF("cent")))
end if
end sub
function dos(tle,uname,mal,ste,cent)
if Not p.RFHas("tle") then
lib.error("Please check the toic!")
elseif Not p.RFHas("uname") then
lib.error("Please check the name!")
elseif Not str.isValidEmail(mal) or Not p.RFHas("mal") then
lib.error("Please check the email!")
elseif Not str.isValidHomepage(ste) or Not p.RFHas("ste") then
lib.error("Please check the website!")
elseif Not P.RFHas("cent") then
lib.error("Please check the content!")
else
dos = db.getRecordset("Insert Into [messbook](topic,name,mail,site,IP,content)values('"& tle & "','" & uname & "','" & mal & "','" & ste & "','" & request.ServerVariables("REMOTE_ADDR") & "','" & cent & "')")
end if
end function
sub main()%>
<script language="javascript" type="text/javascript">
function done()
{
$("showinfo").innerHTML="inserted Successfully !";
}
</script>
<form id="frm">
<fieldset style="width:390px;">
<legend>Leave a Reply</legend>
<span>Your topic:<input type="text" id="tle" name="tle" /></span><span style="color:#AA1F00;">*(required)</span><br /><br />
<span>Your name:<input type="text" id="uname" name="uname" /></span><span style="color:#AA1F00;">*(required)</span><br /><br />
<span>Your mail:<input type="text" id="mal" name="mal" /></span><span style="color:#AA1F00;">*(required)</span><br /><br />
<span>Your website:<input type="text" id="ste" name="ste" /></span><span style="color:#AA1F00;">*(required)</span><br /><br />
<span>Your content:<br /><textarea cols="36" rows="10" name="cent" id="cent"></textarea></span><span style="color:#AA1F00;">*(required)</span><br /><br />
<div id="showinfo"></div>
<span><button onClick="ajaxed.callback('do',done)" type="button">Submit Comment</button>
</span>
</fieldset>
</form>
<%db.close()
end sub%>
评论