ASP+ADO实现数据读写简单示例

转载 2006年05月24日 23:30:00

资料来源:http://blog.csdn.net/owl2008/

//showdata.asp
<%@ language="vbscript
" codepage="936" %>
 
<html>
    <head>
        <title>[show the data]</title>
       
    </head>
    <body>
    <%
        Application.Lock()
        set dataConnect = Server.CreateObject("ADODB.Connection")
        strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="_
                     &Server.MapPath("db1.mdb")&_
                     ";Persist Security Info=True"
        dataConnect.Open(strConnect)
        if Request.Form("name") <> "" or Request.Form("phone") then
             sqlInsertcmd = "insert into table1(name,phone) values('"_
                            &Request.Form("name")&"','"&Request.Form("phone")&"')"
             dataConnect.Execute(sqlInsertcmd)
        end if
        set dbtabptr = Server.CreateObject("ADODB.Recordset")
        dbtabptr.ActiveConnection = dataConnect
        strSql = "select * from table1"
        dbtabptr.Open(strSql)
        Response.Write("<table width='100%' border='1'>")
        Response.Write("<tr>")
        Response.Write("<th>name</th>")
        Response.Write("<th>phone</th>")
        dbtabptr.MoveFirst()
        do until dbtabptr.EOF
            Response.Write("<tr>")
            Response.Write("<td>")
            Response.Write(dbtabptr("name"))
            Response.Write("</td>")
            Response.Write("<td>")
            Response.Write(dbtabptr("phone"))
            Response.Write("</td>")
            Response.Write("</tr>")
            dbtabptr.MoveNext()
        loop
        Response.Write("</tr>")
        Response.Write("</table>")    
        dataConnect.Close()
        Application.UnLock()
    %>
    <a href="addData.asp">Add a Data to Database</a>   
    </body>
</html>
// addData.asp
<%@ language="vbscript" codepage="936" %>
<html>
    <head>
        <title>[Add data]</title>
    </head>
    <body>
        <form name="adddata" action="showData.asp" method="post">
        <table>
            <tr>
                <td align="right">name:</td>
                <td><input name="name" type="text" /></td>
            </tr>
            <tr>
                <td align="right">phone:</td>
                <td><input name="phone" type="text" /></td>
            </tr>
            <tr>
                <td><input name="submit" type="submit" value="submit" /></td>
                <td><input name="reset" type="reset" value="reset" /></td>
            </tr>
        </table>
        </form>
    </body>
</html>

 

相关文章推荐

MapReduce从HBase读写数据简单示例

就用单词计数这个例子,需要统计的单词存在HBase中的word表,MapReduce执行的时候从word表读取数据,统计结束后将结果写入到HBase的stat表中。     1、在eclipse中...

VC利用ADO简单读写数据库

ADO数据库访问技术使用的基本步骤及方法:      首先,要用#import语句来引用支持ADO的组件类型库(*.tlb),其中类型库可以作为可执行程序(DLL、EXE等)的一部分被定位在其自身程序...
  • bmbm546
  • bmbm546
  • 2011年07月20日 13:17
  • 4875

ado 读写二进制数据

写二进制数据: pRs->AppendChunk(_T("tpContent"),buff,dwLen); 读二进制数据:   CADOFieldInfo info;    ...
  • sstower
  • sstower
  • 2012年03月08日 17:50
  • 833

POI实现读写Excel2007完整示例--每分钟约处理7000行数据

流程:(跟jxl相似,只是读取逻辑有点不同) 跟jxl的两处主要区别: 1、读取和写入方式略有不同: (1)  poi 读取: FileInputStream input = new...

Asp.Net Ajax+WCF Service+ADO.NET Entity Framework实现数据列表,数据筛选,分页,排序,删除

====================================================== 注:本文源代码点此下载 =============================...

asp.net读写ini文件最简单的代码

  • 2010年08月20日 14:19
  • 1KB
  • 下载

读写kafka 0.7简单示例

Kafka0.8和kafka0.7变化非常大,使用方式和接口class都变掉了。这里简单介绍一下0.7的kafka如何写入数据。 因为刚好工作中用的是0.7的kafka,所以必须要使用0.7的接口往k...
  • demo_zj
  • demo_zj
  • 2015年07月01日 20:08
  • 1086

java读写串口的简单示例

/*  * @(#)SimpleRead.java 1.12 98/06/25 SMI  *  * Copyright (c) 1998 Sun Microsystems, Inc. All R...

ASP.NET_即用后台_映射Lambda读写数据

  • 2015年05月28日 16:02
  • 15.54MB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章: ASP+ADO实现数据读写简单示例
举报原因:
原因补充:

(最多只允许输入30个字)