ASP数据库实验源代码清单
1.直接插入数据（SQL Server）
<html>
<head>
<title>直接插入数据实验</title>
</head>
<body>
<%
set ateobject("tion")
cn.open"driver={sql server};server=jcb;database=tms;uid=sa;pwd=123"
'利用记录集recordset进行插入
'set ateobject("dset")
'strin="insert into student(no,name,sex,dept,score)VALUES('99001','张三','男','信管',560)"
'rs.open strin,cn
'利用connection的execute函数进行插入
strin="insert into student(no,name,sex,dept,score)VALUES('99002','赵敏','女','计算机',700)"
%>
</body>
</html>
2.直接插入数据（Access）
<html>
<head>
<title>直接插入数据实验</title>
</head>
<body>
<%
set ateobject("tion")
strconn="driver={microsoft access driver(*.mdb)};dbq="&server.mappath("tms.mdb") cn.open strconn
'利用记录集recordset进行插入
set ateobject("dset")
strin="insert into student(no,name,sex,dept,score)VALUES('99001','张三','男','信管',560)"
rs.open strin,cn
'利用connection的execute函数进行插入
'strin="insert into student(no,name,sex,dept,score)VALUES('99003','赵敏','女','计算机',700)"
'cn.execute strin
%>
</body>
</html>
3.通过网页插入数据（SQL Server）
①formin.htm
<html>
<head>
<title>通过表单插入信息</title>
</head>
<body>
asp数据
<form action=formin.asp method=post>
<table border="1"width="40%"align=center>
<caption>通过交互表单提交信息</caption>
<tr>
<td align="right">学生学号：</td>
<td><input type="text"name="txtno"size="20"></td> </tr>
<tr>
<td align="right">学生姓名：</td>
<td><input type="text"name="txtname"size="20"></td> </tr>
<tr>
<td align="right">学生性别：</td>
<td>
<input type="radio"name="txtsex"value="男">男
<input type="radio"name="txtsex"value="女">女
</td>
</tr>
<tr>
<td align="right">所在院系：</td>
<td>
<select name="txtdept"size="1">
<option selected value="管理学院">管理学院</option>
<option value="经济学院">经济学院</option>
<option value="文法学院">文法学院</option>
<option value="材料学院">材料学院</option>
<option value="外国语学院">外国语学院</option>
</select>
</td>
</tr>
<tr>
<td align="right">入学分数：</td>
<td><input type="text"name="txtscore"size="20"></td> </tr>
<tr>
<td align=center colspan="2">
<input type="submit"value="确认">
<input type="reset"value="提交"name="r1">
</td>
</tr>
</table>
</form>
</body>
</html>
②formin.asp
<%
tmpno=request.form("txtno")
tmpname=request.form("txtname")
tmpsex=request.form("txtsex")
tmpdept=request.form("txtdept")
tmpscore=request.form("txtscore")
set ateobject("tion")
cn.open"driver={sql server};server=jcb;database=tms;uid=sa;pwd=123" strin="insert into student(no,name,sex,dept,score)"
strin=strin&"values('"&tmpno&"','"&tmpname&"','"&tmpsex&"','"&tmpdept&"',"&tmpscore &")"
response.write"<script language=JavaScript>"&"alert('记录插入成功！');"& "history.back();"&"</script>"
%>

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。