| Usuario |
nombre en MS-DOS |
Fenris
16 Mensaje(s)
|
| Enviado - 20/12/2003 |
| |
Hola!, queria saber com hacer para poder averiguar el nombre en DOS de cualquier archivo para despues poder ejecutarlo.Dim ret As Long
ret = Shell("start " & sFile)
'Si Quieres que no se muestre la ventana:
ret = Shell("start " & sFile, 6)
por que con este codigo ejecuta todo los archivos, pero con el nombre en windows y si tiene algun espacio en el nombre no lo ejecuta
desde ya muchas gracias
|
| |
|
Fenris
16 Mensaje(s)
|
| Enviado - 20/12/2003 |
| |
ya lo solucione! n_n con un ejemplo en una pagina perdida, pero como soy bueno se los paso (??)
Private Declare Function GetShortPathName Lib _
"kernel32" Alias "GetShortPathNameA" (ByVal _
lpszLongPath As String, ByVal lpszShortPath As _
String, ByVal cchBuffer As Long) As Long
GetShortPathName Dir1.List(Dir1.ListIndex) & directorio, sNombreCorto, 255
ret = Shell("start " & sNombreCorto)
funciona de maravilla, que les sea util! =)
|
| |
|
|
|
