Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Galera sou novato aqui no Fórum e estou tentando fazer uma conexão com o banco de dados mas tá dificil.
Já configurei o ODBC para um banco chamado nwind.mdb, mas toda vez que executo ele dá esse erro aí:
Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 3.
/livro/Capitulo5/clientes.asp, line 43
Sinceramente já estou meio desesperado pois já fiz diversas alterações e o distinto não vai.Se alguém puder me ajudar eu fico muito grato!!!
Segue o código para melhor análise.
ASP
<%@ 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.Codigo_Cliente, Clientes.Cargo, Clientes.Endereco,Clientes.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>Codigo</TD>
<TD align=middle bgColor=gray>Cargo</TD>
<TD align=middle bgColor=gray>Endereco</TD>
<TD align=middle bgColor=gray>Fone</TD>
</TR>
<%
Do Until Clientes.eof %>
<TR>
<TD align=middle bgColor=gray><%=Clientes.Fields("Codigo_Cliente")%></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 %>
</TABLE>
</P>
<HR>
</BODY>
</HTML>
Obrigado e espero que consigam decifrar essa pra mim.
Abraço
Thebadshark
Carregando comentários...