CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

netrnger Nybegynder

20. juli 2001 - 10:57 Der er 13 kommentarer og
1 løsning

Bevare oprindelig case i en replace (måske regulær udtryk?)

Jeg skal bruge en funktion der kan highlighte nogle ord i en tekststreng, og når man søger skal den være ligeglad med store og små bogstaver. Dette er nu nemt nok at lave, og det har jeg løst på flg. måde:

streng = \"Her var Erik\"
soeg = \"er\"
response.write replace(streng,soeg,\"\" & soeg & \"\",1,-1,1)

Dette vil udskrive \"Her var erik\", hvilket resulterer i at Erik kommer til at stå med lille \"e\" fordi det var det man søgte på.
Jeg vil gerne benytte den case der er brugt i den originale streng, så slutsætningen jeg får bliver til \"Her var Erik\".

Kan dette lade sig gøre? Jeg har en formodning om at det kan laves med noget regulær udtryk, men det fatter jeg nada af. Men det kan jo også være der er andre smarte løsninger - håber i kan hjælpe...

Synes godt om

dodger Nybegynder

20. juli 2001 - 14:31 #1

Du kunne tage at gøre således...

streng = \"Her var Erik\"
streng = replace(streng,\"er\",\"\" & soeg & \"\",1,-1,0)
streng = replace(streng,\"Er\",\"\" & soeg & \"\",1,-1,0)
streng = replace(streng,\"eR\",\"\" & soeg & \"\",1,-1,0)
streng = replace(streng,\"ER\",\"\" & soeg & \"\",1,-1,0)
response.write streng

Lidt groft, men det burde virke...

Synes godt om

dodger Nybegynder

20. juli 2001 - 14:33 #2

men hvis du har lange variable søge ord, så er det nok ikke løsningen... :o)

Synes godt om

netrnger Nybegynder

20. juli 2001 - 14:43 #3

ja det er jo meningen at søgestrengen er variabel, det er jo mest normalt når man har søgefelter... så nej, den løsning holder ikke. ordet \"er\" er jo bare for illustrere problemet...

Synes godt om

dodger Nybegynder

20. juli 2001 - 14:44 #4

Ellers må du gøre sådan her...

streng = \"Her var Erik\"
soeg = \"er\"
pos = inStr(streng, soeg, 1)
while pos > 0
res = left(streng, pos) & \" & mid(streng, pos, len(soeg)) & \"\"
streng = rigth(streng, pos + len(soeg))
pos = inStr(streng, soeg, 1)
wend
response.write res

Jeg har ikke testet det, men noget i den stil burde virke...

Synes godt om

Slettet bruger

20. juli 2001 - 14:45 #5

lytter med

Synes godt om

dodger Nybegynder

20. juli 2001 - 14:50 #6

rettet en smule:...

streng = \"Her var Erik\"
soeg = \"er\"
pos = inStr(streng, soeg, 1)
res = \"\"
while pos > 0
res = res & left(streng, pos) & \" & mid(streng, pos, len(soeg)) & \"\"
streng = rigth(streng, pos + len(soeg))
pos = inStr(streng, soeg, 1)
wend
res = res & streng
response.write res

Synes godt om

netrnger Nybegynder

20. juli 2001 - 15:12 #7

Jeg tror nok lige du skal teste lidt mere.
InStr kalder du forkert - det skal være inStr(1, streng, soeg), og resultatet der kommer ud af det hele, ligner _slet_ ikke den originale sætning:

HeerErik

Synes godt om

dodger Nybegynder

20. juli 2001 - 15:32 #8

Det er valgfrit om man vil have start position på InStr som første parameter.
Og hvis du gerne vil have det kan jeg godt teste den igennem...

Synes godt om

dodger Nybegynder

20. juli 2001 - 15:41 #9

Her er den (testet):

streng = \"Her var Erik\"
soeg = \"er\"
pos = inStr(1, streng, soeg, 1)
res = \"\"
while pos > 0
res = res & left(streng, pos-1) & \"\" & mid(streng, pos, len(soeg)) & \"\"
streng = right(streng, len(streng) - pos-1)
pos = inStr(1, streng, soeg, 1)
wend
res = res & streng
response.write res

Synes godt om

dodger Nybegynder

20. juli 2001 - 16:10 #10

Tjaa... ovenstående virker fint med \"er\", men med andre ord går det galt... Prøv dette i stedet

streng = \"Her var Erik\"
soeg = \"her\"
pos = inStr(1, streng, soeg, 1)
res = \"\"
while pos > 0
res = res & left(streng, pos-1) & \"\" & mid(streng, pos, len(soeg)) & \"\"
streng = right(streng, len(streng) - pos - Len(soeg) +1)
pos = inStr(1, streng, soeg, 1)
wend
res = res & streng
response.write res

Synes godt om

netrnger Nybegynder

23. juli 2001 - 10:07 #11

For fedt...

lidt kryptisk funktion, men den virker, og det er det som giver dig pointene... tak for det :o)

Synes godt om

dodger Nybegynder

23. juli 2001 - 11:24 #12

For en god ordens skyld bør du nok tjekke om len(soeg) > 0 inden du kalder funktionen, da du ellers går i uendelig løkke ... :o) (tror jeg)

Synes godt om

dodger Nybegynder

23. juli 2001 - 11:26 #13

tjaa.. det kommer an på hvad inStr(1,\"Her er Erik\",\"\",1) returnere, men det er nok en god ide at være på den sikre side

Synes godt om

netrnger Nybegynder

24. juli 2001 - 13:33 #14

Ja det har du ret i. Hvis Len(soeg) = 0, så kommer funktionen til at lave monotont fabriksarbejde, så det er en god ide at checke for den, det har du ret i. Takker...

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP	6	09/03/202418:16	10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP	10	15/10/202313:12	18/10/202308:48

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS