Quando tento abrir uma página em meu navegador Windos Explore 6.0 em meu XP Professional onde a mesma deveria abrir o Banco de dados nwin.mdb devidamente configurado aparece err
O código ASP 3.0:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE>Listagem de Clientes</TITLE>
</HEAD>
<BODY>
<H1>
<FONT color=navy>Clientes da Empresa ABC LTDA.</FONT>
</H1>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "nwind"
inst_sql="SELECT Clientes.CodigoCliente, Clientes.Cargo, Clientes.Endereco,Clientes.Fone FROM Clientes"
'Nesta linha acima, há uma utilização desnecessária de redeclarações sistemáticas de tabelas,
'tornando-se totalmente dispensável a palavra juntamente com o ponto ("Clientes.") que antecede cada nome
'de campo. Ficando assim, o mais conveniente:
'"SELECT CodigoCliente, Cargo, Endereco, Fone FROM clientes"
Set Clientes = Server.CreateObject("ADODB.Recordset")
Pergunta
Guest - Manckenna -
Quando tento abrir uma página em meu navegador Windos Explore 6.0 em meu XP Professional onde a mesma deveria abrir o Banco de dados nwin.mdb devidamente configurado aparece err
O código ASP 3.0:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE>Listagem de Clientes</TITLE>
</HEAD>
<BODY>
<H1>
<FONT color=navy>Clientes da Empresa ABC LTDA.</FONT>
</H1>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "nwind"
inst_sql="SELECT Clientes.CodigoCliente, Clientes.Cargo, Clientes.Endereco,Clientes.Fone FROM Clientes"
'Nesta linha acima, há uma utilização desnecessária de redeclarações sistemáticas de tabelas,
'tornando-se totalmente dispensável a palavra juntamente com o ponto ("Clientes.") que antecede cada nome
'de campo. Ficando assim, o mais conveniente:
'"SELECT CodigoCliente, Cargo, Endereco, Fone FROM clientes"
Set Clientes = Server.CreateObject("ADODB.Recordset")
Clientes.Open inst_sql, conn, 3, 3
%>
<P>
<HR>
<TABLE bgColor=gray border=1 borderColor=navy cellPadding=1 cellSpacing=1
width="100%">
<TR>
<TD align=middle bgColor=gray>Código</TD>
<TD align=middle bgColor=gray>Cargo</TD>
<TD align=middle bgColor=gray>Endereço</TD>
<TD align=middle bgColor=gray>Fone</TD>
</TR>
<%
Do Until Clientes.eof %>
<TR>
<TD align=middle bgColor=gray><%=Clientes.Fields("CodigoCliente")%>& lt;/TD>
<TD align=middle bgColor=gray><%=Clientes.Fields("Cargo")%></TD&g t;
<TD align=middle bgColor=gray><%=Clientes.Fields("Endereco")%></T D>
<TD align=middle bgColor=gray><%=Clientes.Fields("Fone")%></TD> ;
</TR>
<%
Clientes.MoveNext
loop %>
<%
'nesta parte da página é indipensável que se destrua as informações contidas no servidor
'para liberar o pool do ADO e a memória do mesmo. Seguem-se abaixo as linhas altamente recomendáveis:
Clientes.close
conn.Close
Set clientes = nothing
Set conn = nothing
%>
</TABLE>
</P>
<HR>
</BODY>
</HTML>
O erro:
Não é possível exibir a página
Ocorreu um problema com a página que você está tentando acessar e não é possível exibi-la.
------------------------------------------------------------ --------------------
Experimente o seguinte:
Clique no botão Atualizar ou tente novamente mais tarde.
Abra a localhost home page e procure os links para as informações desejadas.
HTTP 500.100 - Servidor interno Erro - erro do ASP
Internet Information Services
------------------------------------------------------------ --------------------
Informações técnicas (para a equipe de suporte)
Tipo de err
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 4.
/Asp03/Listagem5-1.asp, line 26
Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; FunWebProducts)
Página:
GET /Asp03/Listagem5-1.asp
Hora:
quarta-feira, 31 de agosto de 2005, 21:30:25
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.