Ir para conteúdo

POWERED BY:

Arquivado

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

Fadweb

Não consigo criar um sistema de upload de arquivos com banco de dados

Por , em ASP Clássico

Recommended Posts

Fadweb    0

Fadweb
Postado

Por favor gostaria que me ajudassem pois sou iniciante na programação em asp e estou tentando criar um sistema de upload de arquivo com banco de dados só que faço o sistema pra subir o arquivo para o servidor ele vai só que não grava as informações no banco para posso depois fazer uma pagina de consulta com os arquivos que fora feitos uploads

 

Abaixo o código da pagina de envio

 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<!-- saved from url=(0014)about:internet -->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Administrativo - Conteudo</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />


<style type="text/css">
<!--
.style47 {color: #00000}
.style48 {color: #000000}
-->
</style>
</head>
<body bgcolor="#ffffff">
<p>

  <span class="style47">
	  Cadastrar Fotos</span> </p>
<form action="adm_fotos_cadastrarUP2.asp %>" method="post" enctype="multipart/form-data" name="form1" id="form1">
  <br />
  <table align="center">
	<tr valign="baseline">
	  <td nowrap="nowrap" align="right"><span class="style47">Data:</span></td>
	  <td><input name="data" type="text" id="data" value="<%=date()%>" /></td>
	</tr>
	<tr valign="baseline">
	  <td align="right" nowrap="nowrap"><span class="style47">Arquivo:</span></td>
	  <td><input name="file1" type="file" value="" size="32" />	  </td>
	</tr>
	<tr valign="baseline">
	  <td align="right" nowrap="nowrap">Login</td>
	  <td><input type="text" name="login" id="login" /></td>
	</tr>
	<tr valign="baseline">
	  <td align="right" nowrap="nowrap"><span class="style47"> Senha :</span></td>
	  <td><input type="text" name="senha" id="senha" /></td>
	</tr>
	<tr>
	  <td nowrap="nowrap" align="right" valign="top"><span class="style47">Descrição:</span></td>
	  <td valign="baseline"><span class="style48">
		<textarea name="descricao" cols="50" rows="5"></textarea>
	  </span> </td>
	</tr>
	<tr valign="baseline">
	  <td nowrap="nowrap" align="right"><span class="style47">Ativo</span></td>
	  <td><span class="style48">
		<select name="destaque">
		  <option value="true"  selected="selected">Sim</option>
		  <option value="false" >Não</option>
		</select>
	  </span> </td>
	</tr>
	<tr valign="baseline">
	  <td colspan="2" align="right" nowrap="nowrap"><div align="center" class="style48">
		<input name="submit" type="submit" value="Inserir" />
	  </div></td>
	</tr>
  </table>
  <input type="hidden" name="MM_insert" value="form1" />
</form>
<p> </p>
<p></p>
</body>
</html>

 

 

 

Abaixo o código da pagina que processar e manda o arquivo para o servidor e faz inclusão no banco

 

<!--#include file="../Connections/adm_fotosclientes.asp" -->
 <% 
Server.ScriptTimeout=240

	
	Set Upload = Server.CreateObject("Persits.Upload.1")
	Upload.OverwriteFiles = False
	On Error Resume Next
	Upload.SetMaxSize 5048576	' Limit files to 1MB
	
	'diretorio de upload.... normalmente. d:\home\cwdnt\DOMINIO\web\imagens
	Count = Upload.save(server.MapPath("../uploads")) 

	For Each File in Upload.Files
		if file.name = "file1" then
			
			imagem1 = File.ExtractFileName
		
		end if
	next

'gravar dados da imagem no banco de dados.

set conn = server.CreateObject("ADODB.connection")
conn.open MM_fotos_STRING

IF imagem1 <> "" THEN 
querystr = "insert into fotos (descricao,data,foto,login,senha,destaque)"&_
" values('"&replace(upload.form("descricao"),"'","''") & "'," &_
" #"&month(upload.form("data"))&"/"&day(upload.form("data"))&"/"&year(upload.form("data")) & "#," &_
" '"&imagem1& "'," &_
" "&upload.form("login")& " , " &_
" "&upload.form("senha")& " , " &_
" "&upload.form("destaque") & "" &_
" )"

 conn.execute(querystr)
END IF 
conn.close()

response.redirect("adm_acessoCliente_Consulta2.asp")
'response.Write(querystr)
%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Vinicius Ianni    189

Vinicius Ianni
Postado

Bom Dia !

 

Pelo que andei lendo na pagina que processa o formulario, tem uma coisa que achei estranho (talvez pq nao utilize assim)

mas o que é o &_ ?

no "&upload.form("destaque") & "" &_

acho que seria melhor um request.form("destaque") por exemplo.

 

Tem um modelo de upload sem componentes que voce deve achar na parte do laboratorio de scripts, procura por upload sem componentes que você acha.

 

Abraços,

Vinicius Ianni

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