Visual Basic - alguien me puede ayudar???

FIJATE MAS ABAJO DONDE FALLA Y SI SABES COMO SE HACE TE AGRADECERÉ MUCHO QUE ME AYUDES.

Set xmlDoc = CreateObject("MSXML2.DOMDocument")
xmlDoc.async = False
'***Cargo un string con formato XML en un objeto DOM
If Not xmlDoc.loadXML(pXML) Then
MsgBox ("ERROR cargando XML:")
Else
Set ObjXsl = CreateObject("MSXML2.DOMDocument")
ObjXsl.async = False
'***Cargo un string con formato XSL en un objeto DOM

'***AQUI FALLA. ¿ALGUIEN SABE COMO HAY QUE HACERLO?
If Not ObjXsl.Load("myFicheroXsl.xsl") Then

MsgBox ("ERROR cargando XSL:")
Else
'*** Se combina el objeto XML con el XSL
MsgBox (xmlDoc.transformNode(ObjXsl))
End If

GRACIAS.

1.- ¿ El error no es porque no consigue el archivo myficheroxsl.xsl ?
prueba cambiando
If Not ObjXsl.Load("myFicheroXsl.xsl") Then
por
texto=app.path+"\myFicheroXsl.xsl"
If Not ObjXsl.Load(texto) Then

P.D: Si te parece muy sonsa la respuesta, a veces lo que tienes en la punta de la nariz sólo lo ve aquel que tienes al frente.. J2ML

Perfecto, asi funciona sin problemas. Muchas Gracias.

Vamos a urgar un poco, resulta, que cuando yo hacía esto en ASP, yo trataba los datos del XML metiendo código Javascript en el XSL, ahora que lo estoy haciendo en Visual Basic no se como obtener los datos, es decir, yo hago el transformNode, pero me quedo como estoy, porque antes guardaba los valores en JS pero desde VB no se acceder a ellos.

No se si me he explicado, en cualquier caso muchas gracias.
;D avid.