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)

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 lorsque que j'essaie d'accéder au site le message d'erreur suivant :

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
J'ai pourtant bien installer le runtime VBscript 5.6 mais soit, cela n'est pas ce qui me gène le plus.
Ce problème de DTD me fatigue.

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
J'ai lu plein de trucs à propos de propriété "ProhibeDTD" mais ça n'a abouttit à rien.

Merci pour votre aide.