Ir para conteúdo

POWERED BY:

Arquivado

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

rem

erro na página internet

Recommended Posts

Fiz uma página, mas qdo vou acessá-la na internet aparece faltando colunas e a pagina não faz conexão com o BD.<html><head><title>Gerência de Mudanças</title><meta name="Autor" content="Renata M"><meta name="GENERATOR" content="Microsoft FrontPage 4.0"></head><body background="fundo.gif" bgproperties="fixed" leftmargin="30"><p><img src="barra_foto3.jpg" width="117" height="43"><strong><font face="Verdana"><small>   Infra-Estrutura</small> <small><small><font color="#008080">-------------------------------Gerência de Mudanças</font></small></small></font></strong></p><table border="0" width="99%"> <tr> <td width="100%"><form method="get" action="envio1.asp"> <div align="left"><p> <img src="bolinha.gif" width="11" height="11" alt="bolinha.gif (844 bytes)"> <font color="#FF0000" face="Verdana"><small>Obrigatório preenchimento de todos os campos</small></font></p> </div><table border="0" width="100"> <table border="0" width="466"> <tr> <td width="144"><small><font face="Verdana"><b>Data:</b></font></small></td> <td width="308"><input type="text" name="Data" size="12"> <font face="Verdana" color="#FF0000"><small><small>(Campo obrigatório)</small></small></font></td> <tr> <td width="144"><small><font face="Verdana"><b>Analista:</b></font></small></td> <td width="308"><select name="analista" size="1"> <option value="Selecionar analista">Selecionar analista</option> <%Set conn = Server.CreateObject("ADODB.Connection")conn.connectionString="provider=Microsoft.jet.OLEDB.4.0;DATA SOURCE=Y:\csunet\servicos\G_Mudancas\cadmudancas.asp\BD_g_mudancas.mdb"conn.Open "g_mudancas"q ="select distinct cod_Analista, analista from analista"set tab = conn.execute(q)while not tab.EOF%> <option value="<%= tab("analista").value%>"><%= tab("analista").value%></option><%tab.movenextwendtab.closeSet tab = nothing%> </select></td> </tr> <tr> <td width="144"><small><font face="Verdana"><b>Area:</b></font></small></td> <td width="308"><select name="area" size="1"> <option value="Selecionar area">Selecionar area</option><% Set conn = Server.CreateObject("ADODB.Connection") conn.Open "g_mudancas"q ="select distinct codArea, area from area"set tab = conn.execute(q)while not tab.EOF%> <option value="<%= tab("area").value%>"><%= tab("area").value%></option><%tab.movenextwendtab.closeSet tab = nothing%> </select></td> </tr> </table> <table border="0" width="100%" height="194"> <tr> <td width="18%" height="25"><small><font face="Verdana"><b>Ambiente:</b></font></small></td> <td width="82%" height="25"><select name="Ambiente" size="1"> <option value="Selecionar Ambiente">Selecionar Ambiente</option><%rem Set conn = Server.CreateObject("ADODB.Connection")rem conn.Open "g_mudancas"q ="select distinct codAmbiente, Ambiente from Ambiente"set tab = conn.execute(q)while not tab.EOF%> <option value="<%= tab("Ambiente").value%>"><%= tab("Ambiente").value%></option><%tab.movenextwendtab.closeSet tab = nothing%> </select></td> </tr> <tr> <td width="18%" height="34"><small><font face="Verdana"><b>Software/Hardware envolvido:</b></font></small></td> <td width="82%" height="34"><input type="text" name="Software/Hardware envolvido" size="42"> <font face="Verdana" color="#FF0000"><small></small></font></td> </tr> <tr> <td width="18%" height="123"><small><font face="Verdana"><b>Motivo da Alteração:</b></font></small></td> <td width="82%" height="123"> <font face="Verdana" color="#FF0000"><small><textarea rows="4" name="S1" cols="36"></textarea></small></font></td> </tr> </table> <p>                                         <input type="submit" value="Enviar" name="Enviar">      <input type="reset" value="Limpar" name="Limpar"></p> </form></table></body>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Normalmente quando você executa uma pagina em asp, se ela possuir erro em alguma linha o navegador ira informar o erro....

 

