注册 登录
编程论坛 ASP技术论坛

asp如何写入access数据库(新手问题)

boqon 发布于 2008-01-08 12:39, 651 次点击
数据库cao.mdb
表名 news
字段 bt nr du
写入字段中,怎么写的?
老大们写个具体的代码给我研究一下呵,谢了
请用
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")


以下是我内容提交页面!!
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新闻管理系统</title>
</head>

<body>

<div align="center">
    <table border="1" width="800" id="table1" bgcolor="#FFFFFF" style="border-collapse: collapse" bordercolor="#00FF00">
        <tr>
            <td bgcolor="#008000">
            <p align="center"><b>新闻管理系统</b></td>
        </tr>
        <tr>
            <td>
            <form method="POST" action="--WEBBOT-SELF--">
                
                <div align="center">
                    <table border="0" width="800" id="table2" style="border-collapse: collapse">
                        <tr>
                            <td>新闻标题</td>
                            <td><input type="text" name="bt" size="20"></td>
                        </tr>
                        <tr>
                            <td>新闻内容</td>
                            <td> </td>
                        </tr>
                        <tr>
                            <td colspan="2">
                            <p align="center">
                            <textarea rows="20" name="nr" cols="88"></textarea></td>
                        </tr>
                        <tr>
                            <td>新闻分类</td>
                            <td><input type="text" name="bu" size="20"></td>
                        </tr>
                    </table>
                </div>
                <p align="center"> </p>
                <p align="center"> </p>
                <p align="center"><input type="submit" value="提交" name="B1"><input type="reset" value="重置" name="B2"></p>
            </form>
            <p> </td>
        </tr>
    </table>
</div>

</body>

</html>
2 回复
#2
icelovebai2008-01-08 16:11
<%
dim conn,constr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("cao.mdb")
set conn=Server.CreateObject("ADODB.Connection")
conn.open connstr
%>
<%
dim rs,sql
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from news"
rs.open sql,conn,1,3
rs.addnew
rs("bt")=request.form("bt")
rs("nr")=request.form("nr")
rs("du")=request.form("du")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
#3
boqon2008-01-08 16:41
谢谢了!结决了!!

[[italic] 本帖最后由 boqon 于 2008-1-8 17:37 编辑 [/italic]]
1