namespace

En programación, un espacio de nombres (del inglés namespace), en su acepción más simple, es un conjunto de nombres en el cual todos los nombres son únicos.

Un espacio de nombres es un contexto en el que un grupo de uno o más identificadores pueden existir. Un identificador definido en un espacio de nombres está asociado con ese espacio de nombres. El mismo identificador puede independientemente ser definido en múltiples espacios de nombres, eso es, el sentido asociado con un identificador definido en un espacio de nombres es independiente del mismo identificador declarado en otro espacio de nombres. Los lenguajes que manejan espacio de nombres especifican las reglas que determinan a qué espacio de nombres pertenece una instancia de un identificador.
En programas grandes o en documentos no es infrecuente tener cientos o miles de identificadores. Los namespaces (O técnicas similares como la emulación de namespaces) disponen de un mecanismo para ocultar los identificadores locales. Proporcionan los medios para agrupar lógicamente los identificadores relacionados en sus correspondientes namespaces, haciendo así el sistema más modular.

Muchos lenguajes de programación manejan espacios de nombres. En algunos lenguajes, como C++, PHP o Python, estos identificadores nombrando espacios de nombres están asociados con un espacio de nombres que los agrupa. Así pues, en estos lenguajes, los espacios de nombres se pueden anidar formando un árbol de espacios de nombres. En la raíz de éste árbol se encuentra el espacio de nombres anónimo global.

ingresar archivos  en ASP.net

Imports System.Data


Imports System.Data.SqlClient


Partial Class persona

Inherits System.Web.UI.Page



Dim conexion As SqlConnection

Dim adaptador As SqlDataAdapter

Dim datos As DataTable

Dim cadena As String

Dim urlhoja As String

Dim urlfoto As String



Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click



urlhoja = "~/hoja/" & (FileUpload1.FileName)

urlfoto = "~/foto/" & (FileUpload2.FileName)



cadena = "insert into persona(documento, nombre, apellido,edad,genero,hojavida,foto)values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & urlhoja & "','" & urlfoto & "')"

adaptador = New SqlDataAdapter(cadena, conexion)

datos = New DataTable

adaptador.Fill(datos)



FileUpload1.SaveAs(MapPath(urlhoja))

FileUpload2.SaveAs(MapPath(urlfoto))



End Sub



Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

conexion = New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=
DataDirectory
\persona.mdf;Integrated Security=True;User Instance=True")



End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

cadena = "select * from persona where nombre= '" & TextBox6.Text & "'"

adaptador = New SqlDataAdapter(cadena, conexion)

datos = New DataTable

adaptador.Fill(datos)


TextBox7.Text = datos.Rows(0).Item("documento")

TextBox8.Text = datos.Rows(0).Item("nombre")

TextBox9.Text = datos.Rows(0).Item("apellido")

TextBox10.Text = datos.Rows(0).Item("edad")

TextBox11.Text = datos.Rows(0).Item("genero")

Image1.ImageUrl = datos.Rows(0).Item("hojavida")

Image2.ImageUrl = datos.Rows(0).Item("foto")



Image1.Width = 50

Image1.Height = 50

Image2.Width = 50

Image2.Height = 50



End Sub


Public Function Valida(ByVal X As FileUpload) As Boolean



Dim ExtensionArchivo As String = ""

Dim ExtensionValida As String() = {".jpg", ".bmp", ".png", ".gif"}

Dim Resultado As Boolean = False


ExtensionArchivo = System.IO.Path.GetExtension(X.FileName).ToLower()

For i As Integer = 0 To ExtensionValida.Length - 1

If ExtensionArchivo = ExtensionValida(i) Then

Resultado = True

End If


Next

'Label1.Text = ExtensionArchivo

Return Resultado

End Function


End Class





validar archivos en ASP.net

 
 
Imports System.Data


Imports System.Data.SqlClient







Partial Class persona

Inherits System.Web.UI.Page



Dim conexion As SqlConnection

Dim adaptador As SqlDataAdapter

Dim datos As DataTable

Dim cadena As String

Dim urlhoja As String

Dim urlfoto As String

Dim extension As String

Dim foto As String









Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click



extension = System.IO.Path.GetExtension(FileUpload1.FileName)

foto = System.IO.Path.GetExtension(FileUpload2.FileName)



If extension = ".pdf" And foto = ".jpg" Then





urlhoja = "~/hoja/" & (FileUpload1.FileName)

urlfoto = "~/foto/" & (FileUpload2.FileName)



cadena = "insert into persona(documento, nombre, apellido,edad,genero,hojavida,foto)values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & urlhoja & "','" & urlfoto & "')"

adaptador = New SqlDataAdapter(cadena, conexion)

datos = New DataTable

adaptador.Fill(datos)



FileUpload1.SaveAs(MapPath(urlhoja))

FileUpload2.SaveAs(MapPath(urlfoto))







Else

Label3.Text = "error al ingresar el dato"



''Label3.Text = (foto)







End If









End Sub



Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

conexion = New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=
DataDirectory
\persona.mdf;Integrated Security=True;User Instance=True")



End Sub



Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

cadena = "select * from persona where nombre= '" & TextBox6.Text & "'"

adaptador = New SqlDataAdapter(cadena, conexion)

datos = New DataTable

adaptador.Fill(datos)



TextBox7.Text = datos.Rows(0).Item("documento")

TextBox8.Text = datos.Rows(0).Item("nombre")

TextBox9.Text = datos.Rows(0).Item("apellido")

TextBox10.Text = datos.Rows(0).Item("edad")

TextBox11.Text = datos.Rows(0).Item("genero")

Image1.ImageUrl = datos.Rows(0).Item("hojavida")

Image2.ImageUrl = datos.Rows(0).Item("foto")



Image1.Width = 50

Image1.Height = 50

Image2.Width = 50

Image2.Height = 50







End Sub



Public Function Valida(ByVal X As FileUpload) As Boolean





Dim ExtensionArchivo As String = ""

Dim ExtensionValida As String() = {".jpg", ".bmp", ".png", ".gif"}

Dim Resultado As Boolean = False



ExtensionArchivo = System.IO.Path.GetExtension(X.FileName).ToLower()

For i As Integer = 0 To ExtensionValida.Length - 1

If ExtensionArchivo = ExtensionValida(i) Then

Resultado = True

End If



Next



'Label1.Text = ExtensionArchivo

Return Resultado

End Function




End Class