中文XML论坛--asp 与 dom 的沟通问题

新书推介：《语义网技术体系》
作者：瞿裕忠，胡伟，程龚

XML论坛

W3CHINA.ORG讨论区

计算机科学论坛

SOAChina论坛

Blog

开放翻译计划

新浪微博

登录

注册

帮助

>> 本版讨论DOM, SAX, XPath等。

[返回] 中文XML论坛 - 专业的XML技术讨论区 → XML.ORG.CN讨论区 - XML技术 → 『 DOM/SAX/XPath 』 → asp 与 dom 的沟通问题

◇查看新帖 ◇ 用户列表 ◇

发表一个新主题

发表一个新投票

回复主题

(订阅本版)

您是本帖的第 33330 个阅读者　　

　

*	贴子主题： asp 与 dom 的沟通问题	举报打印推荐 IE收藏夹
	本主题类别:

acjie

帅哥哟，离线，有人找我吗？

  等级：大一新生
  文章：6
  积分：63
  门派：XML.ORG.CN
  注册：2004/3/25

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	楼主

asp 与 dom 的沟通问题

想通过vb6建立dom对象去读取远程的一个asp文件，asp文件用字符拼接的方法生成xml文档再返回给本地
但是DOMDocument  的 load 方法只支持读本地文件，后来查阅资料得知需要XMLHTTP方法的配合。但不知具体怎么做。
谁有经验，请告知

   收藏   分享
顶(0)

2004/3/25 13:43:00

xgy2000

帅哥哟，离线，有人找我吗？

  头衔：我爱木栅
  等级：大一(高数修炼中)
  文章：47
  积分：173
  门派：XML.ORG.CN
  注册：2004/3/18

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第2楼

xmlSourceDOM.loadXML (xmlHttp.responseXML.xml)

2004/3/25 15:37:00

人间流星

帅哥哟，离线，有人找我吗？

  等级：大一新生
  文章：14
  积分：74
  门派：XML.ORG.CN
  注册：2004/3/23

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第3楼

这样怎么填写地址啊？
----------------------------------------------
欢迎来我的网站逛逛 http://www.tinyu.com

2004/3/25 15:52:00

acjie

帅哥哟，离线，有人找我吗？

  等级：大一新生
  文章：6
  积分：63
  门派：XML.ORG.CN
  注册：2004/3/25

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第4楼

这样不行
responseXML已经是xmlHttp的属性了，它下面并没有xml这个属性

2004/3/25 16:02:00

xgy2000

帅哥哟，离线，有人找我吗？

  头衔：我爱木栅
  等级：大一(高数修炼中)
  文章：47
  积分：173
  门派：XML.ORG.CN
  注册：2004/3/18

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第5楼

可以的,我试过了

2004/3/25 18:07:00

帅哥哟，离线，有人找我吗？

  威望：6
  头衔：大法師
  等级：大二期末(Java考了96分!)
  文章：353
  积分：958
  门派：XML.ORG.CN
  注册：2003/12/19

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第6楼

作个实例出来可能会明白点.呵..
----------------------------------------------
本人只會一點點XML.
和ASP.以及FLASH.其它都不太懂.
大家多多指教.

2004/3/25 21:41:00

xgy2000

帅哥哟，离线，有人找我吗？

  头衔：我爱木栅
  等级：大一(高数修炼中)
  文章：47
  积分：173
  门派：XML.ORG.CN
  注册：2004/3/18

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第7楼

我想建一个asp&xml板块,希望大家去支持.
Dim strHtml 'As String
Dim strSourceFile' As String
Dim strStyleFile 'As String
Dim xmlSourceDOM 'As MSXML2.DOMDocument30
Dim xmlStyleDOM 'As MSXML2.DOMDocument30
Dim xmlHttp 'As MSXML2.XMLHTTP30

strSourceFile = "http://192.168.0.11/xml/Exam42.asp"
strStyleFile = "http://192.168.0.11/xml/exam6.xsl"
Set xmlHttp = CreateObject("Msxml2.XMLHTTP")
xmlHttp.Open "GET", strSourceFile, False
xmlHttp.send
Set xmlSourceDOM = CreateObject("Microsoft.XMLDOM")
xmlSourceDOM.async = False
xmlSourceDOM.loadXML (xmlHttp.responseXML.xml)
Set xmlHttp = Nothing
Set xmlStyleDOM = CreateObject("Microsoft.XMLDOM")
xmlStyleDOM.async = False
xmlStyleDOM.setProperty "ServerHTTPRequest",true
xmlStyleDOM.Load (strStyleFile)
strHtml = xmlSourceDOM.transformNode(xmlStyleDOM)
Response.Write strHtml
Set xmlSourceDOM = Nothing
Set xmlStyleDOM = Nothing

