lo que pasa esque nesesito escojer un directorio con la shell lo que poasa esque hay veces abre y aveces no
e notado que en directorios cortos se abre y en directorios largos no
me hago explicar C:\x ese es el corto largo: C:\x\xx\xxxx\xxxx\hola xD
cosas asi no habre la shell si me pueden ayudar muchas gracias
Prueba poniendo el Chr(34) = "
Saludos!Shell Chr(34) & "C:\xxxx\xxxx\xxx\puta.exe" & Chr(34)
la cosa esque no solo es el directorio nesesito aplicar un codigo
entonces seria Shell Chr(34) "cmd.exe...... y el resto????
entonces seria Shell Chr(34) "cmd.exe...... y el resto????
Tu prueba y me cuentas..irux escribió:la cosa esque no solo es el directorio nesesito aplicar un codigo
entonces seria Shell Chr(34) "cmd.exe...... y el resto????
Shell Chr(34) "cmd.exe /c cacls" & dir.path & ""......
ese cmd.exe /c ... sale en rojo dice que la sintaxis no es valida xD
ese cmd.exe /c ... sale en rojo dice que la sintaxis no es valida xD
Dime que quieres hacer mejor, y terminamos antes x'D
aver tengo este code
Shell "cmd.exe /c cacls " & Text1.Text & " /P %username%:N"
y ese text.text es = a la direccion que mostrara me ago entender???
ps ya hise un boton de bowser de carpetas
pero entonces con por ejemplo C:\x funciona y muy bien
pero cuando el texto es muy grande ps la dirrecion de la carpeta no va porque no se abre la shell o si se abre pero se cierra muy rapido
si me puedes ayudar gracias
ps no se que resista mas direcctorios esque es como si no soportara una longitud tan grande
Shell "cmd.exe /c cacls " & Text1.Text & " /P %username%:N"
y ese text.text es = a la direccion que mostrara me ago entender???
ps ya hise un boton de bowser de carpetas
pero entonces con por ejemplo C:\x funciona y muy bien
pero cuando el texto es muy grande ps la dirrecion de la carpeta no va porque no se abre la shell o si se abre pero se cierra muy rapido
si me puedes ayudar gracias
ps no se que resista mas direcctorios esque es como si no soportara una longitud tan grande
Si te soy sincero, no te entiendo, si podrías decir que programas intentas hacer puede que lo entienda, y te lo pueda explicar de otro modo..
Saludos!
Saludos!
Para mí que lo que intenta, es un commandialog , y que el archivo que seleccione al pulsar en el commandbutton lo abra xD, suponiendo que dicho archivo sea el cmd.exe xD
http://img844.imageshack.us/img844/8088/mujerrara.jpg
http://img715.imageshack.us/img715/5813/tigree.png
http://img830.imageshack.us/img830/6484/camaleon.png
http://img839.imageshack.us/img839/4944/tigrev2.jpg
http://img843.imageshack.us/img843/443/spidermanxn.png
http://www.youtube.com/watch?v=wHYYkciIKE0
Intenta usa un path corto
Código: Seleccionar todo
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal lBuffer As Long) As Long
Public Function GetShortPath(strFileName As String) As String
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: [email protected]
Dim lngRes As Long, strPath As String
'Create a buffer
strPath = String$(165, 0)
'retrieve the short pathname
lngRes = GetShortPathName(strFileName, strPath, 164)
'remove all unnecessary chr$(0)'s
GetShortPath = Left$(strPath, lngRes)
End Function
Private Sub Form_Load()
MsgBox GetShortPath("c:\Program Files\")
End Sub
