Hola!
una pregunta, como creo un menu?
osea, un menu en el q el tipito q lo use pueda ELEGIR LA PARTICION q tien , osea, para q el prrograma le funcione bien..
como hago :$?
EDITADO- NO SIRVE
NO SIRVE-
tenes el control drivelistbox que te lista los discos que tenes...sino con api's...
Cita de: seba123neo en 2 Agosto 2010, 06:05 AM
tenes el control drivelistbox que te lista los discos que tenes...sino con api's...
SISIS, pero depende el disco q elija, la RUTA DEL ARCHIVO QUE USA EL BOTON CAMBIA..
entonces, como hago?
no entiendo lo que queres hacer , explica por favor el objetivo del programa...
otra cosa , no postees mas con esos titulos...pone algo descriptivo a lo que vas a preguntar....
Cita de: seba123neo en 2 Agosto 2010, 06:13 AM
no entiendo lo que queres hacer , explica por favor el objetivo del programa...
el programa tiene un boton. ese boton borra un archivo.
PERO! no a todos les anda, porq yo lo hice asi (solo para C:\):
C:\RUTA DEL ARCHIVO
entonces pense "un menu de particiones" (drivelistbox)
pero ahora q cree ese drivelistbox, nose como configurarlo para q cambie la letra de unidad de la ruta del boton..
osea, la ruta varia segun el drivelistbox..
se entiende u.u?
y bueno tampoco te voy a explicar todas las propiedades de los controles que uses, fijate,busca en internet tenes documentado todos los controles con sus propiedades y como usarlas...ahi te vas a dar cuenta como usarlo, es una duda muy basica como para resolverla aca sin haber buscado.
Cita de: seba123neo en 2 Agosto 2010, 06:18 AM
y bueno tampoco te voy a explicar todas las propiedades de los controles que uses, fijate,busca en internet tenes documentado todos los controles con sus propiedades y como usarlas...ahi te vas a dar cuenta como usarlo, es una duda muy basica como para resolverla aca sin haber buscado.
parami es como q esta escrito en chino
"AccessibilityObject Obtiene AccessibleObject asignado al control. (Se hereda de Control)." O.O ??
no entiendo naada...
ni idea donde sacaste eso, solo tenes que poner drivelistbox en el google y listo...
Cita de: seba123neo en 2 Agosto 2010, 06:24 AM
ni idea donde sacaste eso, solo tenes que poner drivelistbox en el google y listo...
de aca
http://msdn.microsoft.com/es-es/library/microsoft.visualbasic.compatibility.vb6.drivelistbox_properties.aspx
che, recien probe asi :
Open (Drive1.Drive) & "\WINDOWS\DIRECCION DEL ARCHIVO.TXT" For Append As #mitexto
pero tampoco xD!
esas propiedades son del .NET, nunca te van a servir , busca la MSDN de visual basic 6...o ejemplos sueltos en internet, hay miles...
yo diria directamente que uses una api para obtener el directorio del windows, y eso te lo obtiene con la letra del sistema.
Cita de: seba123neo en 2 Agosto 2010, 06:32 AM
esas propiedades son del .NET, nunca te van a servir , busca la MSDN de visual basic 6...o ejemplos sueltos en internet, hay miles...
yo diria directamente que uses una api para obtener el directorio del windows, y eso te lo obtiene con la letra del sistema.
asi ?
' Funciones del API:
Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" _
(ByVal lpBuffer As String, ByVal nSize As Long) As Long
Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" _
(ByVal lpBuffer As String, ByVal nSize As Long) As Long
Dim buf As String
Dim ret As Long
'
' Obtener el directorio de windows
buf = String$(260, Chr$(0))
ret = GetWindowsDirectory(buf, Len(buf))
Text1.Text = Left$(buf, ret)
'
' Obtener el directorio de System
buf = String$(260, Chr$(0))
ret = GetSystemDirectory(buf, Len(buf))
Text2.Text = Left$(buf, ret)
esa es una variable de entorno de windows, la podes usar, pero yo por preferencia usaria una api.
asi esta bien :
Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" _
(ByVal lpBuffer As String, ByVal nSize As Long) As Long
Dim buf As String
Dim ret As Long
' Obtener el directorio de windows
buf = String$(260, Chr$(0))
ret = GetWindowsDirectory(buf, Len(buf))
WINDIR = Left$(buf, ret)
?
aca encontre esta:
'Código para el Modulo
Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
'Código para el procedimiento
'Definimos las variables
Dim DirectorioWindows As String * 255
Dim CadenaResultante As Long
CadenaResultante = GetWindowsDirectory(DirectorioWindows, 255)
'mostramos el resultado
Print Left(DirectorioWindows, CadenaResultante)
pero nose ni donde ponerlo, ni donde me va a aparecer el directorio ¬¬
y bueno tenes que hacerte una funcion que te devuelva ese Left(DirectorioWindows, CadenaResultante) asi cuando la llamas, te devuevla el directorio...y creo que tenes que leer mas , porque usar apis se te va a hacer comun y tenes que saber donde poner el codigo, es algo de manual no te lo podemos enseñar aca en un post.
bajate el api guide, tiene ejemplos de uso de casi todas las api's de windows.
Cita de: seba123neo en 2 Agosto 2010, 06:50 AM
y bueno tenes que hacerte una funcion que te devuelva ese Left(DirectorioWindows, CadenaResultante) asi cuando la llamas, te devuevla el directorio...y creo que tenes que leer mas , porque usar apis se te va a hacer comun y tenes que saber donde poner el codigo, es algo de manual no te lo podemos enseñar aca en un post.
bajate el api guide, tiene ejemplos de uso de casi todas las api's de windows.
ya estoy bajando este :
http://www.taringa.net/posts/downloads/1391282/Para-programadores:-Gu%C3%ADa-de-las-API-de-Windows_.html
ese sirve?
solucionado
Dim WIN As String
WIN = Environ("WINDIR")
msgbox WIN
y te devuelve *:\windows