<% '定义一个变量,用于数据库连接 dim conn '设置连接变量为ADODB.Connection对象,这是VB用于进行数据库连接的对象 Set conn=Server.CreateObject("ADODB.Connection") '打开指定的数据库,其中,Open方法后面的参数即为我们通常所说的数据库连接字符串,这里主要设置了该字符串的两个参数,一个是Dbq,一个是Driver,这是使用的ODBC方式来连接数据库,现在流行的方法一般为OLE方式,效率比较高,也不会出错,所以,下面这句可能改成如下: conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("\data\olive.mdb") conn.Open "Dbq=" & Server.Mappath("data\olive.mdb") & ";Driver=" '执行一条查询语句,从product表中查询前20条记录,并将结果赋给rs变量,这是一个RecordSet类型的变量,保存的是记录集 Set rs=conn.Execute("select top 20 * from product") '开始while循环,直到记录集尾,将记录集里的信息取出,并转写成html标记语言代码 do while (not rs.eof) ’添加<tr>标签 response.write("<tr>") '添加一个图片标签,并将该标签的图片路径属性设置以从数据库读取的图片路径rs("pic"),即product表的pic字段 response.write("<img width=100 height=100 src="&rs("pic")&">") '添加一个超链接标签,并将连接属性设置为一个显示产品详细信息的asp页面,其中带一个参数:id,这个应该是产品的id,同时,在链接后面加上产品的名字rs("productname"),.来自product表的productname字段 response.write("<a href='show.asp?id="&rs("id")&"'>"&rs("productname")&"</a></tr>") '移动到下一条记录 rs.movenext loop '关闭记录集 rs.close '关闭数据库连接 conn.close '销毁数据库连接对象 set conn=nothing %> 大概意思就是这样,有问题再交流,呵呵!