请问一个关于ASP更新数据库的问题~!

wanenjie 2009-03-26 03:05:46
我想一个小投票程序,有5个选项。name="radio" id="radio" value="p1"如此类推到唔,请问怎样实现数据库的更新呢?就是例如用户选择了4然后提交,数据库内的piccs(记录此时字段)自动+1.请问怎样实现啊?数据库是ACCESS·!谢谢~!
<%
Dim db,conn,ConStr,Sql,rs
db="xdx.mdb"
ConStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'On Error Resume Next
Set conn=server.createobject("adodb.connection")
conn.open ConStr
sql="select * from xdx_table where piccs='' "
set rs=server.creatobject("adodb.RecoredSet")
写到这里就不会了~!
...全文
91 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
田想兵 2009-05-07
  • 打赏
  • 举报
回复
上面的人说的就是我所要说的,给分吧
xiaohuli1984 2009-03-28
  • 打赏
  • 举报
回复
<%
Dim db,conn,ConStr,Sql,rs
db="xdx.mdb"
ConStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'On Error Resume Next
Set conn=server.createobject("adodb.connection")
conn.open ConStr
sql="select * from xdx_table where piccs='' "
set rs=server.creatobject("adodb.RecoredSet")
写到这里就不会了~!
rs.open sql,conn,3,2
rs("记录票数字段")=rs("记录票数字段")+1
rs.update
rs.close
set rs=nothing
%>


不过你你说的思路不是很清晰 你是按什么投票 你投票想实现什么作用 对谁进行投票 你的查询语句就让人不能理解
既然你要投票你也应该获取表单值 要不字段代码没什么实际意义
chinaczb2001 2009-03-27
  • 打赏
  • 举报
回复
rs.Open sql,conn,0,3
rs("num")=rs("num")+1
rs.Update
rs.Close
Set rs=Nothing
xyhui2009 2009-03-27
  • 打赏
  • 举报
回复
lz 我来顶下 我还不会

25,980

社区成员

发帖
与我相关
我的任务
社区描述
高性能WEB开发
社区管理员
  • 高性能WEB开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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