28,391
社区成员
发帖
与我相关
我的任务
分享新手求组啊，困扰好几天了
<html>
<body>
<h2 align="center">请填写个人信息</h2>
<form name="frmInfor" method="post" action="">
姓名：<input type="text" name="txtName"><br>
密码：<input type="password" name="txtPwd"><br>
<input type="submit" name="btnSubmit" value="确定">
<input type="reset" name="btnReset" value="取消">
</form>
<%
'下面开始处理事务
conn.BeginTrans
Dim strName,strPwd
strName=Request.Form("txtName")
strPwd=Request.Form("txtPwd")
Response.write strName
Response.write strPwd
'以下建立一个数据库，建立一个Connection对象实例conn
Dim conn,StrConn
Set conn=Server.CreateObject("ADODB.Connection")
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath("test.mdb")
conn.Open StrConn
'--下面利用Execute方法添加记录
conn.Execute("Insert Into test(txtName,txtPwd)Values(Request.Form("txtName"),strPwd=Request.Form("txtPwd"))
if conn.Error.Count=0 then
conn.CommitTrans
Response.Write("成功执行")
else
conn.RollbackTrans
Response.Write("有错误发生，取消处理结果")
end if
%>
</body>
</html>
为什么连接不了数据库，不能进行查询？
<body>
<h2 align="center">请填写个人信息</h2>
<form name="frmInfor" method="post" action="">
姓名：<input type="text" name="txtName"><br>
密码：<input type="password" name="txtPwd"><br>
<input type="submit" name="btnSubmit" value="确定">
<input type="reset" name="btnReset" value="取消">
</form>
<%
'下面开始处理事务
conn.BeginTrans
Dim strName,strPwd
strName=Request.Form("txtName")
strPwd=Request.Form("txtPwd")
Response.write strName
Response.write strPwd
'以下建立一个数据库，建立一个Connection对象实例conn
Dim conn,StrConn
Set conn=Server.CreateObject("ADODB.Connection")
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath("test.mdb")
conn.Open StrConn
'--下面利用Execute方法添加记录
conn.Execute("Insert Into test(txtName,txtPwd)Values(Request.Form("txtName"),strPwd=Request.Form("txtPwd"))
if conn.Error.Count=0 then
conn.CommitTrans
Response.Write("成功执行")
else
conn.RollbackTrans
Response.Write("有错误发生，取消处理结果")
end if
%>
</body>
</html>
为什么连接不了数据库，不能进行查询？
...全文
请发表友善的回复…
发表回复
得鹿梦鱼、 2017-07-10
- 打赏
- 举报
http://www.cnblogs.com/yangwujun/p/4902305.html
华丽丽的小低调 2017-06-01
- 打赏
- 举报
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("test.mdb")
Rotel-刘志东 2017-05-13
- 打赏
- 举报
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath("test.mdb")
Msxindl_Com 2017-05-12
- 打赏
- 举报
StrConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("test.mdb")
