ASP.NET Archives -

Activer le chemin parent sur IIS

Active Server Pages (ASP) erreur 'ASP 0131'
Chemin parent non autorisé 
Le fichier Include '../xxxx.asp' ne peut pas contenir '..' pour indiquer le répertoire parent.

Active Server Pages (ASP) erreur 'ASP 0131'

Chemin parent non autorisé

Le fichier Include '../xxxx.asp' ne peut pas contenir '..' pour indiquer le répertoire parent.

Allez dans l’administration IIS
Gestionnaire des services internet (IIS)
Sites => votreSite => section IIS de la page => selectionnez ASP

Option Comportement => Activer les chemins d’accès relatifs au répertoire parent => mettre sur true

Pour visual studio 2019

trouver le dossier caché .vs => votreProjet => dossier config => fichier applicationhost.config

noeud asp ajouter enableParentPaths= »true »

ToList n’est pas un membre de System.array

Asp.net 2
VB.net

« ToList n’est pas un membre de System.array »
« System.Array. does not contain a definition for “ToList” »

Essayez d’ajouter Linq

Imports System.Linq

1	Imports System.Linq

gstatic No ‘Access-Control-Allow-Origin’ header is present on the requested resource

fonts.gstatic

Access to Font at 'http://fonts.gstatic.com/...2' from origin 'http://www....' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource. Origin 'http://www....' is therefore not allowed access.

1	Access to Font at 'http://fonts.gstatic.com/...2' from origin 'http://www....' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource. Origin 'http://www....' is therefore not allowed access.

Dans
<system.webServer>

ajouter

<httpProtocol>
    <customHeaders>
        <add name="Access-Control-Allow-Origin" value="*" />
    </customHeaders>
</httpProtocol>

</customHeaders>

</httpProtocol>

Impossible de supprimer un répertoire virtuel dans visual studio ?

Visual studio 2013

Vous venez de créer un répertoire virtuel mais vous ne pouvez pas le supprimer ?

Vérifiez que vous n’êtes pas en mode debug …. arrêtez le déboggage ^^

web.config allowDefinition=MachineToApplication erreur

La présence d’un web.config dans un sous dossier de votre site provoque une erreur de type allowDefinition=MachineToApplication

Mettez le dossier en question dans un répertoire différent
Dans le gestionnaire des services Internet IIS ajoutez au site un répertoire virtuel
Convertissez ce répertoire virtuel en application pour qu’il prenne en compte le web.config
redemmarez le serveur IIS

Ouvrir automatiquement les pages ASP en mode Source et non Design

Oui on s’en fout un peu du mode Design, on veut voir le code!!!!
ça ne vous fera pas gagner beaucoup de temps mais ça vous soulagera un peu ^^

=> Menu OUTILS
=> Options
=> descendre la liste des paramètres et sélectionner Concepteur HTML puis cocher Démarrer les pages en Mode Source

Elle est pas cool la vie ?

Activer le debogage des pages simples asp sur IIS v.7.5

Pour faire du débogage de pages avec extension .asp sur Visual Studio vous devez configurer le débogage sur IIS (Gestion des services Internet)
Il faut bien évidement que le module ASP soit ajouté à la liste de vos modules
Ensuite sur la page d’accueil IIS selectionnez ASP, il suffit ensuite de sélectionner True aux propriétés de débogage désiré
– Activer le débogage coté client
– Activer le débogage coté serveur
– Envoyer les erreurs au navigateur

screen-2016-11-10-09_05_57

Debug d’une page asp simple en utilisant un objet asp

Debug de pages en extension .asp
liste les variables de session, les cookies, les variables de formulaires (post-get), le temps d’exécustion, les variables personnalisées

Créer un objet debug, nommez le VBScriptDebug.asp

<SCRIPT RUNAT=Server Language=VBScript>

Class clsDebug

Dim blnEnabled
Dim dteRequestTime
Dim dteFinishTime
Dim objStorage

Public Property Get Enabled()
   Enabled = blnEnabled
End Property

Public Property Let Enabled(bNewValue)
   blnEnabled = bNewValue
End Property

Private Sub Class_Initialize()
   dteRequestTime = Now()
   Set objStorage = Server.CreateObject("Scripting.Dictionary")
End Sub

Public Sub Print(label, output)
   If Enabled then
       objStorage.Add label, output
   End if
End Sub

