Retroceder   Foros del Web > Programación para sitios web > .NET

Respuesta
 
Herramientas Desplegado
Antiguo 13-ago-2005, 22:46   #1 (permalink)
erick_arcini tiene algunos puntos positivos de karma
 
Avatar de erick_arcini
 
Fecha de Ingreso: julio-2005
Ubicación: Jaltenco, Estado de México
Mensajes: 1.371
Enviar un mensaje por MSN a erick_arcini Enviar un mensaje por Skype™ a erick_arcini
Pregunta Shell, envio de texto a Cualquier aplicacion

Hola compas del web, es una simple pregunta, necesito hacer una aplicacion que envie el texto de un textbox a cualquier aplicacion de texto, por ejemplo notepad.exe, el problema es que ya tengo el codigo:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'inicia el proceso "notepad.exe"
ProcID = Shell("notepad.exe", AppWinStyle.NormalFocus)
End Sub
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
'llamada cuando se presione enter
If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
SendKeys.SendWait(TextBox1.Text) 'toma lo que hay en el textbox
AppActivate(ProcID) 'llama al proceso
End If
End Sub

pero cuando presiono enter CharW(13) solo llama al proceso pero no guardo la cadena que estoy escribiendo en el texto, alguien sabe como puedo guardar esa informacion...
erick_arcini está desconectado   Responder Citando
Antiguo 14-ago-2005, 19:13   #2 (permalink)
Moderador
RootK llegará a ser famoso muy prontoRootK llegará a ser famoso muy pronto
 
Avatar de RootK
 
Fecha de Ingreso: noviembre-2002
Ubicación: México D.F
Mensajes: 7.542
Enviar un mensaje por MSN a RootK
El problema que veo es que primero estás llamando al sendKeys, y este método lo debes colocar despues de tu AppActivate

Pruebalo de ésta forma (puedes tambien hacerlo directamente con chr(13)

quedaría así tu code, considerando que previamente diste click en tu boton para activar el proceso y regresar el ID...

sería:

Cita:
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

If e.KeyChar = chr(13) Then
AppActivate(processID)
SendKeys.SendWait(TextBox1.Text)
End If
End Sub
Pruebalo y nos cuentas que tal te fue..

Salu2
__________________
Nadie roba nada ya que en la vida todo se paga . . .
RootK está desconectado   Responder Citando
Antiguo 15-ago-2005, 08:17   #3 (permalink)
erick_arcini tiene algunos puntos positivos de karma
 
Avatar de erick_arcini
 
Fecha de Ingreso: julio-2005
Ubicación: Jaltenco, Estado de México
Mensajes: 1.371
Enviar un mensaje por MSN a erick_arcini Enviar un mensaje por Skype™ a erick_arcini
Que hay root, mira, ya puse a prueba lo que me mencionaste y lo hace correcto, ahora como sobreescribo en este archivo, te comoento que es lo que necesito realizar, yo tenco un codigo en C++, en realidad es una base de conocimiento para un sistema experto, y lo que quiero crear es una aplicacion para poner a prueba esa base y asi ver el funcionamiento, es por eso que necesito comunicacion entre aplicaciones, me podrias recomendar algun sitio donde pueda encontrar informacion sobre ello o tu me podrias mencionar algo, estamos en contact-o
erick_arcini está desconectado   Responder Citando
Respuesta

No hay votos aún.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 22:40.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93