UNA Pregunta muy simple

[crauss]

es una cosa simple
digamos que hago un boton llamado acerca de mi y que se habra el block de notas i ponga tu nombre...
yo ejecuo por ejemplo el notepad
shell "notepad.exe"
pero como seria lo siguiente esque me falta esto
shell notepad & lo que sea "nombre" o como seria

[byebye]

¿es una adivinanza o lo preguntas de verdad?

[Tyrz]

sendkeys "nombre"  ? explícate mejor
Saludos

[vivachapas]

exacto.. sendkeys "lo que quieras q ponga" y listo...

¿es una adivinanza o lo preguntas de verdad?

no entiendo donde esta la adivinanza? me la explicas?

sendkeys "nombre"  ? explícate mejor
Saludos

yo le entendi barbaro...



P/D si asi no te funciona proba asi
appactivate "aca el nombre del form del note pad"
sendkeys "aca lo q quieras eniar"


SALUDOS

[byebye]

la adivinanza es donde estan los manuales que le faltan por leer. ultimamente ya no se lee, se pregunta y punto.

[Syddhartha]

la adivinanza es donde estan los manuales que le faltan por leer. ultimamente ya no se lee, se pregunta y punto.

Bueno, yo no veo el problema de que la gente pregunte, sobre todo si es una pregunta de este tipo. Si te molesta responderle, no respondas y listo, hay gente como  VIVACHAPAS que no tiene problemas en ayudar a la gente, pero veo que no es tu caso... Bueno llendo al tema, la respuesta de VIVACHAPOS en la mas posible (y la que recomiendo)

[byebye]

pues si fuera una pregunta sobre algo complejo entiendo que pregunte.

hay gente como  VIVACHAPAS que no tiene problemas en ayudar a la gente, pero veo que no es tu caso...

no me conoces, no tengo ni 1 problema en ayudar. es mas simple, es todos los dias lo mismo  y mas de lo mismo. gente que quiere programar sin aprender el lenguaje (cosa bastante incompatible).

[CamaleonB]

Dim name as string

name = "Papa Noel"

open app.path & "\about.txt" for output as #1

print #1, name

close #1

shell (app.path & "\about.txt"), vbnormalfocus


es todo y seria la manera mas correcta--

salu2

[crauss]

muchas gracias no no es una adivinanza fue simplemente que me explike mal

[cassiani]

digamos que hago un boton llamado acerca de mi y que se habra el block de notas i ponga tu nombre...

Podrias hacerlo de esta manera, ejecutas el notepad, le das focus y lluego le envias lo que querais...

Código [Seleccionar] Expandir

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

'Esta rutina la tome de un ejemplo del maestro "Hades,-"
Private Sub Focus(Cadena As String)
Dim Handle As Long
    Handle = FindWindow(vbNullString, Cadena) 'Buscamos la ventana
    If Handle <> 0 Then
        ShowWindow Handle, 1 'Mostramos la ventana
    End If
End Sub

Private Sub Command1_Click()
    Shell ("notepad.exe") 'Ejecutas el notepad
    Focus "Sin título - Bloc de notas" 'Le das focus
    SendKeys "mi nombre o..." 'Y le envias lo que querais
End Sub

Hay otras formas, pero ahora mismo no hay tiempo... 

¡Suerte!