Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Webprogrammeren & scripting

Eigen smiley script bouwen, dus hulp nodig.

Anoniem
None
10 antwoorden
  • ok mensen here we go…….ik heb dus een website waarvan content voor 95% uit de db komt. nou wil ik met behulp van VBScript functie/method .replace de string :D vervangen met teeth.gif ik heb van alles geprobeerd maar het lukt niet!!!

    de code:(die plaats ik dus binnen asp (VBS code op mn site.)

    Function ReplaceTest(patrn, replStr)
    Dim regEx, str1 ' Create variables.
    str1 = mijnInhoud
    Set regEx = New RegExp ' Create regular expression.
    regEx.Pattern = patrn ' Set pattern.
    regEx.IgnoreCase = True ' Make case insensitive.
    ReplaceTest = regEx.Replace(str1, replStr) ' Make replacement.
    End Function

    document.write(ReplaceTest(":D", "<img src='teeth.gif'>";))

    dan
    response.write mijnInhoud



    bvd dank

    btw ik ben geen programmeur ik ben een lamer newb dus vergeef me mijn foutuh!
  • [quote:82d2ea825b]
    [b:82d2ea825b]Op 04-03-2002 14:54, schreef computernerd:[/b:82d2ea825b]
    btw ik ben geen programmeur ik ben een lamer newb dus vergeef me mijn foutuh!
    [/quote:82d2ea825b]
    Fijn dat het het zelf effe vermeld :grin:

    Er gaan inderdaad een aantal zaken fout in je code. Onderstaande zal al beter moeten werken. (Ik heb wel even de vrijheid genomen om de aanpak van de functie aan te passen)
    [code:1:82d2ea825b]
    <%
    Function ReplaceTest(sReplaceIn, sReplaceThis, sWithThis)
    Dim regEx
    Set regEx = New RegExp
    regEx.Pattern = sReplaceThis
    regEx.IgnoreCase = True
    regEx.Global = True
    sReplaceIn = regEx.Replace(sReplaceIn, sWithThis)
    ReplaceTest = sReplaceIn
    Set regEx = Nothing
    End Function

    sTekst = "in deze tekst staat dus een smilie :grin:"
    sTekst = ReplaceTest(sTekst, ":D", "<img src='teeth.gif'";)
    response.write sTekst
    %>
    [/code:1:82d2ea825b]
    De functie retourneert dus de omgezette string. Deze kan je rechtstreeks wegschrijven met [i:82d2ea825b]response.write ReplaceTest(…)[/i:82d2ea825b] of zoals in het voorbeeld eerst toewijzen aan een variabele.
  • Goed, ik kan me hier natuurlijk ontzettend vergissen, maar vbscript heeft toch standaard een replace functie. Waarom zou je deze herschrijven ?

    [code:1:cf3c02c90a]
    sTekst = "Tekst met smiley :smile:"
    sTekst = Replace(sTekst, ":)", "<Img Src=""smile.gif"">"
    Respone.write(sTekst)
    [/code:1:cf3c02c90a]

    Ik gebruik hetzelfde op mijn site..

    Elja

  • Je hebt helemaal gelijk, Elja. Een simpele string replace is hier beter op z'n plaats (zal ook sneller zijn).

    Maar, ja, dan hebben we ook meteen een werkend voorbeeldje met het reqexp object. :smile:
  • ja weet ik dat vbscript replace functie heeft. alleen was ik dus op microsoft site en daar was een voorbeeld. dus heb ik die gecopieerd :grin:

    btw ik heb dat geprobeerd(alleen replace zonder regExp), maar dat werkte ook al niet!





    Ik gebruik hetzelfde op mijn site..

    lol, bedoel je met smilies of watte? Ik dacht dat ik alleen zo slim was :grin::D:D , damn!!!!

    [ Dit Bericht is bewerkt door: computernerd op 2002-03-05 13:11 ]
  • Ohja, sorry.. heb er wat tikvoutjes in zitten. Zo moet ie wel werken, hem 'm ditmaal getest.

    [code:1:4df9ad1f76]
    <%
    sTekst = "Tekst met smiley :smile:"
    sTekst = Replace(sTekst, ":)", "<Img Src=""smile.gif"">";)
    Response.write(sTekst)
    %>
    [/code:1:4df9ad1f76]

    En dan moet je de smile natuurlijk weer omzetten in de code..

    Elja

    [edit]
    En smileys op een site is natuurlijk niet echt orgineel meer wel vrolijkt de boel wel op he..
    [/edit]

    _________________
    www.mydiary.nl/

    [ Dit Bericht is bewerkt door: Elja Trum op 2002-03-07 09:47 ]
  • <%
    sTekst = "Tekst met smiley "
    sTekst = Replace(sTekst, ":)", "<Img Src=""smile.gif"">";)
    Response.write(sTekst)
    %>

    ok mensen deze werkt maar!!!! ik wou dus meerdere smilies mogelijk maken dus….deed ik dit: (btw elja thanks homie!)

    sTekst = verkrijgStuffUitDeDatabase
    sTekst = Replace(sTekst, ":)", "<Img Src=""smile.gif"">";)
    sTekst = Replace(sTekst, ":D", "<Img Src=""teeth.gif"">";)
    Response.write(sTekst)

    zoals computerminnend nederland ziet (:D) wil ik dus meerder smilies op mn site mogelijk maken maar ik krijg steevasr t eerste smiley afgedrukt en geen tweede (en evt. derde vierde…)

    alé mensen moet ik hier een array van bouwe?
    dus
    myArray = new Array(":D", ":)", ":S";)

    iets in die trand?

    bvd
  • [quote:d6c4f08cf4]
    [b:d6c4f08cf4]Op 07-03-2002 19:38, schreef computernerd o.a.:[/b:d6c4f08cf4]
    …zoals computerminnend nederland ziet (:D) wil ik dus meerder smilies op mn site mogelijk maken maar ik krijg steevasr t eerste smiley afgedrukt en geen tweede (en evt. derde vierde…)

    alé mensen moet ik hier een array van bouwe?
    dus
    myArray = new Array(":D", ":)", ":S";)
    [/quote:d6c4f08cf4]
    Nee, een array is nergens voor nodig. De code die je hier laat zien is overigens helemaal in orde. Dus er moet iets fout zitten in een ander deel van je code (of eventueel in je test-string).

    De enige reden die ik kan bedenken om een array te gebruiken is om bij grote aantallen smilies de code wat korter te krijgen. Maar dan zal je in de array ook de paden naar de smilies op moeten slaan.
  • dus deze code is in orde?:
    sTekst = verkrijgStuffUitDeDatabase
    sTekst = Replace(sTekst, ":)", "<Img Src=""smile.gif"">";)
    sTekst = Replace(sTekst, ":D", "<Img Src=""teeth.gif"">";)
    Response.write(sTekst)

    volgens mij is deze code niet in orde
  • hebbez!!!
    Dim sTekst1, sTekst2
    sTekst1 = Replace(strStory, ":D", "<img src='s/teeth.gif'>";)
    sTekst2 = Replace(sTekst1, ":S", "<img src='s/confused.gif'>";)


    Response.write sTekst2


    lol. :grin::D:D

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.