2 replies to this topic

[baruelfortal]

olá pessoal,

Bem estou utilizando select case para fazer um escolha de opção certo... bem vejamos o código que a apostila mostra:

Select Case Expressao
Case Condição
Comandos_1
Case Condição 2
Comandos_2
Case Else
Comandos_3
End Select

Exemplo:

<% Dim DiaS

Select Case WeekDay(Date)
Case 1
DiaS = “Domingo”
Case 2
DiaS = “Segunda-feira”
Case 3
DiaS = “Terça-feira”
Case 4
DiaS = “Quarta-feira”
Case 5
DiaS = “Quinta-feira”
Case 6
DiaS = “Sexta-feira”
Case Else
DiaS = “Sábado”
End Select %>

Meu código:

select case cod
case 1
tipo = "Congresso"
case 2
tipo = "Fórum"
case 3
tipo = "Festivais"
case 4
tipo = "Cursos"
case else
tipo = "Concursos"
and select

Erro Ocorrido:


Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A0400)
Instrução esperada
arquivo.asp, line 23
and select cod



Ajuda?

[edmais]

select case cod
case 1
tipo = "Congresso"
case 2
tipo = "Fórum"
case 3
tipo = "Festivais"
case 4
tipo = "Cursos"
case else
tipo = "Concursos"
End select

[baruelfortal]

Caraca... hehehe ôôôôôôôô Vergonha...


É mesmo... Valeu!!!