Question

如何实现将ACCESS内的数据显示在ASP网页的相应表格内

是这样的意思：我需要一个下面格式的表格，显示在asp网页中。

要求：
1，这个表格默认显示在asp网页的中间部分，初始的数据单元格内是空的。
(请写出该ASP网页的源代码)

2，通过后台，操作人员添加相应的数据，在网页相应的单元格内能显示出来。（请告诉我，我应该在ACCESS库里添加什么表，或者加入什么字段，来帮助实现这个功能。）（后台我需要添加什么代码。）

3，数据更新后，直接覆盖原来位置的数据。（我需要在ASP网页中键入什么值来实现该功能。）

4,请按我的提问顺序1，2，3，4这样的方式来回答，我是新手，请您写好代码后，重要的地方简单注释下，方便我理解。

5，怕没有合适的答案，或者各位达人的答案我看不懂，所以提问的时候，悬赏财富不给那么多。如果您的回答确实能帮助我，我会额外追加财富。言出必行！

Answer 1

好久没弄asp了，找了找以前写的，如下：
<%
'这个是连接数据库的部分，用的是sql2000
dim conn
'------------------------------------------
'这一句是连接语句，连2000的，access的个这个差不多， 只是数据驱动换了
'上网自己搜搜，有很多

sconn="Provider=sqloledb;Data Source=.;Initial Catalog=Portalsite;User Id=sa;Password=sap"
'------------------------------------------
'创建adodb对象
set conn = server.CreateObject("ADODB.Connection")
'-------------------------------------------
'打开连接
conn.open sconn
’----------------------------------------
'下边是关闭连接
sub CloseConn()
conn.Close()
Set conn = Nothing
end sub
function RealString(strSrc)
RealString = Replace(Trim(strSrc), "'", "’")
end function
function Convert(strSrc)
Convert = Server.HTMLEncode(Replace(Trim(strSrc), "'", "’"))
Convert = Replace(Convert, chr(13), "<br>")
end function
if err Then
err.clear
end if
Session.Timeout = 120
%>

<%
’--------------------------
'这个是读取数据部分
dim strSQL,TitleId,rsObj
TitleId=request("id")
'---------------------------
'sql语句
strSQL="SELECT * from news where id='"&TitleId&"'"
set rsObj=Server.CreateObject("ADODB.Recordset")
rsObj.Open strSQL,conn,1,1

%>
通过上面的部分如果不出错的话，就已经能开始从access获取数据了，下面只要在页面中调用数据用于显示就行。当然了，access的连接语句还得你自己找，另外基本的数据库操作你得会，不然谁也帮不了你，多百度吧。

下面是页面部分：
获取数据的代码是"<%" + "=" + "自己创建的连接对象名称" + "数据库中的字段名" + "%>"
例如：
<%=rsObj("title")%> 其中rsObj就是连接对象名，title就是表中的字段名。
然后在你需要显示该数据的地方加上它就行，例如：
<div class="rn_cn"><%=rsObj("title")%></div>
这里我用的是div布局，你要是喜欢用表格也可以，我只是个人喜欢div，表格的话就把它放在<td></td>标签里就行。例如<td><%=rsObj("title")%></td>。
这就相当于你给的那个图中表格的一行中的一列。当然这一行你要显示多少条数据都行，只要在这一行中横向把你要显示的数据横向排列就行，例如：
<tr>
<td><%=rsObj("title")%></td>
<td><%=rsObj("date")%></td>
<td><%=rsObj("name")%></td>
</tr>
这一行就显示了：题目 日期 姓名
但这只是一行数据，动态的意义是要定义好代码后，它能自动显示出你想要的行数的数据，比如你数据库里有100条数据你想要显示10行，那么就要用循环。
如下：
<%
if not rsObj.eof Then
i=0
do while not rsObj.eof
%>
这里是循环中间部分，就在这里加上前边写好的那行语句：
<tr>
<td><%=rsObj("title")%></td>
<td><%=rsObj("date")%></td>
<td><%=rsObj("name")%></td>
</tr>

<%
i=i+1
if i >= rsObj.PageSize Then exit do
rsObj.movenext
loop
end if

%>
eof是表示数据库中的最后一条数据，作为循环开始的判定，就是如果有数据的话才开始，PageSize是定义好的显示条数，就是循环执行的次数，你要显示多少条就定义为多少。
基本的循环我就不多解释了，你自己应该能看懂。
最后再把表格完善好，就是在循环的外围得加上完整的表格标签，比如<table>什么的，毕竟<tr>只是因为我们只需要它多次显示才单独拿出来写在循环里，要是表格不完善页面显示会出错的。
以上是前台显示数据的基本思路。
至于后台添加数据，你既可以手动自己添加，也可以用sql语句，还可以编写一个页面来添加。反正你添加上了，前边就会相应的显示。一般用于更新数据库的语句是update set。例如：要更新user表中name字段中admin的值为member，那么语句为update user set name = member where name = admin。
最后，原谅我没有按1，2，3，4的顺序来回答，因为我一开始没看到这一条

Answer 2

查询 再把纪录集放在相应位置就可以了

Answer 3

小意思。太简单不过了。