Los foros del Guille

Regálate mi libro de Visual Basic 2005
Todo lo explicado es para .NET 2.0.
El complemento ideal para mi libro Novedades de Visual Basic 9.0

Si no encuentras respuesta, puedes buscar en el sitio del Guille

Google
 
Selecciona el foro y pulsa en mostrar:     Mostrar 
De tu interés (algunos de los avisos publicados)

12/mar/2008
Si quieres ver los mensajes que nadie ha contestado, puedes usar este link: http://foros.elguille.org/MensajesSinRespuestas.aspx
También lo tienes en la página de inicio.

  Foro: .NET VB Cantidad:  Desde:   Hasta:    Aplicar   Responder 
Respuestas a: 58124 - Link en DataGridView
IDAsuntoFechaNick 
58124 Link en DataGridView22/11/16 17:05Ziany   
Hola a todos,

Quisiera su ayuda para lograr un objetivo.
Estoy trabajando con VB.Net y SQL.
Mi aplicación llama desde un botón datos de una tabla de SQL, este botón llena un DataGridView con estos datos.

Objetivo:


Quiero que desde mi aplicación, se puedan copiar y abrir archivos, y que en este DataGridView se visualice el nombre del archivo copiado, y que sirva como link de donde se guardo el archivo para poder abrirlo.

Resultados actuales:

Se visualiza la ruta donde esta guardado, no el nombre. Al darle clic no abre el archivo.
Código:
Para agregar el archivo:

En Public Class:
Dim miarchivo As String = ""

Botón buscar archivo:
OpenFileDialog1.InitialDirectory = "C:\"
       OpenFileDialog1.RestoreDirectory = True
       If OpenFileDialog1.ShowDialog = DialogResult.Cancel Then
           Return
       Else
           miarchivo = OpenFileDialog1.FileName
           miarchivo = System.IO.Path.GetFileName(OpenFileDialog1.FileName)
           MsgBox("El archivo seleccionado es: " & miarchivo)
           txtarchivo.Text = OpenFileDialog1.FileName
       End If

Botón guardar:
Dim rutaorigen As String = txtarchivo.Text
Dim destino As String = System.Environment.CurrentDirectory & "/Contratos\" & miarchivo
''aqui tengo mas codigo(conexion, seleccionar datos de tabla...)
comando.Parameters.AddWithValue("@archivo", destino)
''aqui tengo mas codigo(ejecutar en query, cerrar conexion...)
               If txtarchivo.Text = "" Then
               Else
                   FileCopy(rutaorigen, destino)
                   MsgBox("Exito al añadir el archivo")
               End If

Para consultar:

En el botón para llenar el DataGridView pongo select tabla1.columna1,
tabla1.columna2,
tabla1.ARCHIVOS

from tabla1

where......

Para llenar el DGV:
'' sql es la variable tipo string donde hice el select

          Dim da As New SqlClient.SqlDataAdapter(sql, conexion)
            Dim cmd As New SqlClient.SqlCommandBuilder(da)
            Dim ds As New DataSet
            da.Fill(ds, "tabla1")
            dgv1.DataSource = ds
            dgv1.DataMember = "tabla1"
            conexion.Close()

También me gustaría hacer algo similar en un LinkLabel.

Eso es todo, por favor espero me ayuden.
Saludos!



 
(c) Guillermo 'guille' Som, 2005-2017  - foros.elGuille v1.0.5.3 (23/Mar/2009 14:50 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8762)
 
Usuarios activos: 66 - App. iniciada: 20/10/2017 11:56:21 GMT - La hora GMT del servidor es: 20/10/2017 12:31:04 GMT