Ir para conteúdo

POWERED BY:

Arquivado

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

Senna

Aspupload

Recommended Posts

Ai galera, preciso fazer upload em asp e com banco de dados access, só que não consigo!Alguém teria algo para me ajudar?Valeu e até mais!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ae velho....exatamente o que você quer ta abaixo...<!-- #include file="../includes/conexao.asp"--><%Dim mySmartUploadDim intCountDim sql3Dim oRsSet mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")mySmartUpload.Upload' Extensões permitidas mySmartUpload.AllowedFilesList = "jpg,jpeg,gif"' DExtensões não permitidas mySmartUpload.DeniedFilesList = "exe,bat,asp,htm,php.txt" ' Pasta onde será salvo os arquivosintCount = mySmartUpload.Save("../images")cod = mySmartUpload.form("cod")modelo = mySmartUpload.form("modelo")set oRs = server.CreateObject ("ADODB.RECORDSET")sql3 = "select * from LAP005TB_VEICULOS"oRs.open sql3,objconn,3,3' Inserir na tabela os campos de uploadoRs.AddNewFor each item In mySmartUpload.Files oRs("ATSV_005FOTO1") = mySmartUpload.Files.item(1).FileName oRs("ATSV_005FOTO2") = mySmartUpload.Files.item(2).FileName oRs("ATSV_005FOTO3") = mySmartUpload.Files.item(3).FileName oRs("ATSV_005FOTO4") = mySmartUpload.Files.item(4).FileName oRs("ATSV_005FOTO5") = mySmartUpload.Files.item(5).FileName oRs("ATSV_005FOTO6") = mySmartUpload.Files.item(6).FileName oRs("ATSV_005FOTO7") = mySmartUpload.Files.item(7).FileName intCount = intCount + 1 Next ' Inserir no tabela os campos NÃO-UPLOAD For each item In mySmartUpload.Form For each value In mySmartUpload.Form(item) oRs("FKNI_005AGENCIA") = mySmartUpload.form("agencia") oRs("FKNI_005MARCA") = "" & variavel & "" oRs("FKNI_005MODELO") = mySmartUpload.form("modelo") oRs("ATSV_005VALOR") = mySmartUpload.form("valor") oRs("ATSF_005STATUS") = mySmartUpload.form("classificacao") oRs("ATSV_005COR") = mySmartUpload.form("cor") oRs("ATNI_005ANO") = mySmartUpload.form("ano") oRs("ATSV_005OPCIONAIS") = mySmartUpload.form("opcionais") oRs("ATSV_005OBS") = mySmartUpload.form("obs") oRs("ATSV_005KM") = mySmartUpload.form("km") oRs("ATSV_005COMBS") = mySmartUpload.form("combustivel") Next Next oRs.Updateresponse.Redirect("veiculos.asp?cod=" & cod & "")abraços...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ai galera, será que alguém aqui já usou o aspupload com fotos e banco de dados access, preciso de uma ajuda, se alguém poder me ajudar ficaria muito contente e aliviado, pois já estou uma semana tentando inserir fotos no db access e nada!Valeu ai galera!!!Hey Ho! Let's Go!

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.