Could Not Save; Currently Locked By Another User.

[AnD]

Opa Galera!

Tenho um e-commerce, e quando vou editar o produto para mudar a quantidade de estoque, me ocorre o seguinte erro:

Microsoft JET Database Engine error '80040e21'

Could not save; currently locked by another user.

/watchstar/painel/AltProduto.asp, line 331

321. Set AltBd = Server.CreateObject("ADODB.Recordset")
322. AltBd.CursorLocation = adUseServer
323. AltBd.CursorType = adOpenForwardOnly
324. AltBd.LockType = adLockOptimistic
325. AltBd.Open "SELECT * FROM Produtos WHERE Cod = "& VarProduto &"", Banco, , , adCmdText
326.	AltBd("CodCategoria") = VarCategoria
327.	AltBd("CodSubCategoria") = VarSubCategoria
328.	AltBd("NomeProduto") = VarNomeProduto
329.	AltBd("PrecoDe") = VarPrecoDe
330.	AltBd("PrecoPor") = VarPrecoPor
331.	AltBd("Descricao") = VarDescricao
332.	AltBd("BreveDescricao") = VarBreveDescricao
333.	AltBd("Estoque") = VarEstoque
334.	AltBd("Peso") = VarPeso
335. AltBd.Update
336. AltBd.Close

Percebi que o erro está sendo por muuuita descrição do produto. O problema é que quando insere, está inserindo normal, não dando este erro.

Então para ter certeza, inseri um produto com descrição bem menor, dae quando edito, edita normal.

Galera, help-me!!!

Trank's

[ ]'s

[bareta]

é esquisito o tipo do erro

Could not save; currently locked by another user.

que fala que tá bloqueado por outro ususario....

faça o seguinte divida em etapas o cadastro de novos produtos

[koal40]

uq você qr fazer? adicionar ou selecionar dados?

SELECIONAR:

321. Set AltBd = Server.CreateObject("ADODB.Recordset")
322. AltBd.CursorLocation = adUseServer
323. AltBd.CursorType = adOpenForwardOnly
324. AltBd.LockType = adLockOptimistic
325. AltBd.Open "SELECT * FROM Produtos WHERE Cod = "& VarProduto &"", Banco, , , adCmdText
326. VarCategoria = AltBd("CodCategoria")
327. VarSubCategoria = AltBd("CodSubCategoria")
328. VarNomeProduto = AltBd("NomeProduto")
329.VarPrecoDe =  AltBd("PrecoDe")
330. VarPrecoPor = AltBd("PrecoPor")
331. VarDescricao = AltBd("Descricao")
332. VarBreveDescricao = AltBd("BreveDescricao")
333. VarEstoque = AltBd("Estoque")
334. VarPeso = AltBd("Peso")
335. AltBd.Close

ADICIONAR:

321. Set AltBd = Server.CreateObject("ADODB.Recordset")
322. AltBd.CursorLocation = adUseServer
323. AltBd.CursorType = adOpenForwardOnly
324. AltBd.LockType = adLockOptimistic
325. AltBd.Open "Produtos WHERE Cod = "& VarProduto
325,5. AltBd.addnew
326. AltBd("CodCategoria") = VarCategoria
327. AltBd("CodSubCategoria") = VarSubCategoria
328. AltBd("NomeProduto") = VarNomeProduto
329. AltBd("PrecoDe") = VarPrecoDe
330. AltBd("PrecoPor") = VarPrecoPor
331. AltBd("Descricao") = VarDescricao
332. AltBd("BreveDescricao") = VarBreveDescricao
333. AltBd("Estoque") = VarEstoque
334. AltBd("Peso") = VarPeso
335. AltBd.Update
336. AltBd.Close

acho q é assim...

[Guest Guest]

Opa Galera!

Tenho um e-commerce, e quando vou editar o produto para mudar a quantidade de estoque, me ocorre o seguinte erro:

Microsoft JET Database Engine error '80040e21'

Could not save; currently locked by another user.

/watchstar/painel/AltProduto.asp, line 331

321. Set AltBd = Server.CreateObject("ADODB.Recordset")
322. AltBd.CursorLocation = adUseServer
323. AltBd.CursorType = adOpenForwardOnly
324. AltBd.LockType = adLockOptimistic
325. AltBd.Open "SELECT * FROM Produtos WHERE Cod = "& VarProduto &"", Banco, , , adCmdText
326.	AltBd("CodCategoria") = VarCategoria
327.	AltBd("CodSubCategoria") = VarSubCategoria
328.	AltBd("NomeProduto") = VarNomeProduto
329.	AltBd("PrecoDe") = VarPrecoDe
330.	AltBd("PrecoPor") = VarPrecoPor
331.	AltBd("Descricao") = VarDescricao
332.	AltBd("BreveDescricao") = VarBreveDescricao
333.	AltBd("Estoque") = VarEstoque
334.	AltBd("Peso") = VarPeso
335. AltBd.Update
336. AltBd.Close

Percebi que o erro está sendo por muuuita descrição do produto. O problema é que quando insere, está inserindo normal, não dando este erro.

Então para ter certeza, inseri um produto com descrição bem menor, dae quando edito, edita normal.

Galera, help-me!!!

Trank's

[ ]'s

80040e21

Este erro pode ocorrer ao tentar inserir mais dados do que é permitido em um campo (por exemplo, se inserir 26 caracteres em um campo Microsoft Access formatado para aceitar somente 25 caracteres).