Mensajes

perfecto ! 

gracias a los 2

[FName]

¿Y como evito ese ámbito?

El mismo ejemplo que has dado me sirve, ¿Como haría tu code para usar FName en el msgbox de command1?

He intentado cambiando la declaración  Public Sub Form_Load()   , pero nada

mi Fecha de registro: 20 Noviembre 2005, 21:33

LOL

Y ni un miserable mensaje xD

PD: ya tienes mi voto.

[¿Alguien quiere compartir conmigo algo parecido?]

Hola!

Este es mi último post por hoy, lo prometo xD  

Estoy leyendo el manual de la chincheta, y al mismo tiempo trabajando los ejemplos del manual, y creando una app, y haciendo unas anotaciones en un bloc de notas, por ridículo que parezca, solo tengo esto:


unload me   Vacía el formulario de la memoria. (Eso hace que se pierdan los posibles datos que se guarden)

load FORM   recarga el formulario a la memoria (Lo inicializa de nuevo, con nuevos datos)

FORM.hide   Oculta el formulario

FORM.Show   Muestra el formulario

En 1 o 2 meses creo que tendré unas anotaciones decentes, incluso con una lista de apis y para que se pueden uar xD

Mi pregunta es.. ¿Alguien quiere compartir conmigo algo parecido? algún tipo de anotaciones/apuntes me serviría mucho además del manual del foro xD

Bueno, un saludo ^^

[raul338]

que raro, juraría que lo puse exactamente que raul338 XD

me ha funcionado, gracias

Acabo de ponerlo arriba del todo, me sigue dando el mismo error 

[shellexecute]

Perdona por ser pesado, pero es que es un problema tras otro

me da error el shellexecute

Código [Seleccionar] Expandir

Procedimiento sub o funcion no definido.

he probado usando End private sub, lo único que se me ha ocurrido, pero nada.

Ahora mismo lo tenog colocado así:

Código (vb) [Seleccionar] Expandir

Private Sub Command1_Click()

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const stPath As String = "C:\Users\Administrador\Desktop\"
Dim archivo As String
   archivo = Dir(stPath & "*.msu")
   While archivo <> ""
   MsgBox (FName & archivo)
        ShellExecute Me.hwnd, "open", stPath & archivo, vbNullString, "C:\Users\Administrador\Desktop\", False
       archivo = Dir
   Wend
End Sub

¿Porque leches te has echo una segunda partición si no sabes ni lo que has metido ni lo que ibas a meter? xD

Yo en tu lugar haría un low level format y le diría adios a las 2 particiones, para quedarme con una de 300 GB (Si no tienes nada importante en las particiones, y ya has salvado los datos importantes, claro...)

Saludos

PD: formatea ya hombre! no se si windows te lo agradecerá, pero el foro sí     

[static]

Hola, empezé a leer el manual de la chincheta   y ya nada más empezar me encuentro con este problema.

Se supone que static sirve para que la variable se almacene en la memoria durante toda aplicación (O eso dice le manual), ¿Entonces porque la variable "muere" y no puedo utilizara en ninguna otra función?

Ejemplo:

en un procedimiento uso

Código (vb) [Seleccionar] Expandir

Static FName As String

luego en otro procedimiento uso

Código [Seleccionar] Expandir

msgbox FName

y aparece vacío

¿Lo estoy haciendo mal?

[raul338]

Pues tampoco me funciona de la manera que dijo raul338  

he probado:

Código [Seleccionar] Expandir

msgbox stPath & archivo
Y la ruta es correcta, pero al usar:

Código [Seleccionar] Expandir

Call Shell(stPath & archivo)

me da este error:

Código [Seleccionar] Expandir

error '5'
llamada a procedimiento o argumento no válidos


PD: FSO = FSO file objects?