ASP连接ACCESS数据库,在一个网页如何更改ACCESS内的数据为一固定值 - ASP技术论坛

yisen

等　级：新手上路
帖　子：4
专家分：0
注　册：2010-10-14
结帖率：100%

楼主

已结贴√ 问题点数：20 回复次数：4

ASP连接ACCESS数据库,在一个网页如何更改ACCESS内的数据为一固定值

1.asp页面

有ID 姓名证件领取几项

我想实现在效果是只要在证件领取一栏点击一下,数据库内的未领取自动更新为已领证+点击当时的时间

搜索更多相关主题的帖子: 数据库　 ACCESS　网页　 ASP　

2010-10-14 10:02

yisen

等　级：新手上路
帖　子：4
专家分：0
注　册：2010-10-14

第 3 楼

得分:0

<%

response.charset="gb2312"
cnStr="provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")
set cn = server.createObject("adodb.connection")
set rs = Server.CreateObject("adodb.recordset")
cn.open cnStr
sql = "select * from DATA where 姓名 like '%" &  Trim( request("sid") ) & "%'"
rs.open sql , cn , 3,3
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
</head>
<body>
<script language="JavaScript">
   document.oncontextmenu=new Function("event.returnValue=false;"); //禁止右键功能,单击右键将无任何反应
   document.onselectstart=new Function("event.returnValue=false;"); //禁止先择,也就是无法复制
</script>
<div style="text-align:center;">
<h1><font color="#0000FF">-> 查询结果 <-</font></h1>
<p><a href="search.asp">按姓名查询页</a></p>
<hr color="#0000FF" noshade>
<table width="829" border="1" bordercolor="#0000FF" height="58">
<tr>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" height="24" width="44">编号</th>
<th width="123" height="24" bordercolorlight="#0000FF" bordercolordark="#0000FF" style="border-style: solid; border-width: 1px">姓名</th>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" height="24" width="45">性别</th>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" height="24" width="52">年龄</th>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" height="24" width="172">体检日期</th>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="206">体检结果</th>
<th style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" height="24" width="76">是否领证</th>

</tr>

<%
if rs.EOF then response.redirect "error.htm"
while not rs.EOF
%>
<tr>
<td align="center" style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="44"><%=rs("编号")%></td>
<td align="center" style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF"><%=rs("姓名")%></td>
<td align="center" style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="45"><%=rs("性别")%></td>
<td align="center" style="border-style: solid; border-width: 1px" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="52"><%=rs("年龄")%></td>
<td style="border-style:solid; border-width:1px; " align="center" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="172"><%=rs("体检日期")%></td>
<td style="border-style:solid; border-width:1px; " align="center" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="206"><%=rs("体检结果")%></td>
<td style="border-style:solid; border-width:1px; " align="center" bordercolorlight="#0000FF" bordercolordark="#0000FF" width="76"><%=rs("LZ")%> </tD>
<TD width="59"><a href="mmsave.asp?id=<%=rs("id")%>" target="_self">已取证</a></td>
</tr>

<%
  rs.moveNext
  wend
rs.close
cn.close

'ErrH:
'response.redirect "error.htm"
%>
</table>
　
<p><a href="search.asp">按姓名查询页</a></div>
<body>
</html>

2010-10-14 11:59