我编的asp 程序出毛病,请高手指点!
<%
set conn=server.createobject("adodb.connection")
path=server.mappath("book.mdb")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&path&""
name1=request("name1")
name2=request("name2")
sql="select * from sheet1"
if name1<>"" then
sql=sql & "where" & name1
end if
if name2<>"" then
sql=sql & "order by" & name2
end if
set rs=conn.execute("sheet1")
set ts=conn.execute(sql)
response.write "<table border=1>"
response.write "<tr>"
for i=0 to rs.fields.count-1
response.write "<td>" & rs.fields(i).name & "</td>"
next
response.write "</tr>" & "<tr>"
for i=0 to ts.fields.count-1
response.write "<td>" & ts(i) & "</td>"
next
response.write "</tr>" & "</table>"
%>