疾
疾风之龙
Unregistered / Unconfirmed
GUEST, unregistred user!
最近在学xml,按《xml从入门到精通》一书上所说的例子做了一个从accsee库提取记录到xml的asp文档,可是调试总报错,各位帮我看看是哪错了,谢谢啊(100分)<br /><script language=vbscript>
<%
response.contenttype="text/xml"
dim rs
set rs=GETMdbRecordset("music.mdb","select * from ms")
if rs is nothing then
response.write "GETMDBRECORDSET 调用失败!"
response.end
end if
%>
<?xml version="1.0" encoding="gb2312"?>
<库存>
<%
do
while not rs.eof
%>
<音乐 种类="<%=rs("种类")%>">
<音乐编号><%=rs("音乐编号")%></音乐编号>
<演唱者><%=rs("演唱者")%></演唱者>
<专辑名><%=rs("专辑名")%></专辑名>
<价格><%=rs("价格")%></价格>
<% if rs("说明") <> empty then
%>
<简介><%=rs("说明")%></简介>
<% end if %>
<% if rs("备注") <> empty then
%>
<备注><%=rs("备注")%></备注>
<% end if %>
</音乐>
<%
rs.movenext
WEND
%>
</库存>
<%
rs.close
%></script>[8D]
<%
response.contenttype="text/xml"
dim rs
set rs=GETMdbRecordset("music.mdb","select * from ms")
if rs is nothing then
response.write "GETMDBRECORDSET 调用失败!"
response.end
end if
%>
<?xml version="1.0" encoding="gb2312"?>
<库存>
<%
do
while not rs.eof
%>
<音乐 种类="<%=rs("种类")%>">
<音乐编号><%=rs("音乐编号")%></音乐编号>
<演唱者><%=rs("演唱者")%></演唱者>
<专辑名><%=rs("专辑名")%></专辑名>
<价格><%=rs("价格")%></价格>
<% if rs("说明") <> empty then
%>
<简介><%=rs("说明")%></简介>
<% end if %>
<% if rs("备注") <> empty then
%>
<备注><%=rs("备注")%></备注>
<% end if %>
</音乐>
<%
rs.movenext
WEND
%>
</库存>
<%
rs.close
%></script>[8D]