Erro '800a000d'

[Goda 0]

Galera eu to com esse erro na minha pagina:

 

Microsoft VBScript runtime error '800a000d'

 

Type mismatch: 'DataSaida'

 

/Teste/ImprimirRecibo2.asp, line 140

 

e ta assim no codigo:

<%
		StrPesquisa = "Select * from TabelaSubRelacao where OS = '" & request.form("os") & "' order by eticket"
		set pesquisa = conexao.execute(StrPesquisa)
		while not pesquisa.eof
			if NomeAnterior <> Pesquisa("NomPass") then
				x = x + 1
				Nomes(x, 1) = replace(pesquisa("NomPass"), "_"," ")
				DataSaida(x, 1) = pesquisa("DataSaida")
				TipoPax(x, 1) = pesquisa("TipoPax")
				Produtos(x, 1) = pesquisa("Produtos")
				eticket(x, 1) = pesquisa("eticket")
			end if
		pesquisa.movenext
		wend


		for i = 1 to x
%>
			<tr>
				<td><font face=verdana size=1><b><%=i%> - <%=Nomes(i, 1)%></b></td>
				<td><font face=verdana size=1><b><center><%=DataSaida(i, 1)%></b></td>
				<td><font face=verdana size=1><b><center><%=TipoPax(i, 1)%></b></td>
				<td><font face=verdana size=1><b><%=i%> - <%=Produtos(i, 1)%></b></td>
				<td><font face=verdana size=1><b><center><%=eticket(i, 1)%></b></td>
			</tr>			

<%
		next

		for i = (1 + x) to 1
%>
			<tr>
				<td><font face=verdana size=1><b> </b></td>
				<td><font face=verdana size=1><b> </b></td>
				<td><font face=verdana size=1><b> </b></td>
				<td><font face=verdana size=1><b> </b></td>
			</tr>
<%

Se eu tiro o campo DataSaida ele funciona, alguem pode me ajudar?

 

Valew

[Matias Rezende 50]

Sua dúvida não tem nada de Javascript. Acredito que no fórum de ASP o pessoal vai poder te ajudar melhor

 

Tópico Movido

Javascript http://forum.imasters.com.br/public/style_emoticons/default/seta.gif ASP

[hargon 64]

DataSaida está sendo declarada onde como vetor?

[Goda 0]

Desculpe, mas não entendi sua pergunta.

[xanburzum 169]

Este erro geralmente vem porque você tem uma sintaxe inválida que leva a crer que você está tentando usar uma função como uma matriz, ou uma seqüência como uma função.