Upload con ASP

05/10/2003 - 06:29 por Hernan Maguina | Informe spam
Hola a todos, un me han solicitado que realize una pagina desde la cual
pueda hacer un upload a mi servidor web, ahora el fin de este upload es que
guarde un registro en una tabla de alguna base de datos, de preferencia
access o ms sql server, pero yo no se si para realizar esto se requiere de
algun componente desarrollado por algun tercero.

A quien me de alguna luz acerca de esto le estare muy agradecido, no soy un
experto programador de asp pero tengo una base acerca del tema..

Saludos

Hernan
 

Leer las respuestas

#1 Ariel Popovsky
08/10/2003 - 16:36 | Informe spam
Te paso una porción de código de un ejemplo que tengo por aca. Espero te
sirva.
En el webform agregas un control
<input id="FileToUpload" type="file" runat="server" NAME="FileToUpload">

Luego, en algun evento, por ejemplo un click de un boton:


Private Sub UploadBtn_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles UploadBtn.Click
Dim Length As Integer = FileToUpload.PostedFile.InputStream.Length
Dim ContentType As String = FileToUpload.PostedFile.ContentType
Dim Content As Byte()
ReDim Content(Length)
FileToUpload.PostedFile.InputStream.Read(Content, 0, Length)
UploadDocument(Description.Text, Content, Length, ContentType)
End Sub

Sub UploadDocument(ByVal Description As String, ByVal Content As Byte(),
ByVal Size As Integer, ByVal ContentType As String)
Dim Connection As New
SqlConnection("server=localhost;uid=sa;pwd=;database=TipsandTricks")
Dim Command As New SqlCommand("INSERT Into Documents(Description,
Content, ContentSize, ContentType) Values(@Description, @Content,
@ContentSize, @ContentType)", Connection)
Dim Param1 As New SqlParameter("@Description", SqlDbType.NVarChar)
Param1.Value = Description
Command.Parameters.Add(Param1)
Dim Param2 As New SqlParameter("@Content", SqlDbType.Image)
Param2.Value = Content
Command.Parameters.Add(Param2)
Dim Param3 As New SqlParameter("@ContentSize", SqlDbType.Int)
Param3.Value = Size
Command.Parameters.Add(Param3)
Dim Param4 As New SqlParameter("@ContentType", SqlDbType.NVarChar)
Param4.Value = ContentType
Command.Parameters.Add(Param4)
Connection.Open()
Command.ExecuteNonQuery()
Connection.Close()
End Sub

"Hernan Maguina" wrote in message
news:
Hola a todos, un me han solicitado que realize una pagina desde la cual
pueda hacer un upload a mi servidor web, ahora el fin de este upload es


que
guarde un registro en una tabla de alguna base de datos, de preferencia
access o ms sql server, pero yo no se si para realizar esto se requiere de
algun componente desarrollado por algun tercero.

A quien me de alguna luz acerca de esto le estare muy agradecido, no soy


un
experto programador de asp pero tengo una base acerca del tema..

Saludos

Hernan



Preguntas similares