Segue abaixo um exemplo:

Informações técnicas (para a equipe de suporte)

Tipo de erro:
Erro de tempo de execução do Microsoft VBScript (0x800A01A8)
Objeto necessário: 'reqsuest'
/nd/www/asp/index.asp, line 11


Tipo de navegador: 
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) 

Página: 
GET /nd/www/asp/index.asp 

Hora: 
quarta-feira, 27 de abril de 2005, 17:16:03 


Mais informações: 
Suporte da Microsoft

O interessante seria você postar so essa parte(que é onde esta informado o tipo do erro), pois vendo ela, teremos uma ideia melhor do que se trata e tentaremos lhe ajudar...

Tipo de erro:
Erro de tempo de execução do Microsoft VBScript (0x800A01A8)
Objeto necessário: 'reqsuest'
/nd/www/asp/index.asp, line 11

Compartilhar este post


Link para o post
Compartilhar em outros sites

como assim esta faltando colunas???não entendi...

Compartilhar este post


Link para o post
Compartilhar em outros sites

como assim esta faltando colunas???

 

não entendi...

<{POST_SNAPBACK}>

Quando conecto na Internet aparece a a pagina faltando campos e não conecta com o BD, mas não aparece descrição de nenhum erro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

verifica no codigo fonte se o erro não escondido entre alguma tag HTML mal construida...

Compartilhar este post


Link para o post
Compartilhar em outros sites

verifica no codigo fonte se o erro não escondido entre alguma tag HTML mal construida...

<{POST_SNAPBACK}>

Apareceu um erro assim:

GET/SERVICOS/G_Mudancas/cadmudancas.asp

o objeto não dá suporte para a propriedade ou método: 'RESPONSE'

Compartilhar este post


Link para o post
Compartilhar em outros sites

sabia...ehehhenão tem uma linha ai nesta descrição?? o que tem na linha??

Compartilhar este post


Link para o post
Compartilhar em outros sites

sabia...

 

ehehhe

 

não tem uma linha ai nesta descrição?? o que tem na linha??

<{POST_SNAPBACK}>

Não aparece a linha porque eu peguei essa descrição de erro no servidor que está rodando essa aplicação.

Compartilhar este post


Link para o post
Compartilhar em outros sites

você está tentando dar response em que??

Compartilhar este post


Link para o post
Compartilhar em outros sites

não tem nenhum include que possa esta fazendo isso??

Compartilhar este post


Link para o post
Compartilhar em outros sites

não tem nenhum include que possa esta fazendo isso??

<{POST_SNAPBACK}>

Não, dá uma olhada no código por favor, vê se você descobre o que é

 

<html>

 

<head>

<title>Gerência de Mudanças</title>

<meta name="Autor" content="Renata M">

<meta name="GENERATOR" content="Microsoft FrontPage 4.0">

</head>

 

<body background="fundo.gif" bgproperties="fixed" leftmargin="30">

 

<p><img src="barra_foto3.jpg" width="117" height="43"><strong><font face="Verdana"><small>

   Infra-Estrutura</small> <small><small><font color="#008080">-------------------------------Gerência de Mudanças</font></small></small></font></strong></p>

 

<table border="0" width="99%">

<tr>

<td width="100%"><form method="get" action="envio1.asp">

<div align="left"><p> <img src="bolinha.gif" width="11" height="11"

alt="bolinha.gif (844 bytes)"> <font color="#FF0000" face="Verdana"><small>Obrigatório

preenchimento de todos os campos</small></font></p>

</div><table border="0" width="100">

<table border="0" width="466">

 

<tr>

<td width="144"><small><font face="Verdana"><b>Data:</b></font></small></td>

<td width="308"><input type="text" name="Data" size="12"> <font face="Verdana"

color="#FF0000"><small><small>(Campo obrigatório)</small></small></font></td>

</tr>

<tr>

<td width="144"><small><font face="Verdana"><b>Analista:</b></font></small></td>

<td width="308"><select name="analista" size="1">

<option value="Selecionar analista">Selecionar analista</option>

<%

 

rem Set conn = Server.CreateObject("ADODB.Connection")

