Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

marcelinho

Que erro pode ser esse????

Por , em ASP Clássico

Recommended Posts

marcelinho    0

marcelinho
Postado

e ai galera beleza?

 

tipo deu um erro na minha pagina aqui e eu nao to conseguindo resolver...alguem pode ria me ajudar???

 

 

o erro é esse:

 

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A01A8)

Objeto necessário: '[undefined]'

/projeto/ipeel/Default.asp, line 15

 

e o meu default.asp é:

 

<html><head>	<title>Untitled</title></head><body><%'Declara matrizdim matCadastro(),rsD'Roda um select na tabela alunosnSQL = "SELECT * FROM tbAlunos"Set rsD = Session("Conn").Execute(nSQL)'Começa a alimentação da matrizi=0while not rsD.eof  redim preserve matCadastro(10,i)   matCadastro(0,i) = rsD("id")   matCadastro(1,i) = rsD("idturma")   matCadastro(2,i) = rsD("nome")   matCadastro(3,i) = rsD("email")   matCadastro(4,i) = rsD("telefone")   matCadastro(5,i) = rsD("nome_pai")   matCadastro(6,i) = rsD("login")   matCadastro(7,i) = rsD("login_pai")   matCadastro(8,i) = rsD("senha")   matCadastro(9,i) = rsD("senha_pai")   i=i+1   rsD.MoveNext Wend%><link rel="stylesheet" href="includes/incEstilo.css" TYPE="text/css" src="includes/incEstilo.css"> <table width="620" border="0" cellspacing="1" cellpadding="3" align="center" bgcolor="Silver">	<tr bgcolor=728AB0>  <td height="25" colspan="25" background="imagens/barra_topo.gif"> 	 <table border=0 width=100%>    <tr>   	 <td class="titulo_formulario"> <b>Alunos</b></td>   	 <td align="right" class="backendBranco"><a href=inserir.asp class=backendBranco>Novo Aluno</a></td>    </tr> 	 </table>  </td>	</tr>	<tr bgcolor="#EEE7D5">  <td align=center class=backendPreto>ID</td>  <td class=backendPreto>Nome</td>  <td class=backendPreto>E-Mail</td>  <td class=backendPreto>Telefone</td>  <td class=backendPreto>Nome do Pai</td>  <td colspan="3" align="center" class="backendPreto">Ação</td>	</tr>    <%for j=0 to i-1%>	<tr bgcolor="#FFFFFF" id="" onMouseOver="this.bgColor='#f5f2e9';" onMouseOut="this.bgColor='#ffffff';">  <td align=center class=backendPreto><%=matCadastro(0,j)%></td>  <td class=backendPreto><%=matCadastro(2,j)%></td>  <td class=backendPreto><%=matCadastro(3,j)%></td>   	 <td class=backendPreto><%=matCadastro(4,j)%></td>  <td class=backendPreto><%=matCadastro(5,j)%></td>  <td class=backendPreto align=center><a href="Alterar.asp?id=<%=matCadastro(0,j)%>"><img src="imagens/alterar.gif" alt="Alterar" width="12" height="12" border="0"></a></td>  <td class=backendPreto align=center><a href="apaga.asp?id=<%=matCadastro(0,j)%>"><img src="imagens/excluir.gif" alt="Excluir" width="13" height="13" border="0"></a></td>  <td class=backendPreto align=center><a href="consulta.asp?id=<%=matCadastro(0,j)%>"><img src="imagens/consultar.gif" alt="Consultar" width="14" height="15" border="0"></a></td>    </tr>		<%next%></table></body></html>
e vou por meu global.asa se alguem precisar pq é nele que esta a conexão do meu banco

 

<script LANGUAGE="VBScript" RUNAT="Server">  Sub Application_onStart     Application("caminhobanco") = "d:\logicadigital\producao\web\projeto\web\ipeel\DataBase"  Application("nomebanco") = "\_dbIpeel.mdb"    End Sub	    Sub Application_OnEnd  End Sub    Sub Session_OnStart         nDb = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Application("caminhobanco") & Application("nomebanco")  Set Session("Conn") = Server.CreateObject("AdoDb.Connection")  Session("Conn").open nDb   End Sub    Sub Session_OnEnd   Session("Conn").close  End Sub</SCRIPT>
se alguem puder me ajudar!!!valeuu to precisando!!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Påpî†ø    0

Påpî†ø
Postado

kra, provalvelmente naum tem nada na session, ou naum rodou o .asa, recomendo abrir o banco em um include asp com uma conexão mais simples eh certeza de um bom funcionamento...

 

flws

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito