If->Sträng

10 svar · 214 visningar · startad av koltrasten 3 dec. 2002

koltrastenMedlem sedan okt. 2002272 inlägg

Frågan3 dec. 2002 18:29#1

Detta är en utav mina sista frågor om stränghantering - jag lovar! ;)

Om någonting ur variabel1 finns i variabel 2 skall en sak hända. Ungefär som, men det funkar ju inte...

If Variabel1 = Variabel2 Then
' OK
Else
' STOPP
End If

Variabel1 innehåller ;Action;Thriller;Komedi;
Variabel2 innehåller ;Musikal;Thriller;Krig;
OK

Variabel1 innehåller ;Action;Thriller;Komedi;
Variabel2 innehåller ;Musikal;Fantasy;Krig;
STOPP

OveRRidEMedlem sedan feb. 200112 078 inlägg

3 dec. 2002 18:38#2

myArr1 = split(variabel1,";")
myVar2 = variabel2

for i = lbound(myArr1) to ubound(myArr1)
   if instr(myVar2,myArr1(i)) > 0 then
      response.write "Ja"
   else
      response.write "Nej"
   end if
next

koltrastenMedlem sedan okt. 2002272 inlägg

3 dec. 2002 18:51#3

Det visade:
JaJaNejJa

Jag vill bara ha ett ja eller ett nej om någon kategori i Variabel1 finns i Variabel2...

EitrazMedlem sedan sep. 2002366 inlägg

3 dec. 2002 18:57#4

myArr1 = split(variabel1,";")
myVar2 = variabel2

str_found = False
for i = lbound(myArr1) to ubound(myArr1)
   if instr(myVar2,myArr1(i)) > 0 then
      str_found = True
   end if
next

If str_found Then
   Response.Write "Jepp"
Else
  Response.Write "Nepp"
End If

Kan nog funka

-Eitraz

solbulleMedlem sedan mars 20015 287 inlägg

3 dec. 2002 18:58#5

myArr1 = split(variabel1,";")
myVar2 = variabel2

svar = "Nej"
for i = lbound(myArr1) to ubound(myArr1)
   if instr(myVar2,myArr1(i)) > 0 then
      svar = "Ja"
   end if
next
      response.write svar

solbulleMedlem sedan mars 20015 287 inlägg

3 dec. 2002 18:59#6

Slagen på sekunden, typ ;)

koltrastenMedlem sedan okt. 2002272 inlägg

3 dec. 2002 19:09#7

Jag vill börja med att tacka alla, men jag är ledsen över att säga att det funkar inte :(
Den visar Jepp (eller Ja ;) ) hela tiden.
Om Variabel1 innehåller ;Action;Thriller;Komedi; och Variabel2 innehåller ;Musikal;Thriller;Krig; blir det också Ja...

Jag kan tillägga innan ni fortsätter att jag vill att det skall fungera även om det innehåller 3 kategorier på den ena och 5 på den andra...

solbulleMedlem sedan mars 20015 287 inlägg

3 dec. 2002 19:11#8

Hm, är inte Thriller = Thriller?

PoffeMedlem sedan apr. 20022 743 inlägg

3 dec. 2002 19:15#9

koltrasten skrev:

Jag kan tillägga innan ni fortsätter att jag vill att det skall fungera även om det innehåller 3 kategorier på den ena och 5 på den andra...

ovanstående koden är oberoende av hur många kategorier det finns :)

koltrastenMedlem sedan okt. 2002272 inlägg

3 dec. 2002 19:15#10

Ack, ack. Jag skrev fel. Var snabb... Jag skriver om innlägget igen:

Jag vill börja med att tacka alla, men jag är ledsen över att säga att det funkar inte
Den visar Jepp (eller Ja ) hela tiden.
Om Variabel1 innehåller ;Action;Thriller;Komedi; och Variabel2 innehåller ;Musikal;Fantasy;Krig; blir det också Ja...

Jag kan tillägga innan ni fortsätter att jag vill att det skall fungera även om det innehåller 3 kategorier på den ena och 5 på den andra...

Nu så! :)

solbulleMedlem sedan mars 20015 287 inlägg

3 dec. 2002 19:18#11

Felet beror antagligen på att när arrayen skapas följer det med en tom plats, borde gå att få bort med trim tycker jag...

men annars, fullösning:

myArr1 = split(variabel1,";")
myVar2 = variabel2

svar = "Nej"
for i = lbound(myArr1) to ubound(myArr1)
	If myArr1(i) > "" then
	   if instr(myVar2,myArr1(i)) > 0 then
      	svar = "Ja"
	   end if
	end if
next
      response.write svar