Notifikationer

Markér alle som læst Log ud

moejensen Nybegynder

06. juli 2003 - 20:36 Der er 18 kommentarer og
1 løsning

hjælp til at skære en string ud

Hej med jer,

jeg er ved at lave en side, hvor jeg bruger muligheden for at lave Ghost folders, men jeg kan simpelthen ikke få skåret stringen ud som jeg gerne vil have det.

De typer af links jeg kan have er:

http://www.siden.dk/menulink/sidelink/
http://www.siden.dk/menulink/sidelink
http://www.siden.dk/menulink/
http://www.siden.dk/menulink

jeg henter stien ud med følgende: Request.ServerVariables("QUERY_STRING")

eksempelvis kunne den se således ud: 404;http://www.side.dk/menulink/sidelink/

jeg prøver nu at lave en funktion der deler url'en op i to variabler:

menu = menulinket
side = sidelink

men det driller mig fordi jeg aldrig ved om url'en slutter på "/" - det kommer jo an på den bruger der går ind på siden.

Håber i kan hjælpe

Synes godt om

Slettet bruger

06. juli 2003 - 20:39 #1

If right(str,1) = "/" then
Pil ud med /
Else
Pil ud uden /
End If

Synes godt om

Slettet bruger

06. juli 2003 - 20:43 #2

Eller (utestet)

If right(str,1) = "/" then
Str = Left(str, Len(str) - 1
Else
Str = Str
End If
Sidelink = Right(str,InStrRev(str))
MenuLink = Left(str, Len(Str) - InStrRev(str))

Kan godt være at der skal plusses eller minusses med 1, prøv dig frem :-)

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:02 #3

der giver mig ikke umiddelbart noget brugbart, desværre.

Synes godt om

Slettet bruger

06. juli 2003 - 21:03 #4

Hvad får du ud med din nuværende kode og hvordan ser koden ud?

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:05 #5

jeg får følgende ud:

Sidelink: /www.side.dk/menulink/sidelink

Menulink: 404;http:/

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:06 #6

koden ser således ud:

If right(str,1) = "/" then
Str = Left(str, Len(str) - 1)
Else
Str = Str
End If
Sidelink = Right(str,InStrRev(str,"/"))
MenuLink = Left(str, Len(Str) - InStrRev(str,"/"))

Synes godt om

Slettet bruger

06. juli 2003 - 21:08 #7

Du får lige denne først
Sidelink = Right(str,Len(str) - InStrRev(str,"/"))

Synes godt om

Slettet bruger

06. juli 2003 - 21:09 #8

Og hvordan skal dit menulink se ud?
http://www.side.dk/menulink eller?

Synes godt om

Slettet bruger

06. juli 2003 - 21:16 #9

Prøv evt.
MenuLink = Mid(str,5, Len(Str) - InStrRev(str,"/") - 4)

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:19 #10

menulink skal bare være menulink

ex
http://www.eksperten.dk/spg/31242

menulink = spg
sidelink = 31242

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:20 #11

det ser ud til at sidelink virker nu, men ved menulink får jeg: 404;http:/

Synes godt om

Slettet bruger

06. juli 2003 - 21:26 #12

Forudsat du altid har 404;http:// foran

str = Right(str, len(str) - 5)
pos1 = instr(str,"/")
pos2 = instr(str,pos1+1,"/")
Menulink = Mid(str, pos1+1, pos2-pos1 - 1)

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:29 #13

der er altid 404;http:// foran

der er noget galt med
pos2 = instr(str,pos1+1,"/")

for instr tager to strings som parametre

Synes godt om

Slettet bruger

06. juli 2003 - 21:31 #14

Min fejl det skal være
pos2 = instr(pos1+1,str,"/")
Det første er startpunktet, hvis det ikke angives starter den altid fra pos 1 i strengen :-)

Synes godt om

moejensen Nybegynder

06. juli 2003 - 21:34 #15

Jeg får ingenting ud på menulink nu, så der må være skåret for meget i den

Synes godt om

Slettet bruger

06. juli 2003 - 21:40 #16

Hmm, papir kodning er nu ikke helt optimalt. Hvis nedenstående ikke virker, så kan du evt. udskrive str, pos1 og pos2 når de er fundet og så se hvorfor det ikke passer:

str = Right(str, len(str) - 11)
pos1 = instr(str,"/")
pos2 = instr(pos1+1,str,"/")
Menulink = Mid(str, pos1+1, pos2-pos1 - 1)

Synes godt om

moejensen Nybegynder

07. juli 2003 - 09:25 #17

så ser det ud til at jeg får det rigtige ud, men til tider kigger serveren efter denne sti:

404;http://www.siden.dk/menulink/sidelink/default.asp

og så passer det jo ikke. Kan jeg lave en if sætning der fjerner default.asp, hvis det står i strengen?

Synes godt om

moejensen Nybegynder

07. juli 2003 - 11:26 #18

har selv klaret det.

Tak for hjælpen

Synes godt om

Slettet bruger

07. juli 2003 - 16:58 #19

Ok, og tak for points :-)

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
ASP classic kopiere database fil på server Af bsn i ASP	7	31/10/202610:20	01/11/202620:28
Persits.Upload Af bsn i ASP	9	17/09/202611:37	21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58

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