y para eso uso el contro FileUpload .... donde me aparece la ruta "D:\cursos\imagen2.jpg" x ejemplo
lo que yo quiero esa ruta recuperarla xk yo la uso en este procedimiento
Cita:
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim con As New MySqlConnection(ConfigurationManager.ConnectionStr ings("ConnectionSigcol1").ConnectionString)
Dim da As New MySqlDataAdapter("Select * From Usuario where cod_usuario = 'usuario002' ", con)
Dim MyCB As MySqlCommandBuilder = New MySqlCommandBuilder(da)
Dim ds As New DataSet()
da.MissingSchemaAction = MissingSchemaAction.AddWithKey
con.Open()
da.Fill(ds, "Usuario")
Dim fs As New FileStream("D:\cursos\imagen2.jpg", FileMode.OpenOrCreate, FileAccess.Read)
Dim MyData(fs.Length) As Byte
fs.Read(MyData, 0, fs.Length)
fs.Close()
ds.Tables("Usuario").Rows(0)("fp_code") = MyData
da.Update(ds, "Usuario")
fs = Nothing
MyCB = Nothing
ds = Nothing
da = Nothing
con.Close()
con = Nothing
Response.Write("Archivo guardado en la base de datos")
End Sub
tambien me gustaria validar una forma de que el fileupload solo acepte solo imagenes Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim con As New MySqlConnection(ConfigurationManager.ConnectionStr ings("ConnectionSigcol1").ConnectionString)
Dim da As New MySqlDataAdapter("Select * From Usuario where cod_usuario = 'usuario002' ", con)
Dim MyCB As MySqlCommandBuilder = New MySqlCommandBuilder(da)
Dim ds As New DataSet()
da.MissingSchemaAction = MissingSchemaAction.AddWithKey
con.Open()
da.Fill(ds, "Usuario")
Dim fs As New FileStream("D:\cursos\imagen2.jpg", FileMode.OpenOrCreate, FileAccess.Read)
Dim MyData(fs.Length) As Byte
fs.Read(MyData, 0, fs.Length)
fs.Close()
ds.Tables("Usuario").Rows(0)("fp_code") = MyData
da.Update(ds, "Usuario")
fs = Nothing
MyCB = Nothing
ds = Nothing
da = Nothing
con.Close()
con = Nothing
Response.Write("Archivo guardado en la base de datos")
End Sub