对datareport报表设计器熟的进---------->

问:在VB中如何，用代码将datareport与access数据库相关联。 不是用数据环境设计器，也别提及水晶报表。 比如我要将某表中数据打印在报表上， 连接代码如何写？知道的帮下忙，谢谢。

帮人解决过不很少问题，而自己问的问题几乎都没被解决过。这次一样，问题自己解决了。

不过还是很谢谢2位，只是有点不明白，
1楼的你发的是vb数据库连接代码。
2楼的你发的是ASP添加数据库记录，汗。

而我问的问题是vb报表设计器动态链接数据库问题，因为以前一直没用过报表设计器，生疏。

<!---#include file="conn.asp"--->
<%
num = trim(request("tnum"))
if num = "" or IsNull(num) then
%>
<script>
alert("添加失败!");
location.href="default.asp";
</script>
<%
else

num = Split(num,VbCrlf)
set rs=server.createobject("adodb.recordset")
rs.open"select * from BookCard",conn,1,3
for i = 0 to 9
mynum=num(i)
mynum = SpLIt(mynum,"|")
%>
<script>
//alert("i=<%=i%>");
//alert("num(i)=<%=num(i)%>");
//alert("mynum=<%=mynum%>");
</script>
<%
rs.addnew
rs("userid") = mynum(0)