您当前的位置:天天ASP(学习网)ASP编程进阶技巧 → 文章内容

ASP读取XML文件节点值

作者:本站  来源:本站整理  发布时间:2014-3-7 13:02:30

Function GetNode (Nname) 

Dim StrBK,start,over,RsBK
StrBK=ReadFromTextFile ("txt/xuan.txt","utf-8")
StrBK=Replace(StrBK,">","")
StrBK=Replace(StrBK,"<","")

start=Instr(StrBK,Nname)
over=Instr(StrBK,"/"&Nname) '
RsBK=mid(StrBK,start,over-start)
RsBk=replace(RsBK,Nname,"")
 GetNode=RsBk
End Function

<table border=1 width="500" cellspacing=1 cellpadding=3 align=center bordercolorlight="#326598" bordercolordark="#ffffff">
<tr bgcolor="#e8f4ff">
      <td height=25 colspan="2" background ="admin/images/pics/tile_sub.gif">
   <div align="center"><b><font color="#FFFFFF">套餐相关信息</font></b></div></td>
  </tr>
<tr>
<td width="31%" height="25">&nbsp;上网卡号</td>
<td width="69%" height="25">&nbsp;<%= GetNode("AccountNum") %></td>
</tr>
 <tr>
<td width="31%" height="25">&nbsp;剩余时长(分钟)</td>
<td width="69%" height="25">&nbsp;<%= GetNode("ResSurplus") %></td>
</tr>
<tr>
<td width="31%" height="25">&nbsp;套餐总时长(分钟)</td>
<td width="69%" height="25">&nbsp;<%= GetNode("TotalResFree") %></td>
</tr>
 
</table>

文章评论 (评论内容只代表网友观点,与本站立场无关!)

用户名: 查看更多评论

分 值:100分 85分 70分 55分 40分 25分 10分 0分

内 容:

         (注“”为必填内容。)