--- title: "[b][/b][i][/i] hurdå?" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/92015-b-b-i-i-hurdå" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "M.Cheraghi" published: "2003-12-06T16:27:45.000Z" updated: "2003-12-12T19:36:01.000Z" replies: 29 views: 1010 page: 1 pages: 2 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/92015-b-b-i-i-hurdå" --- # [b][/b][i][/i] hurdå? _Sida 1 av 2._ ## #1 — M.Cheraghi, 2003-12-06T16:27Z Tjenna jag håller på att bygga en sida o varje person har en profil!... men som sagt.. jag vill av naturliga skäl INTE tillåta plain html! och om man totalt förbjuder det blire så jävla tråkigt.. trista profiler.. d tänkte jag att här på webforum kan man juhe använda sej av \[b \]\[/b \] och typ \[/color \] okej okej självaste grejjen att byta ut **mot \ i asp e inte svrt... men hur gör man för at få en sådan perfekt kod? så att om man skriver så här och inte avslutar taggen \[b \] Hej Hej så blir utskriften "\[b \] Hej Hej" medans om man skriver \[B \] Hej Hej \[/B \] så blir utskriften "Hej Hej" i tjocka bokstäver =)** Permalänk: https://www.webforum.nu/p/92015 ## #2 — Sebbe, 2003-12-06T16:30Z ``` Set RegExp = New Regexp With RegExp .IgnoreCase = True .Global = True .Pattern = "\[b\]((.|\s)*)\[/b\]" End With strFoo = RegExp.Replace(strFoo, "$1") Set RegExp = Nothing ``` Kolla igenom Vide's Regular Expressions-artikel på :) Permalänk: https://www.webforum.nu/p/1221596 ## #3 — Cannabis_Tomten, 2003-12-06T16:37Z Tacar Tackar =) Permalänk: https://www.webforum.nu/p/1221600 ## #4 — Cannabis_Tomten, 2003-12-07T11:59Z > **Sebbe skrev:** > > ``` > Set RegExp = New Regexp > > With RegExp > .IgnoreCase = True > .Global = True > .Pattern = "\[b\]((.|\s)*)\[/b\]" > End With > > strFoo = RegExp.Replace(strFoo, "$1") > Set RegExp = Nothing > ``` > > > Kolla igenom Vide's Regular Expressions-artikel på :) Okej.. läst igenom vide's sidan nu.. men satan vad svårt det verkade..!! Låt oss säga att man göra om koden du postade.. till att. om man har hej hej \[/color \] så blir den blåå lixom =) Permalänk: https://www.webforum.nu/p/1221832 ## #5 — Erik Juhlin, 2003-12-07T12:08Z RegExp är ganska enkelt när man lärt sig syntaxen... Så här skulle du väl kunna skriva... ``` Set RegExp = New Regexp With RegExp .IgnoreCase = True .Global = True .Pattern = "\[color=""(.*?)""\]([\s\S]*)\[/color\]" strFoo = .Replace(strFoo, "$2") End With Set RegExp = Nothing ``` Permalänk: https://www.webforum.nu/p/1221835 ## #6 — voigtann1, 2003-12-07T13:39Z > **Sebbe skrev:** > > ``` > Set RegExp = New Regexp > > With RegExp > .IgnoreCase = True > .Global = True > .Pattern = "\[b\]((.|\s)*)\[/b\]" > End With > > strFoo = RegExp.Replace(strFoo, "$1") > Set RegExp = Nothing > ``` > > > Kolla igenom Vide's Regular Expressions-artikel på :) jag hade kanske gjort så här: ``` Set RegExp = New Regexp With RegExp .IgnoreCase = True .Global = True .Pattern = "\[(b|i|u)\]((.|\s)*)\[\/(b|i|u)\]" End With strFoo = RegExp.Replace(strFoo, "<$1>$2") Set RegExp = Nothing ``` fast koden blir då inte 100% för då räcker det att man skriver *hej och då kör koden ändå* Permalänk: https://www.webforum.nu/p/1221865 ## #7 — Cannabis_Tomten, 2003-12-07T13:49Z Okej. men sannorlikheten är juhe inte allt för stor att folk skriver fel :P hehe Men om man nu skapar ett Text fält och skriver i fältet "Hejsan Svejsan, mitt namn är \[b \]Nils Karlsson Pyssling\[/b \]" så kommer Nils Karlsson Pyssling bli "Boldat" medans resten är normalt som förut! och allting finns i variabeln STRFOO, som jag använder när t.ex databasen skall uppdateras med nya värdena! men jag har inte kommit i underfund med vartifrån värderna skall komma? finns juhe ingen request.form eller nått liknande MVH sen tänkte jag om man skapar flera regexp som i tur o ordning redigerar texten, t.ex första fixar Bold, den andra Italic, Den tredje under struket, den fjärde färgen, eller liknande.. altså när den första STRFOO e klar hämtar andra reg exp, den redigerade STRFOO o formaterar om den fast formaterar om nya saker.. borde väl teoretiskt sätt fungera =) Permalänk: https://www.webforum.nu/p/1221872 ## #8 — Engine^, 2003-12-08T08:42Z Jupp... du kan ju skapa en funktion som tar ett mönster, utbytessträng och lite text som argument och returnerar en sträng. ``` Function ReplaceTags(strPattern, strReplace, strSource) Dim objRX objRX = New RegExp objRX.IgnoreCase = True objRX.Global = True objRX.Pattern = strPattern ReplaceTags = objRX.Replace(strSource, strReplace) End Function strText = "Hej, jag är [i]kursiverad[/i]. Och en smula [b]tjock[/b]." strText = ReplaceTags("\[b\]((.|\s)*)\[/b\]", "$1", strText) strText = ReplaceTags("\[i\]((.|\s)*)\[/i\]", "$1", strText) Response.Write strText ``` Permalänk: https://www.webforum.nu/p/1222188 ## #9 — Cannabis_Tomten, 2003-12-08T16:07Z > **Engine^ skrev:** > > Jupp... du kan ju skapa en funktion som tar ett mönster, utbytessträng och lite text som argument och returnerar en sträng. > > ``` > Function ReplaceTags(strPattern, strReplace, strSource) > Dim objRX > objRX = New RegExp > objRX.IgnoreCase = True > objRX.Global = True > objRX.Pattern = strPattern > > ReplaceTags = objRX.Replace(strSource, strReplace) > End Function > > strText = "Hej, jag är [i]kursiverad[/i]. Och en smula [b]tjock[/b]." > > strText = ReplaceTags("\[b\]((.|\s)*)\[/b\]", "$1", strText) > strText = ReplaceTags("\[i\]((.|\s)*)\[/i\]", "$1", strText) > > Response.Write strText > ``` Okej okej d var nått i den stilen jag menade.. Sorry att jag frågar en massa utan att testa själv.. men jag har inte riktigt fått igång min test server så jag kan testa allt grejjerna hopppas ni visa hänsyn till det =P hehe men nu till grejjer igen.. då skall altså denna kod fungera bra? ``` Function ReplaceTags(strPattern, strReplace, strSource) Dim objRX objRX = New RegExp objRX.IgnoreCase = True objRX.Global = True objRX.Pattern = strPattern ReplaceTags = objRX.Replace(strSource, strReplace) End Function strText = "Hej, jag är [i]kursiverad[/i]. Och en smula [b]tjock[/b]." strText = ReplaceTags("\[b\]((.|\s)*)\[/b\]", "$1", strText) strText = ReplaceTags("\[i\]((.|\s)*)\[/i\]", "$1", strText) strText = ReplaceTags("\[u\]((.|\s)*)\[/u\]", "$1", strText) strText = ReplaceTags("\[blue\]((.|\s)*)\[/blue\]", "$1", strText) Response.Write strText ``` eller är jag heeeeeeeelt ute och cyklar? Permalänk: https://www.webforum.nu/p/1222447 ## #10 — Cannabis_Tomten, 2003-12-08T17:57Z > Feltyp: > Körningsfel i Microsoft VBScript (0x800A01B6) > Objektet stöder inte egenskapen eller metoden. > /test.asp, line 4 okej nu har jag instalerat IIS på min privaa dator... trots allt :S men men får felmess när jag kör koden ovan och rad fyra är "objRX = New RegExp" nått man måste tänka på eller? några rättigheter eller nått sånt? Permalänk: https://www.webforum.nu/p/1222514 ## #11 — Engine^, 2003-12-08T20:44Z Det kan vara så att du har en för gammal scriptengine... Sök lite här på wF eller på MSDN, så kan du nog hitta en länk för att ta hem dem senaste. Permalänk: https://www.webforum.nu/p/1222626 ## #12 — Cannabis_Tomten, 2003-12-08T20:47Z > **Engine^ skrev:** > > Det kan vara så att du har en för gammal scriptengine... Sök lite här på wF eller på MSDN, så kan du nog hitta en länk för att ta hem dem senaste. okej okej ska göra det.. har WinXP pro med IIS5/6 eller vad fan man får med =) hehe =) jaja men jag ska kolla upp det där.. men altså om jag kör Chilisoft ASP? på Apache? kommer då inte regexp att fungera?? Permalänk: https://www.webforum.nu/p/1222629 ## #13 — Engine^, 2003-12-08T20:50Z Tja du behöver version 5.0 för att kunna använda RegExp. Du kan kolla din version med ``` Response.Write ScriptEngineMajorVersion & "." & ScriptEngineMinorVersion ``` Permalänk: https://www.webforum.nu/p/1222634 ## #14 — Cannabis_Tomten, 2003-12-08T21:00Z okej jag har 5,6 står det! å jag får felet objektet stöds inte =/ Permalänk: https://www.webforum.nu/p/1222643 ## #15 — Sebbe, 2003-12-08T21:02Z ``` [b]Set[/b] objRX = New RegExp ``` Permalänk: https://www.webforum.nu/p/1222646 ## #16 — Engine^, 2003-12-08T21:03Z Hrrrrmm... det kan vara så att det är \*host host\* jag som har missat en liten liten sak... ``` Set objRX = New RegExp ``` **red.** Rackarns **Sebbe** till att vara snabb då... :) Permalänk: https://www.webforum.nu/p/1222647 ## #17 — Cannabis_Tomten, 2003-12-08T21:05Z > **Engine^ skrev:** > > Hrrrrmm... det kan vara så att det är \*host host\* jag som har missat en liten liten sak... > > ``` > Set objRX = New RegExp > ``` > > **red.** > Rackarns **Sebbe** till att vara snabb då... :) Vet du en sak :P det var du som hade gjort en miss för det fungerar alldeles utmärkt.. men en fråga till om jag gkör windows 2000, med apache och chilisoft asp... kommer regexp att fungera??? Permalänk: https://www.webforum.nu/p/1222648 ## #18 — Cannabis_Tomten, 2003-12-09T20:06Z Hallojsan.. går lite knas för mej just nu! jag moddar o joxar o jag har inte en blekaste om vad jag pillar på känns det som.. men jag försöker knåpa in "color" funktionen som Erik postade först, in i den kod snutten som Engine^ gjorde, å det går inte bra alls =/ hehe ``` <% Function ReplaceTags(strPattern, strReplace, strSource) Dim objRX Set objRX = New RegExp objRX.IgnoreCase = True objRX.Global = True objRX.Pattern = strPattern ReplaceTags = objRX.Replace(strSource, strReplace) End Function strText = "Hej, jag är [i]kursiverad[/i] Och en smula [b]tjock[/b] och lite lite [u]understruken[/u] och lite [color="red"]blå[/color]" strText = ReplaceTags("\[b\]((.|\s)*)\[/b\]", "$1", strText) strText = ReplaceTags("\[i\]((.|\s)*)\[/i\]", "$1", strText) strText = ReplaceTags("\[u\]((.|\s)*)\[/u\]", "$1", strText) [b]strText = ReplaceTags("\[color=""(.*?)""\]([\s\S]*)\[/color\]", "$2", strText)[/b] Response.Write strText %> får detta felmedelande [citat] Feltyp: Kompileringsfel i Microsoft VBScript (0x800A0401) Slut på programsats förväntas. /test.asp, line 12, column 118 [/citat] ``` Permalänk: https://www.webforum.nu/p/1223158 ## #19 — Cannabis_Tomten, 2003-12-09T20:16Z Men nej.. detta finns inte :( hehe i flera timmar har jag testat fram å tillbaka.. å nu hittade jag felet.. ``` strText = "Hej, jag är kursiverad Och en smula tjock och lite lite understruken och lite [color="red"]blå[/color]" ``` eftersom d där är en del av ASP kod ska "RED" vara Dubbeltaggat.. hehe. jaaajaa.. lyckades lösa någonting är i världen själv iaf =) Permalänk: https://www.webforum.nu/p/1223164 ## #20 — Engine^, 2003-12-09T20:40Z Hehe... grattis ;) :bire Permalänk: https://www.webforum.nu/p/1223180 --- Tråden på webben: https://www.webforum.nu/amne/asp/92015-b-b-i-i-hurdå Nästa sida: https://www.webforum.nu/amne/asp/92015-b-b-i-i-hurdå/page2.md