IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

ASP Discussion :

Erreur d'exécution Microsoft VBScript error '800a005e'


Sujet :

ASP

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    90
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2008
    Messages : 90
    Par défaut Erreur d'exécution Microsoft VBScript error '800a005e'
    Bonjour,

    J'ai ce code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    <%=Replace(RsAnnuaires("Commentaire"), chr(10), "<br>")%>
    et voici la réponse si le champ commentaire est vide

    Erreur d'exécution Microsoft VBScript error '800a005e'

    Utilisation non autorisée de Null: 'Replace'

    /site/pagesnews/AF.asp, line 72

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    115
    Détails du profil
    Informations personnelles :
    Âge : 35
    Localisation : France, Nord (Nord Pas de Calais)

    Informations forums :
    Inscription : Septembre 2008
    Messages : 115
    Par défaut
    c'est pas plutôt "</br>"?

  3. #3
    Membre Expert
    Avatar de kaiser59
    Homme Profil pro
    Inscrit en
    Novembre 2005
    Messages
    1 264
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations forums :
    Inscription : Novembre 2005
    Messages : 1 264
    Par défaut
    Salut,

    Dans la base les retours à la ligne c'est plutot les vbcrlf donc tu dois avoir :

    Code asp : Sélectionner tout - Visualiser dans une fenêtre à part
    response.write replace(rs("commentaire"),"/vbcrlf", "<br/>")

    voiloù

  4. #4
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    90
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2008
    Messages : 90
    Par défaut
    Re,

    Mon code fonctionne très bien quand le champ "commentaire" contient du texte. Les retours chariots sont bien indiqués. Mais si le champ ne contient pas de texte, j'ai le message site ci-dessus.
    Est-il possible d'utiliser le "Replace" si le champ reste vide.

    A+

  5. #5
    Membre Expert
    Avatar de pc75
    Profil pro
    Inscrit en
    Septembre 2004
    Messages
    3 662
    Détails du profil
    Informations personnelles :
    Âge : 70
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Septembre 2004
    Messages : 3 662
    Par défaut
    Bonjour,

    Tu testes avant si le commentaire est vide :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    <%
    if len(trim(RsAnnuaires("Commentaire"))) > 0 then
       Str_Comment = Replace(RsAnnuaires("Commentaire"), chr(10), "<br>")
    else
       Str_Comment = ""
    end if
    %>

  6. #6
    Membre averti
    Inscrit en
    Août 2006
    Messages
    56
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 56
    Par défaut
    ou

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    <%
    if not isnull(RsAnnuaires("Commentaire")) then
    Replace(RsAnnuaires("Commentaire"), chr(10), "<br>")
    end if
     
    %>

  7. #7
    Membre averti
    Inscrit en
    Août 2006
    Messages
    56
    Détails du profil
    Informations forums :
    Inscription : Août 2006
    Messages : 56
    Par défaut
    Citation Envoyé par cedric/copy Voir le message
    Bonjour,

    J'ai ce code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    <%=Replace(RsAnnuaires("Commentaire"), chr(10), "<br>")%>
    et voici la réponse si le champ commentaire est vide
    En même temps c'est logique que tu as cette erreurs, car il te dit que tu ne peux pas mettre un paramètre vide (le rsAnnuaires("Commentaire")) dans la fonction Replace

    Donc

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
     
    if not isnull(RsAnnuaires("Commentaire")) then
    Ta_Variable=Replace(RsAnnuaires("Commentaire"), chr(10), "<br>")
    else
    Ta_variable=""
    end if
    ensuite tu peux l'utiliser dans ton code html


Discussions similaires

  1. Réponses: 3
    Dernier message: 19/07/2010, 15h35
  2. Erreur d'exécution Microsoft VBScript error '800a000d'
    Par regisyves dans le forum VBScript
    Réponses: 1
    Dernier message: 04/06/2010, 15h00
  3. Réponses: 11
    Dernier message: 08/07/2008, 20h55
  4. Réponses: 2
    Dernier message: 11/04/2007, 15h04
  5. Réponses: 2
    Dernier message: 24/05/2006, 22h57

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo