Ir para conteúdo

POWERED BY:

Arquivado

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

Manckenna

Página Não Abre o Banco de dados Pelo ODBC

Por , em ASP Clássico

Recommended Posts

Manckenna    0

Manckenna
Postado

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 erro: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")%></TD><TD align=middle bgColor=gray><%=Clientes.Fields("Cargo")%></TD><TD align=middle bgColor=gray><%=Clientes.Fields("Endereco")%></TD><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.closeconn.CloseSet clientes = nothingSet 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 ASPInternet Information Services--------------------------------------------------------------------------------Informações técnicas (para a equipe de suporte)Tipo de erro: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 26Tipo 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 Mais informações: Suporte da Microsoft

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

Parâmetros insuficientes. Eram esperados 4.este erro geralmente indica que parametros (nomes de colunas ou tabelas) diferentes dos que estao no db no selectveja se é isso mesmo

Compartilhar este post

Link para o post
Compartilhar em outros sites

Magnoweb    0

Magnoweb
Postado

li esse post e fiquei na dúvida, isso é possível....

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

 

conn.Open "nwind"

ou deveria ser

ASP

[*]<%

 

[*]Dim Oconn

 

[*]Set Oconn = Server.CreateObject("ADODB.Connection")

 

[*]Oconn.open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\caminhodobanco\nwind.mdb"

 

[*]%>

 

aonde é indicado o caminho do banco? :wacko:

 

flw B)

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

pode ser DNS.. ou DSN sei láalgo que só funciona neste PC

Compartilhar este post

Link para o post
Compartilhar em outros sites

Manckenna    0

Manckenna
Postado

pode ser DNS.. ou DSN sei lá

 

algo que só funciona neste PC

<{POST_SNAPBACK}>

Pessoal estou respondendo eu mesmo ao tópico levantado por mim para despertar o interesse das pessoas quanto a solução do mesmo:

 

Com a colaboração de nosso amigo Magno (infelizmente não me lembro de qual fórum ) foi possível fazer as alterações abaixo e a página abrir corretamente.........

Obs: Foi criado um “Include File” com o nome de “connect.asp” e salvo o mesmo (connect.asp) na mesma pasta e mesmo diretório.

 

Conect.asp :

 

<%

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

conn.Provider = "Microsoft.Jet.OLEDB.4.0"

Db = Server.MapPath("Cinco.mdb")

conn.Open Db

%>

 

Ai é só usar o script abaixo na página e tudo funciona maravilhosamente bem....................

 

<%@ Language=VBScript %>

<!--#Include File="connect.asp"-->

<HTML>

<HEAD>

<TITLE>Listagem de Clientes</TITLE>

</HEAD>

 

 

<%

inst_sql="SELECT * FROM Clientes"

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

Clientes.Open inst_sql, conn, 3, 3

%>

....................

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