rem conn.Open "g_mudancas"

q ="select distinct cod_Analista, analista from analista"

set tab = conn.execute(q)

while not tab.EOF

%>

<option value="<%= tab("analista").value%>"><%= tab("analista").value%></option>

<%

tab.movenext

wend

 

%>

</select></td>

</tr>

<table border="0" width="466">

<tr>

<td width="144"><small><font face="Verdana"><b>Area:</b></font></small></td>

<td width="308"><select name="area" size="1">

<option value="Selecionar area">Selecionar area</option>

<%

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

conn.Open "g_mudancas"

q ="select distinct codArea, area from area"

set tab = conn.execute(q)

while not tab.EOF

%>

<option value="<%= tab("area").value%>"><%= tab("area").value%></option>

<%

tab.movenext

wend

 

tab.close

Set tab = nothing

 

%> </select></td>

 

</tr>

</table>

<table border="0" width="100%" height="194">

<tr>

<td width="18%" height="25"><small><font face="Verdana"><b>Ambiente:</b></font></small></td>

<td width="82%" height="25"><select name="Ambiente" size="1">

<option value="Selecionar Ambiente">Selecionar Ambiente</option>

<%

 

rem Set conn = Server.CreateObject("ADODB.Connection")

rem conn.Open "g_mudancas"

q ="select distinct codAmbiente, Ambiente from Ambiente"

set tab = conn.execute(q)

while not tab.EOF

%>

<option value="<%= tab("Ambiente").value%>"><%= tab("Ambiente").value%></option>

<%

tab.movenext

wend

 

tab.close

Set tab = nothing

%> </select></td>

</tr>

<tr>

<td width="18%" height="34"><small><font face="Verdana"><b>Software/Hardware envolvido:</b></font></small></td>

<td width="82%" height="34"><input type="text" name="Software/Hardware envolvido" size="42"> <font face="Verdana"

color="#FF0000"><small></small></font></td>

</tr>

<tr>

<td width="18%" height="123"><small><font face="Verdana"><b>Motivo da Alteração:</b></font></small></td>

<td width="82%" height="123"> <font face="Verdana"

color="#FF0000"><small><textarea rows="4" name="S1" cols="36"></textarea></small></font></td>

</tr>

 

</table>

<p>                                        

<input type="submit" value="Enviar" name="Enviar">      <input

type="reset" value="Limpar" name="Limpar"></p>

</form>

</table>

 

</body>

Compartilhar este post


Link para o post
Compartilhar em outros sites

cara isso<%= tab("area").value%>é o mesmo que <%response.write(tab("area").value)%>portanto seu codigo tem response simtenta mudar pra isso e ve se funfa<%= tab("area")%>mas pra todos os responses que não é apenas este que mostrei

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu mudei so algumas coisas... nd demais...

testa esse codigo...

 

<%
Set conn = Server.CreateObject("ADODB.Connection")
StrConexao="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=Y:\csunet\servicos\G_Mudancas\cadmudancas.asp\BD_g_mudancas.mdb"
conn.Open StrConexao
%>
<html>

<head>
<title>Gerência de Mudanças</title>
<meta name="Autor" content="Renata M">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
</head>

<body background="fundo.gif" bgproperties="fixed" leftmargin="30">

<p><img src="barra_foto3.jpg" width="117" height="43">
<strong>
<font face="Verdana"><small>   Infra-Estrutura</small><small><small>
<font color="#008080">-------------------------------Gerência de Mudanças</font></small></small></font></strong></p>

<table border="0" width="99%">
<tr>
<td width="100%" align="center">
<form method="get" action="envio1.asp">
<div align="left">
<p>
<img src="bolinha.gif" width="11" height="11" alt="bolinha.gif (844 bytes)">
<font color="#FF0000" face="Verdana"><small>Obrigatório preenchimento de todos os campos</small></font></p>
</div>
<table border="0" width="100">

