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

plexx Nybegynder

15. april 2002 - 23:41 Der er 15 kommentarer og
1 løsning

Problem med at læse dele af en linje.

Hej eksperter.

Jeg har denne linje til at stå i en tekstfil:
"Navn<xxx><yyy><zzz>" killed "Navn2<xxx2><yyy2><zzz2>" with "Våben"

Hvordan får jeg delt den linje op i disse variabler?
Navn =......
xxx =......
yyy =......
Navn2 =.....
xxx2 =.....
yyy2 =.....
zzz2 =.....
Våben =.....

Bemærk: alle variablerne skal kunne være forskellige længder.

På forhånd tak

Synes godt om

jacobfedefifi Nybegynder

15. april 2002 - 23:43 #1

Bare en lille kommentar til scriptet, undgå at bruge æ,å,ø det kan give nogle dumme problemer. (Hvis våben alt så henviser til en variabel med å :-)"

Synes godt om

plexx Nybegynder

15. april 2002 - 23:45 #2

ja det kan du have ret i

Synes godt om

eagleeye Praktikant

15. april 2002 - 23:47 #3

lad mig tage et eks: du vil havde..
"plexx<45><46><47>" killed "eagleeye<10><11><12>" with "paintgun"
til:

Navn = plexx
xxx = <45> eller 45
ovs..
Navn2 = eagleeye
ovs ovs..

er det rigtigt forstået?

Synes godt om

plexx Nybegynder

15. april 2002 - 23:48 #4

Synes godt om

plexx Nybegynder

15. april 2002 - 23:48 #5

xxx = 45

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:10 #6

Her er lidt kode..:

<html>
<head>
<title></title>
</head>
<body>

<%
dinStr = """plexx<45><46><47>"" killed ""eagleeye<10><11><12><"" with ""paintgun"""

indexStart = 2 'Index til første "
indexSlut = inStr(1,dinStr,"<") 'index til første <
Navn = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder Navn
indexStart = indexSlut+1 'Sætter start til første char efter første <
indexSlut = inStr(indexStart,dinStr,">") ' finder første >
xxx = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder XXX
indexStart = indexSlut+2 'Sætter start til første char efter anden <
indexSlut = inStr(indexStart,dinStr,">") ' finder anden >
yyy = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder YYY
indexStart = indexSlut+2 'Sætter start til første char efter 3. <
indexSlut = inStr(indexStart,dinStr,">") ' finder 3. >
zzz = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finde 'ZZZ
indexStart = inStr(indexSlut+3,dinStr,"""") 'Finde " før Navn2
indexStart = indexStart + 1 'sætter start til første char i Navn2
indexSlut = inStr(indexStart,dinStr,"<") 'Finder slut på navn2
Navn2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier Navn2
indexStart = indexSlut+1 'Finder start på xxx2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på xxx2
xxx2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier xxx2
indexStart = indexSlut+2 'Finder start på yyy2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på yyy2
yyy2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier yyy2
indexStart = indexSlut+2 'Finder start på zzz2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på zzz2
zzz2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier zzz2
indexStart = inStr(indexSlut+3,dinStr,"""") 'finder start på vaaben
indexStart = indexStart + 1 'sætter start til først char i vaaben
vaaben = Mid(dinStr,indexStart,len(dinStr)-indexStart) 'kpoier vaaben

Response.Write "dinStr = " & dinStr & " "
Response.Write "Navn = " & Navn & " "
Response.Write "xxx = " & xxx & " "
Response.Write "yyy = " & yyy & " "
Response.Write "zzz = " & zzz & " "
Response.Write "Navn2 = " & Navn2 & " "
Response.Write "xxx2 = " & xxx2 & " "
Response.Write "yyy2 = " & yyy2 & " "
Response.Write "zzz2 = " & zzz2 & " "
Response.Write "vaaben = " & vaaben & " "

%>
</body>
</html>

det krøver at formatet er ens som du skriver det "navn<xxx>..."

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:18 #7

navnene må ikke indeholde > og xxx,yyy,zzz må heller ikke indeholde < eller > som en del af teksten.

Men det har du nok taget højde for da du har brugt < og > som skille tegn.

Synes godt om

plexx Nybegynder

16. april 2002 - 00:21 #8

hovsa jeg skulle jo også have "killed" med!!! :)
ellers virker det fint

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:23 #9