2004/3/26 9:14:00

acjie

帅哥哟，离线，有人找我吗？

  等级：大一新生
  文章：6
  积分：63
  门派：XML.ORG.CN
  注册：2004/3/25

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第8楼

试过了，还是不行
xgy2000 你好
我的目的不是想得到格式化后的HTML文件
我是想通过在远程放一个asp文件，让它读取远程本机的sql 数据库，之后返回XML文件。
本地通过一个VB程序定时读取这个ASP文件并用DOM将返回来的xml内容里的数据取放置于本地数据库，以实现数据库的定时同步。（不直接连接远程数据库是因为，远程数据库在firewall后面）
所以才会想到这个法子
我用vb6 + asp 写了一段测试代码。
用你特别提示的
xmlHttp.responseXML.xml
不过程序还是无法正常运行
我把我的测试代码打包，各位有兴趣的帮我一起解决一下。
3q all
各位谁有xmlhttp对象的参考也请发一给我

同时也将代码贴出来，方便讨论
test.xml
<?xml version="1.0" encoding="gb2312"?>
<people>
<user>
  <name>test1</name>

</user>
<user>
  <name>test2</name>

</user>
</people>

主窗体
Private Sub Form_Load()
    Dim objDOM As New DOMDocument
    Dim objHTTP As New XMLHTTP
    Dim objNodeList As IXMLDOMNodeList



    objHTTP.open "GET", "http://127.0.0.1/test.asp", False
    objHTTP.send


    objDOM.async = False
    objDOM.loadXML (objHTTP.responseXML.xml)

    'Text1 = objDOM.xml


    Set objNodeList = objDOM.getElementsByTagName("people")


    Text1 = objNodeList(0).xml
End Sub

2004/3/26 10:11:00

xgy2000

帅哥哟，离线，有人找我吗？

  头衔：我爱木栅
  等级：大一(高数修炼中)
  文章：47
  积分：173
  门派：XML.ORG.CN
  注册：2004/3/18

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第9楼

原理一样
dim objXMLDoc
dim objXMLHttp
dim objRoot
dim nPKID
dim strFromUser
dim strInfoTitle
dim dateCreateTime
dim strHtml
dim strUserName
dim strSourceFile
dim i
strUserName = session("FullName")
strHtml = ""
strSourceFile = "http://192.168.0.11/S9Message/Information/InformationContent.asp?UserName=" + strUserName
set objXMLHttp =Createobject("Msxml2.XMLHTTP")
objXMLHttp.open "GET",strSourceFile, false
objXMLHttp.send()
set objXMLDoc = CreateObject("MSXML2.DOMDocument")
objXMLDoc.async = false
objXMLDoc.loadXML(objXMLHttp.responseXML.xml)
set objXMLHttp= nothing
set objRoot = objXMLDoc.documentElement
for i = 0 to (objRoot.ChildNodes.length-1)
nPKID         = objRoot.ChildNodes(i).ChildNodes(0).text
strFromUser   = objRoot.ChildNodes(i).ChildNodes(1).text
strInfoTitle  = objRoot.ChildNodes(i).ChildNodes(3).text
dateCreateTime= objRoot.ChildNodes(i).ChildNodes(5).text
next

2004/3/26 10:26:00

acjie

帅哥哟，离线，有人找我吗？

  等级：大一新生
  文章：6
  积分：63
  门派：XML.ORG.CN
  注册：2004/3/25

姓名：(无权查看)
城市：(无权查看)
院校：(无权查看)

	第10楼

我明白你的意思，不过我在vb6里一直提示
实时错误'91':
对象变量或With块变量未设置
如果objHTTP.responseXML.xml 可行的话返回的应该是一段xml文本
但我将它显示到文本框中，却是没有内容的。
这点我就是觉得比较奇怪
我用
objHTTP.responseText 可以返回xml的内容。
但是上面那个'91'的问题还是一样会发生。
DOM树还是没有正确建立起来

2004/3/26 10:55:00

GoogleAdSense

  等级：大一新生
  文章：1
  积分：50
  门派：无门无派
  院校：未填写
  注册：2007-01-01

	广告

2024/4/20 0:08:12

本主题贴数15，分页： [1] [2]

管理选项：修改tag | 锁定 | 解锁 | 提升 | 删除 | 移动 | 固顶 | 总固顶 | 奖励 | 惩罚 | 发布公告


	W 3 C h i n a ( since 2003 ) 旗下站点苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》	156.006ms