ERRO DE SCRIPT
Prezados colegas deste Forum, desenvolvi uma applicação que faz diversas consultas On Line,
e está sendo muito usada aqui na empresa. Porem tem um grande problema, é que ao carregar a
página está retornando uma mensagem de erro, conforme detalhei abaixo. Eu já atualizei o IE, mas
não resolveu. Outra coisa eu estou usando o objeto Webbrowser.
Grande abraço a todos e obrigado pela atenção. Frata
ERRO DE SCRIPT DESTA PÃGINA
LINHA: 193
CARACTERE: 2
ERRO: [ô]NULL[ô] é NULO OU NÃO é UM OBJETO
CODIGO: 0
DESEJA CONTINUAR EXECUTANDO SCRIPT NESTA PÃGINA ?
e está sendo muito usada aqui na empresa. Porem tem um grande problema, é que ao carregar a
página está retornando uma mensagem de erro, conforme detalhei abaixo. Eu já atualizei o IE, mas
não resolveu. Outra coisa eu estou usando o objeto Webbrowser.
Grande abraço a todos e obrigado pela atenção. Frata
ERRO DE SCRIPT DESTA PÃGINA
LINHA: 193
CARACTERE: 2
ERRO: [ô]NULL[ô] é NULO OU NÃO é UM OBJETO
CODIGO: 0
DESEJA CONTINUAR EXECUTANDO SCRIPT NESTA PÃGINA ?
Tem como postar o código para analisarmos? Assim fica muito vago...
Prezado LUCASVAZ:
Segue abaixo o código que estgá no Form1, onde está o Webbrowser. Ok..??
Brigadoooooooooo. Frata.
Option Explicit
Private Sub cmdShowURL_Click()
On Error GoTo ok
wbrDesiredURL.GoBack
Exit Sub
ok:
Form5.Show
End Sub
Private Sub Command1_Click(Index As Integer)
Form3.Show
End Sub
Private Sub Command2_Click()
Form8.Show
End Sub
Private Sub Form_Resize()
Dim hgt As Single
hgt = ScaleHeight - wbrDesiredURL.Top
If hgt < 120 Then hgt = 120
wbrDesiredURL.Move 0, wbrDesiredURL.Top, ScaleWidth, hgt
End Sub
Private Sub wbrDesiredURL_DownloadComplete()
wbrDesiredURL.Visible = True
End Sub
Você mesmo desenvolveu isso?
Tópico encerrado , respostas não são mais permitidas