Public Sub [End]()
   dteFinishTime = Now()
   If Enabled then
     PrintSummaryInfo()
     PrintCollection "VARIABLE STORAGE", objStorage
     PrintCollection "QUERYSTRING COLLECTION", Request.QueryString()
     PrintCollection "FORM COLLECTION", Request.Form()
     PrintCollection "COOKIES COLLECTION", Request.Cookies()
     PrintCollection "SESSION CONTENTS COLLECTION", Session.Contents()
     PrintCollection "SERVER VARIABLES COLLECTION", Request.ServerVariables()
     PrintCollection "APPLICATION CONTENTS COLLECTION", Application.Contents()
     PrintCollection "APPLICATION STATICOBJECTS COLLECTION", Application.StaticObjects()
     PrintCollection "SESSION STATICOBJECTS COLLECTION", Session.StaticObjects()
   End if
End Sub

Private Sub PrintSummaryInfo()
   With Response
    .Write("<hr>")
    .Write("<b>SUMMARY INFO</b></br>")
    .Write("Time of Request = " & dteRequestTime) & "<br>"
    .Write("Time Finished = " & dteFinishTime) & "<br>"
    .Write("Elapsed Time = " & DateDiff("s", dteRequestTime, dteFinishTime) & " seconds<br>")
    .Write("Request Type = " & Request.ServerVariables("REQUEST_METHOD") & "<br>")
    .Write("Status Code = " & Response.Status & "<br>")
   End With
End Sub

Private Sub PrintCollection(Byval Name, Byval Collection)
   Dim varItem
   Response.Write("<br><b>" & Name & "</b><br>")
   For Each varItem in Collection
     Response.Write(varItem & "=" & Collection(varItem) & "<br>")
   Next
End Sub

Private Sub Class_Terminate()
   Set objStorage = Nothing
End Sub

End Class

</SCRIPT>

Class clsDebug

Dim blnEnabled

Dim dteRequestTime

Dim dteFinishTime

Dim objStorage

Public Property Get Enabled()

Enabled = blnEnabled

End Property

Public Property Let Enabled(bNewValue)

blnEnabled = bNewValue

End Property

Private Sub Class_Initialize()

dteRequestTime = Now()

Set objStorage = Server.CreateObject("Scripting.Dictionary")

End Sub

Public Sub Print(label, output)

If Enabled then

objStorage.Add label, output

End if

End Sub

Public Sub [End]()

dteFinishTime = Now()

If Enabled then

PrintSummaryInfo()

PrintCollection "VARIABLE STORAGE", objStorage

PrintCollection "QUERYSTRING COLLECTION", Request.QueryString()

PrintCollection "FORM COLLECTION", Request.Form()

PrintCollection "COOKIES COLLECTION", Request.Cookies()

PrintCollection "SESSION CONTENTS COLLECTION", Session.Contents()

PrintCollection "SERVER VARIABLES COLLECTION", Request.ServerVariables()

PrintCollection "APPLICATION CONTENTS COLLECTION", Application.Contents()

PrintCollection "APPLICATION STATICOBJECTS COLLECTION", Application.StaticObjects()

PrintCollection "SESSION STATICOBJECTS COLLECTION", Session.StaticObjects()

End if

End Sub

Private Sub PrintSummaryInfo()

With Response

.Write("<hr>")

.Write("SUMMARY INFO")

.Write("Time of Request = " & dteRequestTime) & " "

.Write("Time Finished = " & dteFinishTime) & " "

.Write("Elapsed Time = " & DateDiff("s", dteRequestTime, dteFinishTime) & " seconds ")

.Write("Request Type = " & Request.ServerVariables("REQUEST_METHOD") & " ")

.Write("Status Code = " & Response.Status & " ")

End With

End Sub

Private Sub PrintCollection(Byval Name, Byval Collection)

Dim varItem

Response.Write(" " & Name & " ")

For Each varItem in Collection

Response.Write(varItem & "=" & Collection(varItem) & " ")

End Sub

Private Sub Class_Terminate()

Set objStorage = Nothing

End Sub

End Class

</SCRIPT>

Dans le code de votre pages faites appel à l’objet

<%@ Language=VBScript %>
<!-- #include file="VBScriptDebug.asp" -->

'votre code .....

'déclaration de l'objet
Dim Debug
'instanciation
Set Debug = new clsDebug
'activation
Debug.Enabled = true

'debug d'une variiable
Debug.Print "du texte", votreVariable

'à mettre à la fin de votre fichier
Debug.End
Set Debug = nothing

<%@ Language=VBScript %>

'votre code .....

'déclaration de l'objet

Dim Debug

'instanciation

Set Debug = new clsDebug

'activation

Debug.Enabled = true

'debug d'une variiable

Debug.Print "du texte", votreVariable

'à mettre à la fin de votre fichier

Debug.End

Set Debug = nothing

source

https://support.microsoft.com/en-us/kb/299986