日期:2014-05-16 浏览次数:20967 次
<%%>
sub q(inputquery)
connstr="driver={Microsoft Access Driver (*.mdb)};DBQ=" &Server.MapPath("mydb.mdb")
set cn=server.createobject("adodb.connection")
cn.open connstr
set rstemp=cn.execute(inputquery)
howmanyfields=rstemp.fields.count-1
%>
<% for i=0 to howmanyfields%>
联系电话1:<%=rstemp("联系电话1")%> 联系电话2:<%=rstemp("联系电话2")%> 姓名<%=rstemp("姓名")%> 工号<%=rstemp("工号")%>。。。。中间自己加。。。。 明细:<%=rstemp("明细")%>
<% next %>
111222
<%
response.write("<br>受理总数:" & count)
rstemp.close
set rstemp=nothing
cn.close
set cn=nothing
end sub
%>
注:《%=rstemp("这里改成你的真实字段就行了")%》