Bonjour, j'ai proceder a la migration d'un site en asp, d'une machine 2003 server vers une machine de meme configuration
Le site tourne sur le nouveau serveur, mais certaines pages demeurent innaccessible.
Voila l'erreur que j'obtiens :
Voila le code qui englobe la ligne en question
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Objet Server erreur 'ASP 0177 : 800401f3' Échec de Server.CreateObject /LM/W3SVC/2098020990/Root/global.asa, ligne 31 800401f3
Le code ne contien pas d'erreurs car le site tourne sur l'ancien serveur. j'ai pensé que je devais installer vb runtime pour resoudre mon soucis mais rien n'y fait. Je pense avoir mis les bon droits mais je reçois toujours la même erreur.
Code : 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 <SCRIPT LANGUAGE=VBScript RUNAT=Server> Sub Application_OnStart '==Visual InterDev Generated - startspan== '--Project Data Connection Application("ConDechets_ConnectionString") = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Dechets;Data Source=DATASRV2006;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=SURF2026;Use Encryption for Data=False;Tag with column collation when possible=False;" Application("ConDechets_ConnectionTimeout") = 15 Application("ConDechets_CommandTimeout") = 30 Application("ConDechets_CursorLocation") = 3 Application("ConDechets_RuntimeUserName") = "" Application("ConDechets_RuntimePassword") = "" '-- Project Data Environment ligne 31 Set DE = Server.CreateObject("DERuntime.DERuntime") Application("DE") = DE.Load(Server.MapPath("Global.ASA"), "_private/DataEnvironment/DataEnvironment.asa") '==Visual InterDev Generated - endspan== '-- Project Data Environment Set DE = Server.CreateObject("DERuntime.DERuntime") Application("DE") = DE.Load(Server.MapPath("Global.ASA"), "_private/DataEnvironment/DataEnvironment.asa") '==Visual InterDev Generated - endspan== 'DE.Connections(0).ConnectionString=Application("ConDechets_ConnectionString") 'Response.Write DE.Connections(0).ConnectionString End Sub </SCRIPT>
Si quelqu'un connait d'où peut venir cette erreur ?..
merci
@ bientot
Partager