Caros Amigos,
Estou meio que iniciando agora nos componentes, é o seguinte, consigo fazer upload das imagens normalmente para a pasta no servidor, até aí td bem, agora como eu faço para adicionar o nome delas junto ao meu BD, no caso estou desenvolvendo um site de uma loja de carros, o meu cliente cadastraria os dados do veículo, upava a foto e ao entrar no site, ja apareceria o item cadastrado, porém não consigo fazer isso apenas em um formulário, já que as informações e a foto devem estar casadas para exibição.
Se alguém puder me ajudar, fico muito agradecido.
Abraço a todos.
Gravar Nome Do Arquivo No Bd
Started By Igor - Sempre On Com., 24/03/2007, 13:50
1 reply to this topic
#1
Igor - Sempre On Com.
-
- Usuários
-
- 4 posts
Novato no fórum
- Sexo:Não informado
Posted 24/03/2007, 13:50
#2
Andre_seduc
-
- Usuários
-
- 38 posts
Turista
- Sexo:Não informado
Posted 26/06/2007, 13:38
bem eu tbm sou novato mas acho q posso t ajudar...
eu faço o upload da seguinte forma:
eu gravo no banco apenas o nome da imagem e sua extensão(foto.gif)eu gravo a imagem em um diretorio no servidor, e para utilizar é só fazer(<img src="diretorio_img\<%=rs("campo_foto")%>">);
acho q naum expliquei direito entaum veja o meu exemplo:
---------------------------------------------------------------------------------
'''''''''''''''form.asp''''''''''''''''''''''''''''''''''''''''''''''''''''''
<html>
<form method="post" action="upload.asp" ENCTYPE="multipart/form-data">
<input type=file name=imagem>
<input type=submit value=upload>
</form>
</html>
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''''upload.asp''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
<!--#include file="conexao.asp"-->
<%
Dim load
Dim Path
Dim sql
Dim cmd
Dim Rs
Dim str
Set load = Server.CreateObject("Persits.Upload")
load.Save
Path = "C:\Inetpub\wwwroot\upload com sucesso\img"
load.Files("imagem").SaveAs Path & load.Files("imagem").FileName
sql = "insert into tb_cadastro (nome, descricao, foto, admin, senha) values ('" & load.Form("nome") & "','"& load.Form("descricao") &"','" & load.Files("imagem").FileName & "','"& load.Form("admin") &"','"& load.Form("senha") &"')"
Set Cmd = Server.CreateObject("ADODB.Command")
Cmd.ActiveConnection = Conn
Cmd.CommandText = sql
Cmd.Execute()
str = "select * from tb_cadastro where nome='" & load.form("nome") & "'"
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open str, Conn
%>
<html>
<body bgcolor=#f5f5f5>
<center>
<img src="img/<%=Rs("foto")%>" border=1>
</center>
<h1 align=center>parabens,<%=Rs("nome")%></h1>
</body>
</html>
<%
Set Cmd = Nothing
Set load = Nothing
Rs.close()
Conn.Close()
Set Conn = Nothing
Set Rs = Nothing
%>
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
cara isso deve funcionar pois funciona no meu, espero ter ajudado........
eu faço o upload da seguinte forma:
eu gravo no banco apenas o nome da imagem e sua extensão(foto.gif)eu gravo a imagem em um diretorio no servidor, e para utilizar é só fazer(<img src="diretorio_img\<%=rs("campo_foto")%>">);
acho q naum expliquei direito entaum veja o meu exemplo:
---------------------------------------------------------------------------------
'''''''''''''''form.asp''''''''''''''''''''''''''''''''''''''''''''''''''''''
<html>
<form method="post" action="upload.asp" ENCTYPE="multipart/form-data">
<input type=file name=imagem>
<input type=submit value=upload>
</form>
</html>
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''''upload.asp''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
<!--#include file="conexao.asp"-->
<%
Dim load
Dim Path
Dim sql
Dim cmd
Dim Rs
Dim str
Set load = Server.CreateObject("Persits.Upload")
load.Save
Path = "C:\Inetpub\wwwroot\upload com sucesso\img"
load.Files("imagem").SaveAs Path & load.Files("imagem").FileName
sql = "insert into tb_cadastro (nome, descricao, foto, admin, senha) values ('" & load.Form("nome") & "','"& load.Form("descricao") &"','" & load.Files("imagem").FileName & "','"& load.Form("admin") &"','"& load.Form("senha") &"')"
Set Cmd = Server.CreateObject("ADODB.Command")
Cmd.ActiveConnection = Conn
Cmd.CommandText = sql
Cmd.Execute()
str = "select * from tb_cadastro where nome='" & load.form("nome") & "'"
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open str, Conn
%>
<html>
<body bgcolor=#f5f5f5>
<center>
<img src="img/<%=Rs("foto")%>" border=1>
</center>
<h1 align=center>parabens,<%=Rs("nome")%></h1>
</body>
</html>
<%
Set Cmd = Nothing
Set load = Nothing
Rs.close()
Conn.Close()
Set Conn = Nothing
Set Rs = Nothing
%>
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
cara isso deve funcionar pois funciona no meu, espero ter ajudado........
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
