ayuda listbox

[Pol17]

cuando ingreso archivos al listbox me aparece toda la ruta de archivo ("c:/archivos/....) y solo quiero el puro nombre , si alguien me ayudara por favor !

[Marko_03]

Si ingresas los datos mediante dataset... tienes que pasarle el nombre de la columna que quieras que se cargue en tu listbox... a menos eso es lo que entendi... expresate un poco mejor y copia el codigo q tienes... pero si te sirve de algo:

ListBox1.DataTextField = "NOMBRE DE LA COLUMNA1 (a Mostrar)";
ListBox1.DataValueField = "NOMBRE DE LA COLUMNA1 (a Mostrar)";

[Pol17]

OpenFileDialog1.ShowDialog()
AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
ListBox1.Items.Add(AxWindowsMediaPlayer1.URL)

AxWindowsMediaPlayer esto es el reproductor la ventana

Cuando escojo el archivo y le doy abrir

[Monimo]

Iniciado por Pol17

OpenFileDialog1.ShowDialog()
AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
ListBox1.Items.Add(AxWindowsMediaPlayer1.URL)

AxWindowsMediaPlayer esto es el reproductor la ventana

Cuando escojo el archivo y le doy abrir

pues claro le estas pasando el nombre completo ...
OpenFileDialog1.FileName

vas a tener que partir a cadena por la derecha que te extraiga os caracteres desde el punto hasta la primera diagonal. Como no se que lenguaje usas no puedo darte la propiedad o código exacto que te da solo el nombre del archivo escogido en el cuadro de diálogo.

[Pol17]

ocupo visual studio 2010 porsiacaso , perdon por la falta de info

[Monimo]

haces esto:

Código:

cadenita=OpenFileDialog1.FileName


Function mised(sFileName) As String
'tendrás que pasarle :como parámetro cadenita a esta funcion ...

'variables

Dim s, ext, caracter, nombre As String
Dim cuenta, punto, diagonal As Integer



'extraemos el nombre
For cuenta = 1 To Len(sFilename) - 1
caracter = Mid(sFilename, Len(sFilename) - cuenta, 1)

'encontrar el punto y la diagonal
If caracter = "." Then
punto = Len(sFilename) - cuenta
End If
 
If caracter = "\" Then
 diagonal = Len(sFilename) - cuenta
aux = aux + 1

If aux = 1 Then
diagonalp = diagonal
nombre = Mid(sFilename, diagonalp + 1, (punto - diagonalp) - 1)
End If
End If
 'desplegar y construir  el nombre del archivo
 Next cuenta


If Len(sheetr) > 31 Or Len(sheetr) = 31 Then
s2 = Left(sheetr, 31)
End If
mised = sheetr
End Function