Pagina Categoria.asp Não Abre....

Manckenna · Julho 17, 2005

Página categoria.asp Não abre

Não consigo abrir esta página no navegador alguém consegue ver erro ai? , alguém conhece algum programa que detecta este erro (se houver) ?

<%

DIM conCadLivro

DIM recLivro

DIM categoriaatual

DIM titulocategoria

categoriaatual=(Request.QuerySring("categoria1"))

If categoriaatual = "Administração" then

titulocategoria = "images/titulo_adm.jpg"

end if

If categoriaatual = "Eletrônica" then

titulocategoria = "images/titulo_eletronica.jpg"

end if

if categoriaatual = "Telecomunicações" then

titulocategoria = "images/titulo_telecom.jpg"

end if

if categoriaatual = "Sistemas Operacionais" then

titulocategoria = "images/titulo_sistoper.jpg"

end if

if categoriaatual ="computação Gráfica" then

titulocategoria = "images/titulo_compgraf.jpg"

end if

If categoriaatual = "Internet" then

titulocategoria = "images/titulo_Internet.jpg"

end if

const cntCaminho = "c:\inetpub\wwwroot\asp\cadlivro.mdb"

Set conCadLivro = Server.CreateObject("ADODB.Connection")

Set recLivro = Server.CreateObject("ADODB.Recordset")

ConCadLivro.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & cntCaminho

recLivro.Open "SELECT * FROM Livros where categoria='" & categoriaatual & "' ",concadlivro

%>

<html>

<head>

</head>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

</table>

<tr>

<%

Response.write "<td width='470' valign='top' background='images/fundo01.gif'><img src='" & titulocategoria & "' " & " width='470' height='30'> "

%>

Para ler o resumo de um livro clique sobre sua capa

<%

Do While Not RecLivro.Eof

Response.Write "<table border='0' cellpadding='0' cellspacing='1' width='470'>"

Response.write "<tr>" & "<td valign='top' width='90%' bgcolor='#996600'><img src='redondo_es.gif' align='top' width='8' height='8'>" & RecLivro.Fields("NomeLivro") & "</td>" & "<td valign='top' width='10%'></td>" & "</tr> "

Response.Write "<tr>" & "<td colspan='2' width= '100%' bgcolor='#ffcc99'><a href='detalhe.asp?codigo1=" & RecLivro.fields("Codigo") & "'><img src='images/" & RecLivro.Fields("Capa") & ".gif'" & "align='left' hspace='5' vspace='3' width='59' height='84' border='0'></a>autor: " & RecLivro.Fields("NomeAutor") & " "

Response.Write "Nº de páginas: " & RecLivro.Fields("NumPaginas") & " "

Response.Write "Format " & RecLivro.Fields("Formato") & " "

Response.Write "codig " & RecLivro.Fields("Codigo") & " "

Response.Write "Preç " & RecLivro.Fields("preço") & "</td></tr></table>"

RecLivro.MoveNext

Loop

recLivro.Close

conCadLivro.close

%>

</td>

</tr>

</table>

</body>

</html>

fercosmig · Julho 17, 2005

não dá uma mensagem de erro?

da uma olhada nas configurações de erros amigaveis do seu navegador!

Manckenna · Julho 18, 2005

Tipo de erro:

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

O objeto não dá suporte para a propriedade ou método: 'Request.QuerySring'

/Asp/Categoria.asp, line 6

Sou iniciante e não sei como resolver...

marcos_804 · Julho 18, 2005

Isso esta errado = 'Request.QuerySring'

fica cassim "Request.QueryString"

Manckenna · Julho 18, 2005

Isso esta errado = 'Request.QuerySring'
fica cassim "Request.QueryString"

Rapaz você é de Deus simplismente resolveu a situação ....

São pessoas como você que nos ensina a ser bons........MUITO GRATO. uma símples humildade nos mostra as vezes UMA GRANDE SOLUÇÃO.........

manckenna@hotmail.com

cyberalexxx · Julho 18, 2005

tópico fechado!!

Entrar

Pagina Categoria.asp Não Abre....

Pergunta

Manckenna

Link para o comentário

Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

fercosmig

Link para o comentário

Compartilhar em outros sites

Manckenna

Link para o comentário

Compartilhar em outros sites

marcos_804

Link para o comentário

Compartilhar em outros sites

Manckenna

Link para o comentário

Compartilhar em outros sites

cyberalexxx

Link para o comentário

Compartilhar em outros sites

Estatísticas dos Fóruns

Navegação

Atividades