点按钮,执行数据的添加?

KinGboY16 2006-10-30 11:33:07
以下代码向 SQL Server200 的'model' 下的 '购书' 表 添加记录

添加的代码没有错,我试过了,可以添加 现在就是想点击按钮后再执行添加就无法执行了,

大哥们帮我看下是怎么回事

<html>
<body>
<%
sub go()
set conn=server.createobject("adodb.connection")
strprovider="provider=sqloledb.1;data source=JIANGHAITENG;database=model;uid=sa;pwd=;"
conn.open strprovider
app="f:\"
bookname="火拼时速"
price="10.00元"
num="10"
conn.begintrans
commandtext="insert into 购书 values('"+app+"','"+bookname+"','"+price+"','"+num+"')"
conn.execute commandtext,recordsaffected,adcmdtext
if conn.errors.count=0 then
conn.committrans
else
conn.rollbacktrans
end if
end sub
%>
<input type="button" name="button1" value="提交" onclick="go()">
</body>
</html>
...全文
78 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
KinGboY16 2006-10-31
  • 打赏
  • 举报
回复
我改成如下 但还是不行

<html>
<body>
<%
if request.form("button1") = "提交" then
set conn=server.createobject("adodb.connection")
strprovider="provider=sqloledb.1;data source=JIANGHAITENG;database=model;uid=sa;pwd=;"
conn.open strprovider
app="f:\"
bookname="火拼时速"
price="10.00元"
num="10"
conn.begintrans
commandtext="insert into 购书 values('"+app+"','"+bookname+"','"+price+"','"+num+"')"
conn.execute commandtext,recordsaffected,adcmdtext
if conn.errors.count=0 then
conn.committrans
else
conn.rollbacktrans
end if
end if
%>
<form action="me.asp" method="post">
<input type="button" name="button1" value="提交">
</form>
</body>
</html>
windwl 2006-10-31
  • 打赏
  • 举报
回复
<form action="me.asp" method="post">
<input type="submit" name="button1" value="提交" />
</form>
</body>
</html>
KinGboY16 2006-10-31
  • 打赏
  • 举报
回复
没人会吗?
sh_city 2006-10-30
  • 打赏
  • 举报
回复
<input type="button" name="button1" value="提交" onclick="go()">
这是客户端的go();不是服务器上的.请改为:

<html>
<body>
<%
if request("action") = "add" then
go()
end if
sub go()
set conn=server.createobject("adodb.connection")
strprovider="provider=sqloledb.1;data source=JIANGHAITENG;database=model;uid=sa;pwd=;"
conn.open strprovider
app="f:\"
bookname="火拼时速"
price="10.00元"
num="10"
conn.begintrans
commandtext="insert into 购书 values('"+app+"','"+bookname+"','"+price+"','"+num+"')"
conn.execute commandtext,recordsaffected,adcmdtext
if conn.errors.count=0 then
conn.committrans
else
conn.rollbacktrans
end if
end sub
%>
<form action="?action=add" method="post">
<input type="submit" name="button1" value="提交" />
</form>
</body>
</html>

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