Ir para conteúdo

POWERED BY:

Arquivado

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

Penna

Update + insert + update + request ta dando erro!!

Recommended Posts

Tenho esse código que pega os dados do formulário faz um upload, depois faz um insert e um upload, mas o problema é que nenhum dado esta indo para o banco de dados, já fiz o response.write sql e realmente retorna nada. Tentei mundar o jogo de Request mas da erro de Binary não sei o que.Ta ai:

<%Set cnNoticias = Server.CreateObject("ADODB.Connection")cnNoticias.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../Noticias.mdb")a        = Request("a")t        = Request("t")NotID    = Request("NotID")Area    = Request("Area")Titulo  = Request("Titulo")Noticia  = Request("Noticia")Imagem  = Request("Imagem")Resumo  = Request("Resumo")Autor    = Request("Autor")If a = "N" ThenintCount=0        Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")    mySmartUpload.TotalMaxFileSize = 2000000  FileName = mySmartUpload.AllowedFilesList = "gif,jpg,jpeg"  'mySmartUpload.DeniedFilesList = "exe,bat,asp,mdb"    mySmartUpload.Upload mySmartUpload.Save("../imagens")  For each file In mySmartUpload.Files        FileName = file.Name        FileSize = file.Size        FileNameA = file.FileName        intCount = intCount + 1  Next If t = "u" Then  SQL = "UPDATE Noticias SET Area = '"&Area&"', Titulo = '"&Titulo&"', Noticia = '"&Noticia&"', Imagem = '"&FileNameA&"', Resumo = '"&Resumo&"', Autor = '"&Autor&"' WHERE NotID = "&NotID&"" ElseIf t = "i" Then  SQL = "INSERT INTO Noticias(Area, Titulo, Noticia, Imagem, Resumo, Autor)Values('"&Area&"', '"&Titulo&"', '"&Noticia&"', '"&FileNameA&"', '"&Resumo&"', '"&Autor&"')" End IfElseIf a = "EN" Then SQL = "DELETE FROM Noticias WHERE NotID = "&NotID&""End If Set Rs = cnNoticias.Execute(SQL)Response.Redirect "adm.asp"%>

Preciso de ajuda, por favor.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.