Página 1 de 1
VB shell aveces abre y aveces no
Publicado: 01 Jun 2009, 23:22
por irux
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
Re: VB shell aveces abre y aveces no
Publicado: 01 Jun 2009, 23:24
por shark0
Prueba poniendo el Chr(34) = "
Shell Chr(34) & "C:\xxxx\xxxx\xxx\puta.exe" & Chr(34)
Saludos!
Re: VB shell aveces abre y aveces no
Publicado: 01 Jun 2009, 23:41
por irux
la cosa esque no solo es el directorio nesesito aplicar un codigo
entonces seria Shell Chr(34) "cmd.exe...... y el resto????
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 00:18
por shark0
irux escribió:la cosa esque no solo es el directorio nesesito aplicar un codigo
entonces seria Shell Chr(34) "cmd.exe...... y el resto????
Tu prueba y me cuentas..
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 00:25
por irux
Shell Chr(34) "cmd.exe /c cacls" & dir.path & ""......
ese cmd.exe /c ... sale en rojo dice que la sintaxis no es valida xD
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 00:27
por shark0
Dime que quieres hacer mejor, y terminamos antes x'D
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 00:33
por irux
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
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 18:35
por shark0
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!
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 19:53
por Xpro
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
Re: VB shell aveces abre y aveces no
Publicado: 02 Jun 2009, 20:11
por irux
no no esque estoy haciendo un programa uqe protege carpetas
Re: VB shell aveces abre y aveces no
Publicado: 04 Jun 2009, 02:12
por cobein
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
Re: VB shell aveces abre y aveces no
Publicado: 19 Jun 2009, 03:39
por ice_mumi
proba con:
Shell "cmd.exe /c cacls " & Chr(34) & Text1.Text & Chr(34) & " /P %username%:N"