Formulario Não definido

[Yuki-kun 0]

Olá!

 

Estou fazendo algo assim.

 

 

FORM 1:

 

Usuário digita um numero.

 

FORM 2:

 

Sistema fornece quantidade de textareas definida pelo usuario.

 

FORM 3:

 

Sistema insere no banco de dados o valor das textareas.

 

 

Pergunta:

 

Como atribuir o valor das textareas em um array?

 

 

Abaixo é o que tentei:

for i=0 to qtde
	ostat(i) = Request.form("txtStatus" & i)
next

:mellow:

[Salgado 4]

Se o nome da TextArea for txtStatusNUMERO onde NUMERO é o numero seqüencial está correto, mas não poderia começar de 0

[Yuki-kun 0]

Se o nome da TextArea for txtStatusNUMERO onde NUMERO é o numero seqüencial está correto, mas não poderia começar de 0

Mas quando eu faço isso dá tipos incompativeis!

 

Erro de tempo de execução do Microsoft VBScript erro '800a000d'

Tipos incompatíveis

teste.asp, line 22

[hargon 64]

E o que tem na linha 22?

 

Isso? ostat(i) = Request.form("txtStatus" & i)

 

Você declarou ostat?

[Yuki-kun 0]

E o que tem na linha 22?

 

Isso? ostat(i) = Request.form("txtStatus" & i)

 

Você declarou ostat?

 

é o ostat(i) sim.

Declarei:

 

Dim ostat()

[hargon 64]

Abaixo da reclaracao, coloca Redim ostat(tamanho). Ex. Redim ostat(2)

[Yuki-kun 0]

Abaixo da reclaracao, coloca Redim ostat(tamanho). Ex. Redim ostat(2)

 

Redimensionar? mas a idéia é ter um vetor com quantidade

nao definida.. o usuário é quem diz quantas variaveis devem ser gerada

(posicoes de vetor)

[hargon 64]

<%

Dim ostat

Redim ostat(qte)

%>

[Yuki-kun 0]

Eu resolvi o problema com gambiarra mesmo.

fiz o FOR concatenando todos os valores separados por # e entao

fiz:

 

MeuVetor = Split(ostat, "#", -1, 1)

 

 

 

Obrigado pela ajuda Hargon e Salgado!