select case

mener du

a=1
select case a
case 1
case 3
  Response.Write "1 eller 3"
case 2
  Response.Write "2"
end select

nej...

Det skal bruges i et stykke kode der sådan ud

a=1
select case a
case 1
  Response.Write "1"
case 2
  if x = 5 then
    Response.Write "2"
  else
    'gå til case 3
  end if
case 3
  Response.Write "3"
end select

a=1
select case a
case 1
  Response.Write "1"
case 2,3
  if CInt(a) = 2 then
    Response.Write "2"
  end if
    response.write "3"  end if
end select

Prøv på denne måde...
Så går den ind i casen hvis a er 2 eller 3, så med if chekker den om du er i 2, hvis du er det, udføres dette, og hvis ikke udføres kun 3...

Det bliver for tungt at skulle lave koden om til dette.

Kan man ikke sende scriptet over i en anden case med noget der ligner goto ?

Du kan lave en sub som du kalder, men synes da det nemmeste må være det jeg lige skrev, det kræver kun at du tilføjer en
if CInt(a) = 2 then
end if
så virker det...

Så sletter du bare linien case 3...

Alternativt hvor du benytter en sub til din kode...


a=1
select case a
case 1
  Response.Write "1"
case 2
  Response.Write "2"
  call SubSection
case 3
  call SubSection
end select


Sub SubSection
Response.write "3" 'Kode som skal eksekveres hvis 3 er valgt. Kan selv tilpasses
End Sub

Altså på denne måde for at tilpasse det din kommentar: 02/10-2003 22:59:23

a=1
select case a
case 1
  Response.Write "1"
case 2
if x = 5 then
  Response.Write "2"
else
  call SubSection
end if
case 3
  call SubSection
end select


Sub SubSection
Response.write "3" 'Kode som skal eksekveres hvis 3 er valgt. Kan selv tilpasses
End Sub

Jeg løste det med call funktionen !!! Mange tak for hjælpen !!

Anytime.
Takker for points..

..Ellebæk!