html和java简单示例.docVIP

编写代码:1.登陆页login.asp,要求验证用户名和密码,如果正确则引导到sdoffice.asp页面,如果不正确则引导到显示错信息页errorinfo.htm 2.假设有数据库guest.mdb,数据表为guest,表中有字段name,设计一个简单的程序,采用参数查询方法查询name3.假设有数据库guest.mdb,数据表为guest,表中有字段name和sex.设计通过表单向数据库里添加记录和设计删除记录答案：问题1（方法一）%if Request.Form(name) and Request.Form(passwd) thenif Request.Form(name)=admin and Request.Form(passwd)=admin thenResponse.Redirect(sdoffice.asp)elseResponse.Redirect(errorinfo.htm)end ifend if%问题1（方法二）用户：密码：问题2（查询）：%if request.form(username) thendim usernameusername=request.form(username)Dim ConnSet Conn = Server.CreateObject(ADODB.Connection)Conn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= &Server.MapPath(guest.mdb)Dim Rs,SqlSet Rs = Server.CreateObject(ADODB.Recordset)Sql=Select * From guest Where name=&username&Rs.Open Sql,Conn,1,1If Rs.EOF Thenresponse.write username&不存在！elseresponse.write Rs(name)&存在！end ifrs.closeset rs=nothingconn.closeset conn=nothingresponse.endend if%输入用户名：问题3（插入数据）：%if request.form(username) and request.form(sex) thenDim ConnSet Conn = Server.CreateObject(ADODB.Connection)Conn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= &Server.MapPath(guest.mdb)Dim Rs,SqlSet Rs = Server.CreateObject(ADODB.Recordset)Sql=Select * From guestRs.Open Sql,Conn,1,3rs(name)=request.form(username)rs(sex)=request.form(sex)rs.updaters.closeset rs=nothingconn.closeset conn=nothingresponse.write 插入成功！response.endend if%用户名：性别：删除记录的可以这样：%if request.form(username) thenDim ConnSet Conn = Server.CreateObject(ADODB.Connection)Conn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= &Server.MapPath(guest.mdb)conn.execute(delete from guest where name=&request.form(username)&)conn.closeset conn=nothingresponse.write 删除成功！response.endend if%输入要删除的用户名：/form文章引用自： JavaScript应用1：显示登录时间 2007-05-16 23:43:30 大 中 小 时间日期篇-显示登陆时间 时间日期篇-显示登陆时间 您已登录本站 var sec=0;var min=0;var hou=0;flag=0;idt=window.setTimeout(UpDate();,1000);function UpDate()sec+;if(sec=60)sec=0;min+=1;if(min=60)min=0;hou+=1;if(min0)&(flag=0)window.alert(您已经逗留了1分钟!可别忙着走呀，还有很多好东东等着您呢!);flag=1;document.forms.input1.value=hou+时+min+分+sec+秒;idt=window.setTimeout(UpDate();,1000);JavaScript应用2：输入密码后打开页面！2007-05-16 23:44:37 大 中 小 密码篇-输入密码后才能访问页面 密码篇-输入密码后才能访问页面 function CheckPassword()if(document.form1.username.value=|document.form1.passwrd.value=)window.alert(请您输入用户名和密码！);document.form1.username.focus();else if(document.form1.username.value=AiLi&document.form1.passwrd.value=helemian) window.alert(输入正确，欢迎 +document.form1.username.value+ 的光临！) location.href=; else window.alert(对不起，用户名或密码错误，请重试！) 请您输入 用户名: 密码: JavaScript应用3：逐词打出效果！ 2007-05-16 23:45:56 大 中 小 状态栏特效篇-逐词打出效果状态栏特效篇-逐词打出效果var skipRunning = falsevar currentMessage = 0var index = 0message = 状态栏特效篇-逐词打出效果function startskip() stopskip() showskip()function stopskip() if (skipRunning) clearTimeout() skipRunning = falsefunction showskip() var text = message if (index text.length) if (text.charAt(index) = ) index+ var partialMessage = text.substring(0, index + 1) window.status = partialMessage index+ setTimeout(showskip(), 150) skipRunning = true else index = 0 currentMessage+ if (currentMessage = message.length) currentMessage = 0 setTimeout(showskip(), 1000) skipRunning = true 文章引用自： JavaScript应用4：文本以打字机的形式输出 大 中 小 文本特效篇-打字机式文本输出文本特效篇-打字机式文本输出function PrinterText() TextTyper(DisplayTextString0, 0, PText1, PText2, #365933, #9daF33, 50, 0); function TextTyper(TString, idx, idTObject, spTObject, clr1, clr2, delay, plysnd) var tmp0 = tmp1 = , skip = 0; if (document.all & idx = TString.length) if (TString.charAt(idx) = ) idx+; idx+; if (TString.charAt(idx) = & & TString.charAt(idx+1) != ) while (TString.charAt(idx) != ;) idx+; idx+; tmp0 = TString.slice(0,idx); tmp1 = TString.charAt(idx+); WriteText(idTObject, +tmp0+tmp1+); setTimeout(TextTyper(+TString+, +idx+, +idTObject+, +spTObject+, +clr1+, +clr2+, +delay+ ,+plysnd+),delay); function WriteText(TObject, TString) if (documentTObject) document.open(); document.wr