Bonjour, je ne connais rien au VBScript alors j'espère que vous pourrez m'aider (j'ai pas trouvé mon bonheur via google).
J'ai récemment fait migré un site en ASP d'un serveur (win2000) à un autre (win2003), sur le second certaines librairies sont plus récentes (cf. code)
J'ai lorsque que j'essaie d'accéder au site le message d'erreur suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 If MSXML4 Then MSXML_PROGID = "Msxml2.DOMDocument.6.0" MSXML_PROGID2 = "MSXML2.FreeThreadedDOMDocument.6.0" MSXML_PROGID3 = "MSXML2.XSLTemplate.6.0"
J'ai pourtant bien installer le runtime VBscript 5.6 mais soit, cela n'est pas ce qui me gène le plus.Warning : To complete installation, you must install VBScript runtime version 5.6.
msxml6.dll error '80004005'
Error while parsing 'file:///C:/users/MyGolfHome/skins/MyGolf/skin.xsl'. DTD is prohibited.
/Engine/CFullXMLEngine.asp, line 985
Ce problème de DTD me fatigue.
J'ai lu plein de trucs à propos de propriété "ProhibeDTD" mais ça n'a abouttit à rien.
Code de CFullXMLEngine.asp : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29 '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- ' Do the transform with a cache handler for xml and xsl (singleThread) '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Public Function Transform(XMLPath, XSLPath, XSLCacheName, bCache) Dim proc Dim xsl Dim xslTemplate Dim Item Dim oXMLMember 'We put the xsl in cache if necessary, otherwise we just grab a pointer if bCache AND USE_CACHE then if isEmpty(Application(XSLCacheName)) or lenb(oFO.Form("Refresh"))>0 then if not isEmpty(Application(XSLCacheName)) then debug "Empty the xsl cache " & XSLCacheName set xslTemplate = Application(XSLCacheName) set xslTemplate = nothing end if set xslTemplate = cacheXSLTemplate(XSLPath, XSLCacheName) else set xslTemplate = Application(XSLCacheName) end if else set xsl = loadXML(XSLPath) set xslTemplate = server.CreateObject(MSXML_PROGID3) '**************************** la ligne ou se produit l'erreur ********************* set xslTemplate.stylesheet = xsl '*********************************************************************************** end if
Merci pour votre aide.
Partager