Avatar billede want2learn Nybegynder
27. april 2004 - 21:30 Der er 5 kommentarer og
1 løsning

Søg efter tegn og skriv de næste 2 ord.

Jeg har en database men et felt som hedder TEXT.

(kaldes med)
strText = objRS("TEXT")

I den har jeg dette tegn # og efter det har jeg så 2 ord.

Hvordan kan jeg søge efter # tegnet eller evt #1 og så udskrive de 2 næste ord !??

og er det muligt at søge efter #1 og når jeg finder det så springe de næste 3 ord over og skrive de næste 4 ord derefter !??
Avatar billede tjp Mester
27. april 2004 - 22:20 #1
Måske kan følgende i VBS bruges til inspiration:

tekst = "kjdfkjdfjksjkd#1Hej med dig, går det godt?"
index = InStr (tekst, "#1")
last = Len(tekst)-(index+1) 'antal af bogstaver efter #1
strArr = Split(Right(tekst,last)) 'splitter teksten efter #1 i ord
MsgBox strArr(0)&", "&strArr(1)&", "&strArr(5)
Avatar billede want2learn Nybegynder
27. april 2004 - 22:34 #2
hvordan kan jeg få det vist med dette:

<html>
<head>
</head>
<body>
<%
Dim tekst, tindex, last, strArr

tekst = "kjdfkjdfjksjkd#1Hej med dig, går det godt?"
tindex = InStr (tekst, "#1")
last = Len(tekst)-(index+1) 'antal af bogstaver efter #1
strArr = Split(Right(tekst,last)) 'splitter teksten efter #1 i ord
MsgBox strArr(0)&", "&strArr(1)&", "&strArr(5)

response.write tekst & "<br><br>"
response.write tindex & "<br><br>"
response.write last & "<br><br>"
response.write strArr & "<br><br>"
response.write MsgBox & "<br><br>"
%>
</body>
</html>
Avatar billede want2learn Nybegynder
27. april 2004 - 22:35 #3
mener dette:
<html>
<head>
</head>
<body>
<%
Dim tekst, tindex, last, strArr

tekst = "kjdfkjdfjksjkd#1Hej med dig, går det godt?"
tindex = InStr (tekst, "#1")
last = Len(tekst)-(tindex+1) 'antal af bogstaver efter #1
strArr = Split(Right(tekst,last)) 'splitter teksten efter #1 i ord
MsgBox strArr(0)&", "&strArr(1)&", "&strArr(5)

response.write tekst & "<br><br>"
response.write tindex & "<br><br>"
response.write last & "<br><br>"
response.write strArr & "<br><br>"
response.write MsgBox & "<br><br>"
%>
</body>
</html>
Avatar billede tjp Mester
27. april 2004 - 22:46 #4
Jeg kan ikke køre ASP, men ville det ikke hjælpe at ændre:
MsgBox strArr(0)&", "&strArr(1)&", "&strArr(5)
til:
sluttekst =  strArr(0)&", "&strArr(1)&", "&strArr(5)
og ligeledes:
response.write MsgBox & "<br><br>"
til:
response.write sluttekst& "<br><br>"
Avatar billede want2learn Nybegynder
27. april 2004 - 22:57 #5
mange tak nu fattede jeg det.. vil du lægge et svar !?
Avatar billede tjp Mester
27. april 2004 - 23:05 #6
Here U R! :)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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