 Autor
|
Tema: IExplorer oculto en VB (Leído 3,908 veces)
|
whiskises
 Desconectado
Mensajes: 103
|
Hola estuve buscando en el foro y no encontre exactamente lo que buscaba,aver si alguien me lo puede solucionar: Se puede desde un programa en VB ejecutar el Iexplorer de forma oculta?¿Cual seria el codigo?
|
|
|
|
|
En línea
|
|
|
|
- n0sEcReT -
Desconectado
Mensajes: 284
Impossible is nothing
|
Private Sub Form_Load() Shell "C:\Windows\Notepad.exe", vbHide End Sub De esta forma se ejecutara el Notepad (Bloc de Notas) oculto 
|
|
|
|
|
En línea
|
|
|
|
- n0sEcReT -
Desconectado
Mensajes: 284
Impossible is nothing
|
Te pongo el codigo completo ,porque veo que por tu pregunta todavia eres novato en VB amigo Private Sub Form_Load() Shell "C:\Archivos de programa\Internet Explorer\IEXPLORE.exe", vbHide End Sub De esa forma al ejecutarse la aplicacion , tambien se ejecutara el Internet Explorer pero de forma oculta , si quieres asegurarte , preciona Ctrl + Alt + Supr y veras el proceso IEXPLORE.EXE . Salu2 ! amiguito 
|
|
|
|
|
En línea
|
|
|
|
Xpeed
Desconectado
Mensajes: 472
Res Publica Non Dominetur
|
sin enbargo para que ejecutes una web determinada, puedes hacerlo con api's algo asi como: Private Declare Function InitCommonControls Lib "Comctl32.dll" () As Long
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
Public Enum T_WindowStyle
Maximized = 3
Normal = 1
ShowOnly = 5
End Enum
Public Sub GoToInternet(Parent As Form, URL As String, WindowStyle As T_WindowStyle)
ShellExecute Parent.hwnd, "Open", URL, "", "", WindowStyle
End Sub asi para hacer la peticion de la web que deseas simplemente lo haces con la instruccion GoTointernet que hemos declarado GoToInternet Me, "aki la web", Normal un saludo. |
|
|
|
« Última modificación: 1 Agosto 2005, 08:43 am por $P€€D »
|
En línea
|
|
|
|
- n0sEcReT -
Desconectado
Mensajes: 284
Impossible is nothing
|
Para hacer lo mismo que explico $P€€D , pero mas simple seria asi : Private Sub Form_Load() Shell "C:\Archivos de programa\Internet Explorer\IEXPLORE.exe www.elhacker.net", vbHide End Sub Donde dice www.elhacker.net , seria la Web que queres abrir Salu2 ! |
|
|
|
|
En línea
|
|
|
|
|
|
whiskises
Desconectado
Mensajes: 103
|
Van de lujo,  ...ahora me veis..  .ahora no me veis... ¡¡¡¡sois la caña¡¡¡ Thanks. |
|
|
|
|
En línea
|
|
|
|
|
 |
