--- title: "Problem med regexp!" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/95156-problem-med-regexp" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "M.Cheraghi" published: "2004-01-18T18:42:36.000Z" updated: "2004-01-18T21:11:04.000Z" replies: 12 views: 457 page: 1 pages: 1 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/95156-problem-med-regexp" --- # Problem med regexp! ## #1 — M.Cheraghi, 2004-01-18T18:42Z har lite knas! detta är allt jag har i mitt ASP dokument.. ``` <% sText = "Hejsan detta är en text som skall formateras till bilder" Function Smileys(sText) sText = Server.HtmlEncode(sText) sText = Replace(sText," a","") sText = Replace(sText," b","") sText = Replace(sText," c","") sText = Replace(sText," d","") sText = Replace(sText," e","") sText = Replace(sText," f","") sText = Replace(sText," g","") sText = Replace(sText," h","") sText = Replace(sText," i","") sText = Replace(sText," j","") sText = Replace(sText," k","") sText = Replace(sText," l","") response.write sText End Function %> ``` Jag får inget felmedelande. utan jag får bara upp en blank sida! =/ det är något som jag har missat.. men frågan är vad :) Permalänk: https://www.webforum.nu/p/95156 ## #2 — solbulle, 2004-01-18T18:49Z ``` <% sText = "Hejsan detta är en text som skall formateras till bilder" response.write Smileys(sText) Function Smileys(sText) sText = Server.HtmlEncode(sText) sText = Replace(sText," a","") sText = Replace(sText," b","") sText = Replace(sText," c","") sText = Replace(sText," d","") sText = Replace(sText," e","") sText = Replace(sText," f","") sText = Replace(sText," g","") sText = Replace(sText," h","") sText = Replace(sText," i","") sText = Replace(sText," j","") sText = Replace(sText," k","") sText = Replace(sText," l","") Smileys = sText End Function %> ``` Du kallar bla annat inte på funktionen. Permalänk: https://www.webforum.nu/p/1254372 ## #3 — M.Cheraghi, 2004-01-18T18:57Z Tack! det hjälpte! Fast inte fullt ut! alla bokstäver formaterades inte =/ Var typ bara 4st i hela texten som gjorde det =/ även fast jag har regexpat för hela alfabetet! (bara redigerat i inlägget så det inte tar så mkt plats) Permalänk: https://www.webforum.nu/p/1254376 ## #4 — solbulle, 2004-01-18T19:04Z Eftersom att du har ett mellanslag innan bokstaven så blir det bara just den kombinationen som byts ut. Radera mellanslaget om alla tecken ska gås igenom. red./ fast det där kommer inte att fungera... du kommer ju även att byta ut alla tecken i din html-kod - bilden du vill sätta in. Permalänk: https://www.webforum.nu/p/1254378 ## #5 — M.Cheraghi, 2004-01-18T19:05Z får jag upp en massa html kod i webläsaren samt att det är kryss på bilderna och webläsaren hänger sig =P du förstår inte den lilla texten genererar ganska mycket i webläsaren när jag tar bort mellanslaget =) hehe blev rädd när jag såg resultatet! :D Permalänk: https://www.webforum.nu/p/1254381 ## #6 — @nders, 2004-01-18T19:37Z Bara jag som inte ser något som har med regexp att göra? Permalänk: https://www.webforum.nu/p/1254402 ## #7 — LarsG, 2004-01-18T19:38Z Vad händer.? När du byter ut a mot din sträng med IMG så kommer nästa replace att byta ut delar av filnamnet . Du får byta tecken för tecken. ``` response.write smileys("Hej detta är en text som jag vill konvertera till bilder") function smileys(sText) if len(sText) > 0 then if lcase(left(sText,1)) >= "a" and left(sText,1) <= "z" then smileys = """" & smileys(mid(sText,2)) else smileys = left(sText,1) & smileys(mid(sText,2)) end if end if end function ``` Permalänk: https://www.webforum.nu/p/1254403 ## #8 — M.Cheraghi, 2004-01-18T19:38Z > **@nders skrev:** > > Bara jag som inte ser något som har med regexp att göra? :r replace då! Är du nöjd då? :) Permalänk: https://www.webforum.nu/p/1254404 ## #9 — voigtann1, 2004-01-18T19:41Z ``` Function Smileys(f2) Set objRegExp = New regexp objRegExp.Global = true objRegExp.Pattern = " ([a-z])" f2 = objRegExp.Replace(f2,"$1") objRegExp.Pattern = " ([A-Z])" f2 = objRegExp.Replace(f2,"$1") objRegExp.Pattern = " ([0-9])" f2 = objRegExp.Replace(f2,"$1") Smileys = f2 End Function ``` lite mindre kod? .red. Obs... du skulle ha ett " " i det... Permalänk: https://www.webforum.nu/p/1254405 ## #10 — M.Cheraghi, 2004-01-18T19:41Z LarsG: det börjar närmar sig! det enda är att den skriver ut all HTML kod på sidan nu! så resultatet blir följande! (tagit bort lite, för att inte spamma sönder med onödigt sskräp som e jobbigt att scrolla) > \"\"\" \"\ Permalänk: https://www.webforum.nu/p/1254406 ## #11 — M.Cheraghi, 2004-01-18T19:46Z ``` <% response.write smileys("Hej detta är en text som jag vill konvertera till bilder") function smileys(sText) if len(sText) > 0 then if lcase(left(sText,1)) >= "a" and left(sText,1) <= "z" then smileys = "" & smileys(mid(sText,2)) else smileys = left(sText,1) & smileys(mid(sText,2)) end if end if end function %> ``` Den fungerar bra! sen vill jag att den även skall formatera 1-9 å = ae.gif ä = aee.gif ö = oe.gif ? = fragetecken.gif ! = utropstecken.gif vilket LarsG's inte gör. utan bara a-z! hur går man tillväga då? då Larsas kod var lite för invecklad jämnfört med vad jag är van vid! :) Permalänk: https://www.webforum.nu/p/1254407 ## #12 — LarsG, 2004-01-18T21:02Z Du får lägga till några elseif för övriga tecken ``` elseif left(sText,1) = 'Å' or left(sText,1) = 'å' then smileyes "IMG=SRC=""bilder/alfabetet/ae.gif"">" & smileys(mid(sText,2)) 'etc ``` 0-9 kan du ju hantera i den första if-grenen Permalänk: https://www.webforum.nu/p/1254442 ## #13 — M.Cheraghi, 2004-01-18T21:11Z > **LarsG skrev:** > > Du får lägga till några elseif för övriga tecken > > > > ``` > elseif left(sText,1) = 'Å' or left(sText,1) = 'å' then > smileyes "IMG=SRC=""bilder/alfabetet/ae.gif"">" & s(mid(sText,2)) > 'etc > ``` > > > > 0-9 kan du ju hantera i den första if-grenen Okej! :) Tack så mycket för hjälpen allihoppa! svårt beslut vilken av kodsnuttarna som är rätt! Men det blir Larsas som hjälpte mig i detta fall! :) Permalänk: https://www.webforum.nu/p/1254444 --- Tråden på webben: https://www.webforum.nu/amne/asp/95156-problem-med-regexp