ASP基础学习:access asp 练习一
2008-02-23 09:40:06来源:互联网 阅读 ()
建立一简单数据库的添加、显示、查询功能实现 注:[采用access2000 asp,数据库:customer.mdb(字段: 公司名(字符型)、电话(数据型)、传真(数据型)、类别(字符型)、联系人(字符型)、备注(字符型))]
<在winxp pro iis5.1环境下完成测试>
页面代码如下:
---add.html----
<html>
<head>
<title>添加数据库记录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF">
<p align="center"><font size="5">添加数据库记录</font></p>
<form method="post" action="adddatabase.asp">
<div align="center">
<table width="46%" border="0">
<tr>
<td width="28%">
<div align="right">公司名:</div>
</td>
<td width="72%">
<input type="text" name="CompanyName">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">电话:</div>
</td>
<td width="72%">
<input type="text" name="Tel">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">传真: </div>
</td>
<td width="72%">
<input type="text" name="Fax">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">类别:</div>
</td>
<td width="72%">
<input type="text" name="Classes">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">联系人:</div>
</td>
<td width="72%">
<input type="text" name="Cname">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">备注:</div>
</td>
<td width="72%">
<input type="text" name="Backups">
</td>
</tr>
<tr>
<td width="28%">
<div align="right"> </div>
</td>
<td width="72%">
<input type="submit" name="Submit" value="Submit">
<input type="reset" name="reset" value="Reset">
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
---adddatabase.asp---
<html>
<head>
<title>添加数据库记录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF">
<p align="center"><font size="5">添加数据库记录</font></p>
<form method="post" action="adddatabase.asp">
<div align="center">
<table width="46%" border="0">
<tr>
<td width="28%">
<div align="right">公司名:</div>
</td>
<td width="72%">
<input type="text" name="CompanyName">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">电话:</div>
</td>
<td width="72%">
<input type="text" name="Tel">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">传真: </div>
</td>
<td width="72%">
<input type="text" name="Fax">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">类别:</div>
</td>
<td width="72%">
<input type="text" name="Classes">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">联系人:</div>
</td>
<td width="72%">
<input type="text" name="Cname">
</td>
</tr>
<tr>
<td width="28%">
<div align="right">备注:</div>
</td>
<td width="72%">
<input type="text" name="Backups">
</td>
</tr>
<tr>
<td width="28%">
<div align="right"> </div>
</td>
<td width="72%">
<input type="submit" name="Submit" value="Submit">
<input type="reset" name="reset" value="Reset">
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
---addnewdatabase.asp---
<%
rs.AddNew
rs("公司名") = CompanyName
rs("电话") = Tel
rs("传真") =Fax
rs("类别") = Classes
rs("联系人")=Cname
rs("备注")=Backups
rs.Update
%>
---viewdatabase.asp---
<%
set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("customer.mdb")
dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Dbpath '建立与数据库的连接,与上同。
SQL="select * from customers Order By 公司名 DESC"
SET CustomerList=dbconnection.EXECUTE(sql)
%>
<html>
<body>
<FONT SIZE="5"><center>数据库记录</center></FONT>
<CENTER>
<TABLE BORDER=1>
<tr>
<td>公司名</td>
<td>电话</td>
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
下一篇:ASP开发44条技巧集锦之一
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash