<% dim conn
dim connstr
on error resume next
mdb="data.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DATA Source="&Server.MapPath(mdb)
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql="insert into [user]([userid],[name])"
sql=sql&"values('6','yangmincong')"
conn.execute(sql)
set rs=server.CreateObject("ADODB.Recordset")
sqlstmt="select*from user "
rs.open sqlstmt
%>

<table width="141" border="1" cellspacing="0" cellpadding="0">
<tr><%for i=0 to rs.fields.count-1%>

<td width="137"><B><%=rs(i).name%></B></td>
<%next%>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
</table>

哪有问题》？
sqlstmt="select * from [user] "

运行后看不到我要的啊
我想把数据表中的行输出来
但是不知道怎么弄

<% dim conn
dim connstr
on error resume next
mdb="data.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DATA Source="&Server.MapPath(mdb)
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql="insert into [user]([userid],[name])"
sql=sql&"values('6','yangmincong')" 把6前后的’去掉
conn.execute(sql)
set rs=server.CreateObject("ADODB.Recordset")
sqlstmt="select*from user " *前后加空格
rs.open sqlstmt
%>

<table width="141" border="1" cellspacing="0" cellpadding="0">
<tr><%for i=0 to rs.fields.count-1%> 改成do while not rs.eof

<td width="137"><B><%=rs(i).name%></B></td> 改成rs("name")
<%next%> 改成loop
</tr>
<tr>
<td>&nbsp;</td>
</tr>
</table>