7 replies to this topic

[knoxville]

fla galera... to com um problemao aki... ja conferi 1000 vezesa consulta sql, já verifiquei as permissões do arquivo, td o q se pode imaginar (até nas configurações do iis, negócio de acesso anonimo e tal)
o erro é esse:

# Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.
/diagmax/financeiro/controle.asp, line 32

# Tipo de navegador:
Mozilla/5.0 (Windows; U; Windows NT 5.1; pt-BR; rv:1.8.0.3) Gecko/20060426 Firefox/1.5.0.3

# Página:
POST 50 bytes to /diagmax/financeiro/controle.asp

# POST Data:
notaf=1234&valor=1234&data1=15&data2=&cadastrar=OK

erro comum... já tive várias vezes, acho q td mundo já teve, mas sempre resolvi facil! agora não tá dando certo.
os codes são esses:

<p align="center"><b><font size="4">Entrada</font></b></p>
<form method="POST" action="controle.asp?acao=addnf">
  <centeR><table border="0" cellpadding="0" width="381">
  <tr>
	<td align="left" width="131">
	  <p align="left">Nota Fiscal:</td>
	<td align="left" width="186"><input type="text" name="notaf" size="8"></td>
  </tr>
  <tr>
	<td align="left" width="131">
	  <p align="left">Valor Total:</td>
	<td align="left" width="186">R$ <input type="text" name="valor" size="8"></td>
  </tr>
  <tr>
	<td align="left" width="131">
	  <p align="left">Pagamento:</td>
	<td align="left" width="186"><input type="text" name="data1" size="2"> dias - <input type="text" name="data2" size="1"> dias</td>
  </tr>
  <tr>
	<td align="left" width="131"></td>
	<td align="left" width="186"><input type="submit" value="OK" name="cadastrar"></td>
  </tr>
  </table></center>

e

Function DataAdicional(DataAtual,Qtd_dias)
  NovaData = DateAdd("d",DataAtual,Qtd_dias)
  DataAdicional = NovaData
End Function
If Request.QueryString("acao") = "addnf" Then
empresa = "DiaSorin"
notaf = Request.Form("notaf")
valor = Request.Form("valor")
data1 = DataAdicional(Now,Request.Form("data1"))
data2 = Request.Form("data2")
If Len(data2) = "0" Then
formapagamento = "umax"
data2 = ""
Else
valor1 = ccur(valor)/2
valor2 = ccur(valor)/2
data2 = DataAdicional(Now,Request.Form("data2"))
End If
If formapagamento = "umax" Then
Sql = "Insert into contas(tipo,data,empresa,situacao,valor,notafiscal) values ('entrada', '"& data1 &"', 'DiaSorin', 'pagar', '"& valor &"', '"& notaf &"')"
Set Rs = Conexao.Execute(Sql)
Else
Sql = "Insert into contas(tipo,data,empresa,situacao,valor,notafiscal) values ('entrada', '"& data1 &"', 'DiaSorin', 'pagar', '"& valor1 &"', '"& notaf &"')"
Set Rs = Conexao.Execute(Sql)
Sqla = "Insert into contas(tipo,data,empresa,situacao,valor,notafiscal) values ('entrada', '"& data2 &"', 'DiaSorin', 'pagar', '"& valor2 &"', '"& notaf &"')"
Set Rsa = Conexao.Execute(Sqla)
End If
Response.Write "<center><font color=#FF0000>Pronto!<br></font></center>"
End If

alguem ae pelo amor de deus me ajuda!
vlw!

[replay]

Tenta compartilhar a pasta onde ta teu site

Se vc tiver conexão com rede é so vc clika com o botão direito encima da pasta e selecionar o compartolhamento de segurança... se vc não tiver vc vai ter que iniciar teu computador pelo modo de segurança logar como administrador e libera o compartilhamento....

Eu tb tava com esse problema eu simplesmente desistalei o IIS depois instalei de novo e la nas configurações do iis eu liberei pra gravar ler etc... depois eu fui no meu BD (arquivo) clikei com o botão direito encima e fiz o negocio de assistente de permição fui clicando em avançar... esse procedimento deu certo pra mim num sei se vai funfa com vc tb...

Valeu

[knoxville]

afff meo, nao consegui resolver o pepino! =\
joguei em otro pc da rede e funfou NORMAL
ptz
2 dias de trampo perdido por causa disso e descubro q o problema é na xxxxxx do meu notebook
:|

d qlq forma vlw replay, e entrei nesse Arena Tuning ai.. legal kra! parabens

[wozniak]

Só uma dica:

vc não precisa setar um RecordSet para o método insert

ex.:

Sqla = "Insert into contas(tipo,data,empresa,situacao,valor,notafiscal) values ('entrada', '"& data2 &"', 'DiaSorin', 'pagar', '"& valor2 &"', '"& notaf &"')"

Conexao.Execute(Sqla)

Abraços

[knoxville]

tive esse problema hj DENOVO! =/
ptz, eu já to me irritando com o asp/iis/access/windows
fiz td o negócio de assistente de permissão e tal, e nada!

PELO AMOR DE DEUS.... ALGUEM ME AJUDE, EU JÁ ATÉ DESINSTALEI E INSTALEI O IIS, E NÃO FUNCIONA ESSA *********

Edição feita por: knoxville, 09/06/2006, 13:45.

[Rodrigo Thiago]

cara o erro seu dever ser permissao de pasta mesmo ou tem algum erro no seu banco........
de permissao na pasta onde ta o "banco" pelo iis e nao clicando com o botao direito na pasta, faz este teste.

[Generation]

Segue,
http://forum.wmonlin...ndpost&p=613971

[knoxville]

engraçado.... já tinha feito TUDO isso e não tinha conseguido
aí acabei de formatar o pc e fui testar, também não deu! :/
aí agora fiz isso denovo e deu

MUITO OBRIGADO Generation e todos os outros que me ajudaram!
é por isso que eu amo esse forum! metade dos meus cabelos haviam caido e a outra metade perderam a pigmentação, mas agora axo q vai voltar ao normal! ^^