Mensaje dentro de Acceso y trabajo con datos

Responder 
#1 - 06/01/2011 0:32:39 Reporta abuso | Link Permanente
Riskbreakers
Fecha de registro: 05/01/2011
0 post en este tema
1 post en acceso y trabajo con datos
3 posts en todos los foros
Cargar datos de un Archivo a Base de Datos

Responder Citar
Mira tengo solo los conocimientos basicos en aspnet y requiero ayuda con una cuestion:

Tengo que hacer que la pagina asp cargue un archivo al servidor--------------------------------------LISTO

que al subirlo revise si es un archivo de un tipo de extensión predeterminado---------------------------LISTO

que revise que el archivo no este duplicado----------------------------------------------------------LISTO

que el contenido del archivo de excel que se esta cargando sea vaciado a una base de datos----------NO TENGO NI IDEA

***El codigo que utilizo como accion de un boton de carga

Protected Sub UploadBtn_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim savePath As String = "DESTINO" 'Especifica el directorio de almacenamiento
If (FileUpload1.HasFile) Then 'Verifica que se ha seleccionado un archivo y que el archivo sea el adminito
Dim fileName As String = Server.HtmlEncode(FileUpload1.FileName) 'toma el nombre del archivo
Dim extension As String = System.IO.Path.GetExtension(fileName) 'toma la extensión del archivo
Dim pathToCheck As String = savePath + fileName 'toma la ruta y el nombre del nuevo archivo
If System.IO.File.Exists(pathToCheck) Then ' revisa que el archivo no exista
UploadStatusLabel.Text = "El archivo ya existe"
Else
If (extension = ".xls") Then 'Verifica la Carga de Archivos de Excel
savePath += fileName 'si el archivo es valido llama al servicio de carga de archivos
FileUpload1.SaveAs(savePath)
UploadStatusLabel.Text = "El archivo se cargo con exito."
Else
UploadStatusLabel.Text = "No se pudo cargar porque no es un archivo de Excel valido" 'Notifica tipo incorrecto de archivo incorrecto
End If
End If
Else
UploadStatusLabel.Text = "Por favor selecciona un archivo de Excel" 'verifica que se haya adjuntado un archivo si se da boton de cargar
End If
End Sub

Espero me puedan ayudar con lo que me falta---- u orientar por que ya me perdi

Volver arriba