Ir para conteúdo

POWERED BY:

Arquivado

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

Alexandre Queiróz

Erro de sintaxe na cláusula FROM.

Por , em ASP Clássico

Recommended Posts

Alexandre Queiróz    0

Alexandre Queiróz
Postado

Pessoal,

 

Estou aprendendo ASP e no livro há um exemplo que estou testando e não consigo rodar o script.

O IE dá a seguinte mensagem:

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)

[Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 1.

/livro/Capitulo5/clientes.asp, line 15

 

 

Tipo de navegador:

Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 2.0.50727; .NET CLR 2.0.50215; .NET CLR 1.1.4322)

 

Página:

GET /livro/Capitulo5/clientes.asp

 

****************************

 

Segue abaixo o código da página:

 

<%@ 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"

sql="SELECT Clientes.CodigoDoCliente, Clientes.CargoDoContato, Clientes.Endereço, Clientes.Telefone FROM Clientes"

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

Clientes.Open 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="middel" bgcolor="gray">Fone</td>

</tr>

<%

Do Until Clientes.eof %>

<tr>

<td align="middle" bgcolor="gray"><%=Clientes.Fields("CodigoDoCliente")%></td>

<td align="middle" bgcolor="gray"><%=Clientes.Fields("CargoDoContato")%></td>

<td align="middle" bgcolor="gray"><%=Clientes.Fields("Endereço")%></td>

<td align="middle" bgcolor="gray"><%=Clientes.Fields("Telefone")%></td>

</tr>

<%

Clientes.MoveNext

Loop %>

</table>

</p>

<hr>

</body>

</html>

 

******************************

Esta é a linha que gera o erro:

 

Clientes.Open sql, conn, 3, 3

 

Se alguém puder me ajudar eu agradeço! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Alexandre.

Compartilhar este post

Link para o post
Compartilhar em outros sites

hao    0

hao
Postado

acho q tem a ver com esta parte

 

conn.Open "nwind"

 

use assim, sem as aspas

 

conn.Open = nwind

 

ou você coloca o caminho

 

conn.Open = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("banco.mdb")

ou da o caminho na variavel "nwind"

 

nwind = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("banco.mdb")conn.Open = nwind

acho q pode ser isso..

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