繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp中vbscript访问xml文件
- ASP
- ASP漏洞及安全建议(3)
- ASP漏洞及安全建议(4)
- 实现聊天室的悄悄话功能（上）
- 实现聊天室的悄悄话功能（中）
- 用ＡＳＰ实现悄悄话的功能
- 《 优化你的ASP程序 》
- 让ASP应用系统成为跨平台的应用系统
- 让ASP应用系统成为跨平台的应用系统(2)
- 使用ASP加密算法加密你的数据（一）
- 使用ASP加密算法加密你的数据（二）
- 用ASP制作个性化的调查板
- asp+语法介绍（二）---书写我们的第一个asp+ 文件
- asp+语法介绍(一)
- asp+语法介绍(三)----asp+的服务器端编程初步
- asp+语法介绍(四)----asp+的服务器端编程进介
- asp+语法介绍(五)----asp+的服务器端编程控件篇
- sp+语法介绍(六)----数据库篇
- 用ASP和VBScript上载文件（一）
- 用ASP和VBScript上载文件（二）
- 解析正则表达式（原创）
ASP 中的 asp中vbscript访问xml文件
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 53 ::
收藏到网摘: n/a
要求传入工号 返回员工姓名
'全局数据 考虑这样只要load一次
set Doc = CreateObject("Microsoft.XMLDOM")
Doc.async = false
Doc.load(Server.MapPath("user_cnname.xml"))
function cnname_var (varusername)
dim node,i,nodecount,root
set nodeLis= Doc.getElementsByTagName("user")
nodeCount = nodeLis.length
For i=0 to nodeCount - 1
if nodeLis.item(i).childnodes.item(0).text = varusername then
'这里有一点疑惑 为什么是item(2)
cnname_var = nodeLis.item(i).childnodes.item(2).text
exit function
end if
next
cnname_var = varusername
end function
xml文件如下：
<?xml version="1.0" encoding="gb2312"?>
<user_cnname>
<user>
<username>A140</username>
<cnname>赵建川</cnname>
</user>
<user>
<username>A141</username>
<cnname>赵建川</cnname>
</user>
</user_cnname>
但用这种方式还没有直接从数据库时查询来得快,所以也就没有采用这种方式，
用javascript + 数据岛也可以实现查询，但是没有小涉及到事情 在asp代码中不好调用
评论 (0) All
