Ver Mensaje Individual
  #5 (permalink)  
Antiguo 30/07/2010, 17:06
makubexD
 
Fecha de Ingreso: junio-2010
Mensajes: 3
Antigüedad: 13 años, 10 meses
Puntos: 0
Sonrisa Respuesta: [Tutorial] Subir archivos al Servidor y agregarlos en la BD usando ASP.NET

Un saludo amigo!! veo que tienes mucha experiencia en esto de VB.net y SQL server 2008

Y nose me estaba preguntando si m podrias ayudar con esto!!

Como hago para almacenar una imagen en la BD desde ASP.net suponiendo que tenga una tabla de esta manera:

create table persona(
cod_persona int not null primary key,
nomcompleto_persona varchar(100),
foto_persona image
)

mmm no quiero que sea una ruta como la que esta para este boton en ASP.net

Código ASP:
Ver original
  1. Protected Sub btnRegistrar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRegistrar.Click
  2.  
  3.         If validar() Then
  4.             If btnRegistrar.Text = "REGISTRAR" Then
  5.                 Dim objPersona As New PersonaBE
  6.                 objPersona.Nombre = txtNombre.Text
  7.                 objPersona.RutaFoto = "Fotos_Personas" & "/" & Path.GetFileName(fuFoto.PostedFile.FileName)
  8.  
  9.                 Dim guardarFoto As String
  10.                 guardarFoto = "C:\Users\MakubexD\Desktop\CONTINUA4_MVELIZ\sitioWeb_Persona\Fotos_Personas" & Path.GetFileName(fuFoto.PostedFile.FileName)
  11.                 fuFoto.PostedFile.SaveAs(guardarFoto)
  12.  
  13.                 personaBLL.Registrar(objPersona)
  14.                 limpiar()
  15.                 listarPersonas()
  16.             Else
  17.                 Dim objPersona As New PersonaBE
  18.                 objPersona.Nombre = txtNombre.Text
  19.                 objPersona.RutaFoto = "Fotos_Personas" & "/" & Path.GetFileName(fuFoto.PostedFile.FileName)
  20.                 MsgBox(hfCodigo.Value)
  21.                 objPersona.Codigo = CInt(hfCodigo.Value)
  22.  
  23.                 Dim guardarFoto As String
  24.                 guardarFoto = "C:\Users\MakubexD\Desktop\CONTINUA4_MVELIZ\sitioWeb_Persona\Fotos_Personas" & Path.GetFileName(fuFoto.PostedFile.FileName)
  25.                 fuFoto.PostedFile.SaveAs(guardarFoto)
  26.  
  27.                 personaBLL.Modificar(objPersona)
  28.                 limpiar()
  29.                 listarPersonas()
  30.             End If
  31.  
  32.         End If
  33.  
  34.        
  35.     End Sub

Sino que sea un arreglo de bytes para evitar tener carpetas con las imagenes y que todo sea desde la BD... Obvio que esto sera con un FILEUPLOAD

Espero averme explicado bien y mas que todo que m puedas ayudar

salu2 cordiales