<table border="0" width="466">
<tr>
<td width="144"><small><font face="Verdana"><b>Data:</b></font></small></td>
<td width="308"><input type="text" name="Data" size="12">
<font face="Verdana" color="#FF0000"><small><small>(Campo obrigatório)</small></small></font></td>
</tr>
<tr>
<td width="144"><small><font face="Verdana"><b>Analista:</b></font></small></td>
<td width="308"><select name="analista" size="1">
<option value="Selecionar analista">Selecionar analista</option>
<%
q ="select distinct cod_Analista, analista from analista"
set tab = conn.execute(q)
while not tab.EOF
%>
<option value="<%=tab("analista").value%>"><%=tab("analista").value%></option>
<%
tab.movenext
wend
tab.close
Set tab = nothing
%>
</select></td>
</tr>
<table border="0" width="466">
<tr>
<td width="144"><small><font face="Verdana"><b>Area:</b></font></small></td>
<td width="308"><select name="area" size="1">
<option value="Selecionar area">Selecionar area</option>
<%
q ="select distinct codArea, area from area"
set tab = conn.execute(q)
while not tab.EOF
%>
<option value="<%=tab("area").value%>"><%=tab("area").value%></option>
<%
tab.movenext
wend

tab.close
Set tab = nothing

%> </select></td>
</tr>
</table>
<table border="0" width="100%" height="194">
<tr>
<td width="18%" height="25"><small><font face="Verdana"><b>Ambiente:</b></font></small></td>
<td width="82%" height="25"><select name="Ambiente" size="1">
<option value="Selecionar Ambiente">Selecionar Ambiente</option>
<%
q ="select distinct codAmbiente, Ambiente from Ambiente"
set tab = conn.execute(q)
while not tab.EOF
%>
<option value="<%=tab("Ambiente").value%>"><%=tab("Ambiente").value%></option>
<%
tab.movenext
wend

tab.close
Set tab = nothing
%> </select></td>
</tr>
<tr>
<td width="18%" height="34"><small><font face="Verdana"><b>Software/Hardware envolvido:</b></font></small></td>
<td width="82%" height="34"><input type="text" name="Software/Hardware envolvido" size="42"> </td>
</tr>
<tr>
<td width="18%" height="123"><small><font face="Verdana"><b>Motivo da Alteração:</b></font></small></td>
<td width="82%" height="123"> <font face="Verdana"
color="#FF0000"><small><textarea rows="4" name="S1" cols="36"></textarea></small></font></td>
</tr>

</table>
<p>
<input type="submit" value="Enviar" name="Enviar">     
<input type="reset" value="Limpar" name="Limpar"></p>
</form>
</table>

</body>
</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

cara isso

 

<%= tab("area").value%>

 

é o mesmo que

 

<%response.write(tab("area").value)%>

 

portanto seu codigo tem response sim

 

tenta mudar pra isso e ve se funfa

 

<%= tab("area")%>

 

mas pra todos os responses que não é apenas este que mostrei

<{POST_SNAPBACK}>

Eu fiz as modificações, mas continua sem aparecer todos os campos e sem fazer conexão com o BD.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Outra coisa que eu reparei a pouco....

DBQ=Y:\csunet\servicos\G_Mudancas\cadmudancas.asp\BD_g_mudancas.mdb

 

A linha acima é o caminho do banco de dados... cadmudancas.asp é a pasta onde esta o banco de dados? ou seria so o arquivo?

 

caso seja o arquivo... o correto seria DBQ=Y:\csunet\servicos\G_Mudancas\BD_g_mudancas.mdb

 

olha isso..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Outra coisa que eu reparei a pouco....

DBQ=Y:\csunet\servicos\G_Mudancas\cadmudancas.asp\BD_g_mudancas.mdb

 

A linha acima é o caminho do banco de dados... cadmudancas.asp é a pasta onde esta o banco de dados? ou seria so o arquivo?

 

caso seja o arquivo... o correto seria DBQ=Y:\csunet\servicos\G_Mudancas\BD_g_mudancas.mdb

 

olha isso..

<{POST_SNAPBACK}>

eu tirei o comentário(rem) da primeira conexão com o banco na parte do analista, aí apareceu esse erro na hora que eu conectei:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

 

[Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot open the file '(unknown)'. It is already opened exclusively by another user, or you need permission to view its data.

 

/servicos/G_Mudancas/envio1.asp, line 35

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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