Postada em 13/12/2011 15:17 hs
Olá Pessoal seguinte achei um código na internet para abrir uma pagina web no programa em VB 6.0. Segue o código.
Option Explicit Public StrConfirme As String
'Aqui é o objeto que vai interpretar um navegador
Private WithEvents m_WebControl As VBControlExtender
Private Sub Form_Load() 'Instância o objeto. O terceiro campo, é o nome do controle que vai 'receber o objeto. Pode ser Form, PictureBox, etc. Set m_WebControl = Me.Controls.Add("Shell.Explorer.2", "webctl", Me) 'Ajusta o tamanho do controle para o tamanho total do form Form_Resize 'Deixa visível m_WebControl.Visible = True 'Abre a página
m_WebControl.object.Navigate2 StrConfirme End Sub
Private Sub Form_Resize() On Error Resume Next If Not m_WebControl Is Nothing Then m_WebControl.Move 0, 0, ScaleWidth, ScaleHeight End If End Sub
Ok Até aqui tudo bem, o programa efetua o processo normalmente, lembrando q strconfirme é uma string que eu utilizo para enviar o comando do site. o comando me retorna a pagina que eu quero dentro do form, como se fosse uma imagem no form. O que acontece é que eu quero pegar este texto. e não consigo. Existe alguma forma deu conseguir fazer isto, desta forma ou de outra? Resumindo o que eu preciso é abrir um link dentro do programa "Este ja esta ok" porem preciso trabalhar com o resultado do link. "este é o problema"
Desde já agradeço a atenção de todos.
|