Ir para conteúdo

POWERED BY:

Arquivado

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

vitor thiago

erro erro so da esse erro e nao sei mais o que fazer

Por , em ASP Clássico

Recommended Posts

vitor thiago    0

vitor thiago
Postado

salve galera tenho esse pequeno codigo para me gerar um tipo de relatorio mais quando eu seleciono da o seguinte erro

 

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

 

/includes/r_pacote.asp, line 35

sendo que estou no meu limite de conhecimento , nao sei mais o que fazer!

segue o codigo abaixo:

 

<!--#include file="inclusao.asp"-->

<%

If Session("responsavel")="" Then Response.redirect("../default.asp")

operadora = request("operadora")

%>

<html>

<head>

<title></title>

<link href="../style.css" rel="stylesheet" type="text/css">

 

<script language="JavaScript" type="text/JavaScript">

<!--

function MM_callJS(jsStr) { //v2.0

return eval(jsStr)

}

//-->

</script>

</head>

<body class="body">

<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000" align="center">

<tr>

<td colspan="7" height="20">

<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#0074C1">

<tr height="30">

<td class="branca"><div align="center"><b>OPERADORA <%=operadora%></b></div></td>

</tr>

</table>

</td>

</tr>

<%

Set rs = Server.CreateObject("ADODB.recordset")

Call abre_conn

sql = "Select * from C_DESPESA_MENSAL where PROVEDOR = '"& OPERADORA &"'"

rs.cursorlocation = 3

linha 35 rs.open sql, conn

IF rs.recordcount <> 0 then

%>

<tr bgcolor="#FFFFFF">

<td class="lista"><b>Mes/Ano Referente</b></td>

<td class="lista"><b>Serv. de Telecom</b></td>

<td class="lista"><b>Multas</b></td>

<td class="lista"><b>Instalações</b></td>

<td class="lista"><b>Alug. Equip.</b></td>

<td class="lista"><b>Descontos</b></td>

<td class="lista"><b>TOTAL Com Impostos</b></td>

</tr>

<%

While not rs.eof

Valor_Servico = cdbl(rs("Valor_Servico")) + cdbl(rs("Valor_Pro_Rata"))

%>

<tr bgcolor="#FFFFFF">

<td class="negrito"><b><%=rs("Mes_Ano")%></b></td>

<td class="lista"><%=FormatCurrency(Valor_Servico)%></td>

<td class="lista"><%=FormatCurrency(rs("Valor_Multa"))%></td>

<td class="lista"><%=FormatCurrency(rs("Valor_Instalacao"))%></td>

<td class="lista"><%=FormatCurrency(rs("Valor_Equipamento"))%></td>

<td class="lista"><%=FormatCurrency(rs("Valor_Desconto"))%></td>

<td class="negrito"><b><%=FormatCurrency(rs("Valor_Total"))%></b></td>

</tr>

 

<%

rs.movenext

Wend

%>

<tr bgcolor="#FFFFFF" height="30">

<td colspan="7"><div align="center">

<input name="Imprimir" type="button" class="botao" id="Imprimir" value="Imprimir" onClick="MM_callJS('print()')">

</div></td>

</tr>

</table>

<%

ELSE

%>

<tr bgcolor="#FFFFFF">

<td class="lista" colspan="7">Despesa não Lançada</td>

</tr>

</table>

<%

END IF

rs.close

Call fecha_conn

Set rs = nothing

%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

qual a linha do erro???

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