ASP入门基础教程-实例 工资管理系统
2006-10-27 12:01:53 来源:WEB开发网 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁惧墽鎳撻—鍐偓锝庝簻椤掋垺銇勯幇顖毿撻柟渚垮妼椤粓宕卞Δ鈧獮濠勭磽閸屾艾鈧懓顫濋妸鈺佺疅缂佸顑欓崥瀣煕椤愵偅绶氱紓鍐╂礋濮婂宕掑▎鎴М濠电姭鍋撻梺顒€绉甸幆鐐哄箹濞n剙濡肩紒鎰殜閺屸€愁吋鎼粹€茬敖婵炴垶鎸哥粔鐢稿Φ閸曨垰鍐€妞ゆ劦婢€濞岊亪姊虹紒妯诲蔼闁稿海鏁诲濠氭晲婢跺﹤宓嗛梺缁樺姈缁佹挳宕戦幘璇叉嵍妞ゆ挻绋戞禍鐐叏濡厧浜鹃悗姘炬嫹

核心提示: 1、采用 server 对象的 createobject 方法创建一个连接对象和一个记录集对象;2、采用连接(Connection) 对象的 Open (打开)和 Close (关闭)两个方法打开和关闭一个数据库;3、采用记录集(Recordset) 对象中的 Open 和 Close 两
1、采用 server 对象的 createobject 方法创建一个连接对象和一个记录集对象;
2、采用连接(Connection) 对象的 Open (打开)和 Close (关闭)两个方法打开和关闭一个数据库;
3、采用记录集(Recordset) 对象中的 Open 和 Close 两个方法打开和关闭记录集;
4、通过 Recordset 对象的 AbsolutePosition 属性来确定记录集中当前记录的顺序位置是第几行记录;
5、通过 Request 对象从菜单页面由导航条提交的查询字符串中获取当前记录的书签;
6、通过 Session 对象保存会话期中当前记录号。
修改记录
一、修改记录页面的功能:修改记录。
二、修改记录页面的实现过程:
1、连接数据库并打开“老师工资”表;
2、用修改的记录更改数据库中原有的记录;
3、将更改后的记录从数据库中取出反馈给浏览器;
4、自动计算实发工资。即当名为 txt 的各文本框中某一个文本框的值被改变时,实发工资文本框中的值将随之改变。
5、关闭记录集和数据库。
三、修改记录页面的代码如下:
<html>
<head><title>教师工资表</title></head>
<body bgcolor="#cccc99">
<!-- 创建一个表单 -->
<form align=center method='post' name=frm1 action='list2.asp'>
<table border=1 align=center cellspacing=0 cellpadding=2 height=200 bgcolor="#909011">
<tr><td width=100><td width=195>
<%
'创建一个 ShowPage 过程,其带有三个参数objRS、on、a,分别表示记录集对象,当前的记录号,修改了的字段值。
'此过程的功能是修改后的字段值写入数据库,并通过 Response 对象的 Write 方法将其在浏览器中显示出来。
Sub ShowPage(objRS,no,a)
objRS.AbsolutePosition=no '指定当前记录号
'如果修改了的字段值长度不为 0 .
if len(a)>0 then
for j=1 to objRS.Fields.Count
'则用修改的记录更改数据库中原有的记录。
objRS.Fields(j-1).value=a(j)
next
'更新记录。
objRS.Update
end if
'将更改后的记录从数据库中取出反馈给浏览器。
for j=1 to objRS.Fields.Count
Data="<tr><td>" & objRS.Fields(j-1).name
Data=Data & "<td><input type=text name='txt' value=" & objRS.Fields(j-1).Value & "></tr>"
Response.Write data
next
end Sub
set conn=server.createobject("adodb.Connection")
CS="Provider=Microsoft.jet.OLEDB.4.0;Data Source="
conn.ConnectionString=CS & Server.MapPath("rsgl.mdb")
conn.Open
set rs=server.createobject("adodb.recordset")
'以键盘光标,乐观锁定,方式打开记录集,而且对 Recordset 对象进行批量更新后,查询当前记录的状态是记录被删除。
rs.open"教师工资表",conn,1,2,2
if Session("no")="" then
'如果网页刚打开,则给 Session("no")赋值1。
Session("no")=1
end if
ShowPage RS,Session("no"),Request.form("txt") '调用 ShowPage 过程,以表单提交的Txt中内容修改当前记录
Response.write"</table>"
RS.close
conn.close
%>
<table border=0 align=center height=40>
<tr><td><input type=submit value="确定修改">
</table>
<!--自动计算实发工资。即当名为 txt 的各文本框中某一个文本框的值被改变时,实发工资文本框中的值将随之改变。-->
<script for=txt event=onchange language=vbscript>
w=ccur(frm1.txt(3).value)+frm1.txt(4).value+frm1.txt(5).value+frm1.txt(6).value
w=w-frm1.txt(7).value-frm1.txt(8).value
frm1.txt(9).value=w
</script>
</form>
</body>
</html>
六、小结:
- ››ASP.NET及JS中的cookie基本用法
- ››ASP.NET获取MS SQL Server安装实例
- ››asp.net实现调用百度pai 在线翻译英文转中文
- ››ASP.NET页面选项进行提示判断
- ››Asp.net定时执行程序
- ››ASP.NET中利用DataList实现图片无缝滚动
- ››ASP.NET验证控件RequiredFieldValidator
- ››ASP.NET中使用System.Net.Mail发邮件
- ››ASP.NET中获取用户控件中控件的ID
- ››ASP.NET中FileBytes写成文件并存档
- ››asp获取毫秒数
- ››asp.net报“INSERT INTO 语句的语法错误解决
更多精彩
赞助商链接