XMLDOM, wap emulator

[BERK]

<%	Set objWML = Server.CreateObject("Microsoft.XMLDOM")
	Set objXSL = Server.CreateObject("Microsoft.XMLDOM")
	
	objWML.Async = False
	objWML.Load(sURL) 'Loads the WML document
	
	objXSL.Async = False
	objXSL.ValidateonParse = False
	objXSL.Load(Server.MapPath("wml.xsl")) 'Loads the WML XSL.
	
	'Goes through the cards in the WML deck and picks out the
	'first (default) card if none has been specified.
	Set objCards = objWML.documentElement.childNodes  
	For i = 0 To objCards.Length - 1
		If (Len(sCardName) = 0 And i = 0) Or LCase(sCardName) = _
			LCase(objCards.item(i).attributes.item(0).Text) Then
			Temp = objCards.Item(i).transformNode(objXSL.documentElement)
%>
</FONT>
<BR>
<P ALIGN=CENTER>
	<A HREF="./default.asp"><B>Select a WAP URL</B></A>
</P>
</BODY>
</HTML>

50. Satırda (kırmızı renkle belirtilen)

Microsoft VBScript runtime (0x800A01A8)
Object required: 'documentElement'
/deneme/default.asp, line 50

hatası veriyor, sorun????

Kodları http://www.4guysfromrolla.com/webtech/041200-1.shtml den aldım.

[p4r4h4t]

Set objCards = objWML.documentElement.childNodes

yerine

Set objCards = objWML.childNodes

$unu denesen

[BERK]

ilk denediğim oydu Parahat zaten ama nafile