hvor skal "killed" ind ?? i en variable??

Synes godt om

plexx Nybegynder

16. april 2002 - 00:24 #10

ja tak
variablen skal hedde action

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:26 #11

ok så der kan også stå andet end killed...

Synes godt om

plexx Nybegynder

16. april 2002 - 00:26 #12

yeps

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:31 #13

Sådan her:

<html>
<head>
<title></title>
</head>
<body>

<%
dinStr = """plexx<123""45><46><47>"" killed ""eagleeye<10><11><1NOGET ANDET>"" with ""paintgun"""

indexStart = 2 'Index til første "
indexSlut = inStr(1,dinStr,"<") 'index til første <
Navn = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder Navn
indexStart = indexSlut+1 'Sætter start til første char efter første <
indexSlut = inStr(indexStart,dinStr,">") ' finder første >
xxx = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder XXX
indexStart = indexSlut+2 'Sætter start til første char efter anden <
indexSlut = inStr(indexStart,dinStr,">") ' finder anden >
yyy = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finder YYY
indexStart = indexSlut+2 'Sætter start til første char efter 3. <
indexSlut = inStr(indexStart,dinStr,">") ' finder 3. >
zzz = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finde 'ZZZ
indexStart = inStr(indexSlut,dinStr,""" ") + 2 'Sætter start til første char efter " . i action
indexSlut = inStr(indexStart,dinStr," """) ' finder slut på action "
action = Mid(dinStr,indexStart,indexSlut-indexStart) 'Finde 'ZZZ

indexStart = inStr(indexSlut,dinStr,"""") 'Finde " før Navn2
indexStart = indexStart + 1 'sætter start til første char i Navn2
indexSlut = inStr(indexStart,dinStr,"<") 'Finder slut på navn2
Navn2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier Navn2
indexStart = indexSlut+1 'Finder start på xxx2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på xxx2
xxx2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier xxx2
indexStart = indexSlut+2 'Finder start på yyy2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på yyy2
yyy2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier yyy2
indexStart = indexSlut+2 'Finder start på zzz2
indexSlut = inStr(indexStart,dinStr,">") 'finde slut på zzz2
zzz2 = Mid(dinStr,indexStart,indexSlut-indexStart) 'kopier zzz2
indexStart = inStr(indexSlut+3,dinStr,"""") 'finder start på vaaben
indexStart = indexStart + 1 'sætter start til først char i vaaben
vaaben = Mid(dinStr,indexStart,len(dinStr)-indexStart) 'kpoier vaaben

Response.Write "dinStr = " & dinStr & " "
Response.Write "Navn = " & Navn & " "
Response.Write "xxx = " & xxx & " "
Response.Write "yyy = " & yyy & " "
Response.Write "zzz = " & zzz & " "
Response.Write "action = " & action & " "
Response.Write "Navn2 = " & Navn2 & " "
Response.Write "xxx2 = " & xxx2 & " "
Response.Write "yyy2 = " & yyy2 & " "
Response.Write "zzz2 = " & zzz2 & " "
Response.Write "vaaben = " & vaaben & " "

%>
</body>
</html>

Synes godt om

eagleeye Praktikant

16. april 2002 - 00:32 #14

hvad så med with ?? kan det også være noget andet..

Synes godt om

plexx Nybegynder

16. april 2002 - 00:33 #15

tak for hjælpen

Synes godt om

plexx Nybegynder

16. april 2002 - 00:33 #16

nix det ka det ik

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