XML 分析失败: 没有较好格式化 (行号: 11, 字符: 24) 请求帮助``
以下是错误提示：XML 分析失败: 没有较好格式化 (行号: 11, 字符: 24)<?xml version="1.0" encoding="utf-8"?><!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"> <wml> <head> <meta http-equiv="Cache-Control" content="max-age=0"/> <meta http-equiv="Cache-Control" content="no-cache"/> <meta http-equiv="Expires" content="Mon, 1 Jan 1990 00:00:00 GMT"/> </head> <card id="card1" title="社区银行"><p> <img src='yh.gif' alt='load...'/><br/> <font face="����" size=2> <p>Microsoft JET Database Engine</font> <font face="����" size=2>���� '80040e07'</font> <p> <font face="����" size=2>�����ʽ��������Ͳ�ƥ�䡣</font> <p> <font face="����" size=2>/lt/reg/bank.asp</font><font face="����" size=2>���� 28</font>
以下是asp文件的全代码，我全贴上来，麻烦高手们帮我看看：谢谢！
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %><% Response.ContentType="text/vnd.wap.wml; charset=utf-8" %><?xml version="1.0" encoding="utf-8"?><!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<!--#INCLUDE VIRTUAL="/lt/reg/useregs.asp"-->
<!--#INCLUDE VIRTUAL="/lt/public/codeun.asp"-->
<!--#INCLUDE VIRTUAL="/lt/reg/ltonline.asp"-->
<wml>
<head>
<meta http-equiv="Cache-Control" content="max-age=0"/>
<meta http-equiv="Cache-Control" content="no-cache"/>
<meta http-equiv="Expires" content="Mon, 1 Jan 1990 00:00:00 GMT"/>
</head>
<card id="card1" title="社区银行"><p>
<img src='yh.gif' alt='load...'/><br/>
<%
wap=request.querystring("wap")
Server.ScriptTimeout=999
iduse=Session("useid")
lasttlls="52"
lasttls
Set objgbrs=Server.CreateObject("ADODB.Recordset")
sql="select * from usereg where CStr(id)='" & iduse & "'"
objgbrs.open sql,conn
if Len(objgbrs("banktime"))>5 then
if day(objgbrs("banktime"))<>day(now) then
interest=ccur(objgbrs("bank"))*int(datediff("d",cdate(objgbrs("banktime")),cdate(now())))*0.01
subinterest=ccur(objgbrs("subbank"))*int(datediff("d",cdate(objgbrs("banktime")),cdate(now())))*0.03
sql="update usereg set bank=bank+" & interest & ",subbank=subbank+" & subinterest & ",banktime=now() Where CStr(id)='" & iduse & "'"
Application.Lock
conn.execute(sql)
Application.Unlock
objgbrs.close
set objgbrs=nothing
Set objgbrs=Server.CreateObject("ADODB.Recordset")
sql="select * from usereg where CStr(id)='" & iduse & "'"
objgbrs.open sql,conn
end if
response.write "客户:" & Session("ltname") & "<br/>现有存款:" & objgbrs("bank") & "<br/>手头金币:" & objgbrs("usejf") & "<br/>银行贷款:" & objgbrs("subbank")
response.write "<br/>共有资产:" & objgbrs("usejf")+objgbrs("bank") &"<br/><a href='#card2'>我要存款</a> <a href='#card3'>我想取款</a><br/><a href='#card4'>我要贷款</a>"
response.write " <a href='#card5'>我要还贷</a><br/>存款利率:1%<br/>贷款利率:3%<br/>过户手续:2%"
else
response.write "你还未开户,请问现在开户吗?手续费100金币！"
response.write "<br/><a href='opbank.asp?wap=" & wap & "'>我要开户</a>"
end if
%>
<br/>--------<br/><a href='/lt/scyl.asp?wap=<%=wap%>'>社区商城</a> <a href='/lt/index.asp?wap=<%=wap%>'>社区首页</a></p></card>
<card id="card2" title="存款服务"><p>
你手头现币有金币:<% =objgbrs("usejf") %>
<br/>存入金币:
<br/><input name="input" value="100" format="*N" maxlength="10"/>
<br/><anchor>提 交
<go method="post" href='inputcl.asp?wap=<%=wap%>'>
<postfield name="input" value="$(input)"/></go></anchor><br/>--------
<br/><a href='bank.asp?wap=<%=wap%>'>社区银行</a>
<br/><a href='/lt/scyl.asp?wap=<%=wap%>'>社区商城</a></p></card>
<card id="card3" title="取款服务"><p>
你现银行的存款为:<% =objgbrs("bank") %>
<br/>取出金币:
<br/><input name="out" value="100" format="*N" maxlength="10"/>
<br/><anchor>提 交
<go method="post" href='outcl.asp?wap=<%=wap%>'>
<postfield name="out" value="$(out)"/></go></anchor><br/>~~~~~~~~~
<br/><a href='bank.asp?wap=<%=wap%>'>社区银行</a>
<br/><a href='/lt/scyl.asp?wap=<%=wap%>'>社区商城</a></p></card>
<card id="card4" title="货款服务"><p>
您已贷款:<% =objgbrs("subbank") %>
<br/>(贷款最高限制2000金币！)
<br/>现想贷款:
<br/><input name="tan" value="500" format="*N"/>
<br/><anchor>提 交
<go method="post" href='subbankcl.asp?wap=<%=wap%>'>
<postfield name="tan" value="$(tan)"/></go></anchor><br/>~~~~~~~~~
<br/><a href='bank.asp?wap=<%=wap%>'>社区银行</a>
<br/><a href='/lt/scyl.asp?wap=<%=wap%>'>社区商城</a></p></card>
<card id="card5" title="还贷服务"><p>
您已贷款:<% =objgbrs("subbank") %>
<br/>现有金币:<% =objgbrs("usejf") %>
<br/>想还多少？
<br/><input name="retan" value="100" format="*N"/>
<br/><anchor>提 交
<go method="post" href='retan.asp?wap=<%=wap%>'>
<postfield name="retan" value="$(retan)"/></go></anchor><br/>~~~~~~~~
<br/><a href='bank.asp?wap=<%=wap%>'>社区银行</a>
<br/><a href='/lt/scyl.asp?wap=<%=wap%>'>社区商城</a></p></card>
<%
Set objgbrs= Nothing
conn.close
set conn=nothing
%>
</wml> 用模拟器查看，生成后的源码，这么多看起来头大
页:
[1]