Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




How To Refresh A Web Page And Auto Acknowldge The Retry Message?


I have launched a shell'd IE window and occasionally it gets stuck with a page cannot be displayed messaged. Well in my timer I am scanning for IE windows and when it finds a windows with such a message, I issue a IE.REFRESH command. The trouble is that the windows are submitting information, so the window just sits there waiting for the user to hit the retry button. Is there anyway to refresh the IE Page and not have the retry message come up, so it's transparent to the user?

Thanks for looking

Masbey




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Auto Retry
I have a webbrowser in my prog and when i go to refresh the page it is on the box comes up to either click Retry or Cancel. Is there any way that i can get it so that it will auto click Retry and not have the box popup ?

How Do I Auto-refresh??
Hi guys,
I'm working on a VB6 application that connects to an Oracle DB. The application (which sits on a server in London)generates a sequence of random signal numbers which a customer has to quote every time they request a transaction to be processed. If the correct signal number from the sequence is quoted, the status of that number is changed to 'used'.There will be about 200 concurrent user and each user changes about 1000 numbers a day. The users are currently in London and Dublin.

The problem is as follows. The users want their screen to automatically update if another concurrent user changes a signal number. Is there an event that can be triggered serverside every time a user changes a signal number that will update other users screen? What would be the performance/network implication of this? Or would a better solution be to code a timer event which refreshes every user's screen say every 30 secs or so. Would appreciate your comments / suggestions.

Niyi

Auto Refresh
what is the code to have a auto refresh function in VB6?

Auto Refresh
I have an application that uses a datagrid. The app is connected to a MySQL table where people upload info at different times during the day. My question is: is there some way I can have the datagrid in my app refresh automatically? This app is for tech support and right now I have to manually refresh the grid. Thanks

Auto Refresh
This is to do with the forum: is there a way to 'autorefresh' Internet Explorer. Its just that i like just leaving one ie open a vb and the checking for new message. I have to constantly refresh it. I suppose i am just lazy!

Auto Refresh IE In VB
Hi All,

I am frequentely checking sports website contains data which i am interested in anylasing it. The site has frames and the main frame contain a couple of options and one of those is refresh. Below the options there is a table contains data. I believe this refresh option is only refresh the table frame.

Here is a fragment of the view code from the site:
-----------------------------------------
<td width="120" align="right">
<input class="BgDk" name="btnAction" tabindex="6"
type="submit" value=" Refresh "/>
<input type="hidden" name="Refresh" value="">
</td>
------------------------------------------

I am so tired of clicking the refresh option so many times in a day.

Anyone knows how i can write a VB app (or VBA) to basically simulate the clicking of the Refresh option which enables me to automatically use a timer to refresh it at certain interval?

Please note this refresh is not the same as the browser refresh button.

Thanks.
Jase.

Auto Refresh
How i do auto-refresh in (X)s. My application is a startup file. I want refresh it on a certain period time.

Auto Refresh?
For a form with user input, how to make the form auto refresh if there isn't any input (no command clicking etc) for a time interval (maybe 5 sec)?

Thanks for answering

Auto Refresh
hi,
i would like to ask some question concerning VBA.
hi,
i had inserted the an excel chart in my form using OLE. Everytime, to update the chart, i need to double click on it, which will bring me into the Excel application.
Is there any other ways to automatically refresh my chart on the form when i change the value in the same file.
Hope someone can help me out

Ado Auto Refresh
Hi GUY ,
Currently, i used the ado to access the database ( Back end ).
If the database is change, i need to manually to click the command button in order to perform refresh method.

My Question is: Can VB or ADO has the function that can auto refresh ?

Auto Refresh A Query
If I have data from an access query in an excel sheet, is there a command to refresh the data on a given interval such as every 10 seconds?

Thanks!

Script For Auto Refresh.
Hi all. I thought I had an idea, but I obviously do not know the right code. Can a program be written in VB to make an applet or the system refresh in X amount of time?

Auto Refresh Textbox
Hi All,

Do any of you have sample code on how to auto refresh a text box every 5 seconds?


Thanks in advance!

List Box/ Auto Refresh
Hey there,

i have two forms one of which contains list view. What i would like to do is, in my list view there are a number of colums and rows

1) i would like to select one of this row in one colum with a vb right click and then another form would pop up containing the string from this list view..

is it possible..

Thanks

Auto Refresh Text Box
how do you auto refresh a text box, does it use timers? and if i want it refreshing the whole time the form is loaded will it be in form_load or another thing?

Auto Refresh Like In VB-Forum!!!
This question concern the web

How can i make every instance of my page refresh like in
here(after 5 - 10 minutes it refresh itself).
I know how to do it for the current page:


Code:
document.reload


but for every instance, how is it done????

Thanks in advance

DATAGRID Wont AUTO-REFRESH
i have a form (list form) with a datagrid linked to an ADO, i also got a button there where it would open another form (entry form) which upon submit will add a new item to the record of which the ADO on the other form (list form) with the datagrid is linked to, when i submit the datagrid isnt refreshed automatically, i tried adding a refresh on the other form (entry form) but id have to do it 3 times just to refresh it (sometimes it doesnt even refresh at all). anyone?

FileListBox Auto Refresh Without Timer
Hello,

I am looking for a way to automatically refresh a file list box; not with a timer, but automatically only when there is a change ( add |delete | ect. ) to the directory|filetypes linked to the filelistbox

I have Single form application which shows a filelist box (directory folder | filtered files) plus a command button ("load file").

User clicks on selected file (file then highlighted) and clicks on command button (file then loaded)

Other applications add and delete files from the directory. To REFRESH the filelistbox, I currently initiate a refresh after each loadfile sequence and automatically refresh via a timer ( interval = 15 seconds) as follows:

'to establish directory and file:
Pattern = *.cal 'filelistbox property
DrPath$ = "C:HomeHomeFiles"
File1.Path = DrPath$

'to refresh with timer (every 15 seconds)
Private Sub Timer1_Timer()
File1.Refresh
End Sub
This causes some problems with the user interface. A user might highlight a file 1 second before the refresh interval arrives, only to see the highlight disappear before the command button is clicked.

Is there a way do away with the timer and automatically refresh the filelistbox only when there is change is the files shown by the filelistbox ( add/delete/rename, ect.).

thanks for the help.

dab

Automate A Auto-refresh Form
i'm using 2 forms to update my database and i'm having trouble synchroning them. My sales departement send a request to the planification departement to get a delivery date, then the planification departement answers by selecting the record (in a dbgrig), loading a form with more complete info then they confirm the date and return to the first form. that first form should only contains the records with no confirmed date but the way i coded this has something wrong, when i return to the form it doesn't update before the timer is up to it's interval. here's a part of the code i'm using:

'this is my query populating the grid

SELECT client, bonCommande AS PO, reference,
modeleCylindre AS modele, qte, surface, dateDemander,
livraisonCylindre AS livraison, nosoumission
FROM confirmLivraison
WHERE modeleCylindre &lt;&gt; " " AND livraisoncylindre IS NULL
UNION
SELECT client, bonCommande AS PO, reference,
modeleUnite AS modele, qte, surface, dateDemander,
livraisonUnite AS livraison, nosoumission
FROM confirmLivraison
WHERE modeleUnite &lt;&gt; " " AND livraisonunite IS NULL;

'this is my timer function

Public Sub Timer1_Timer()
DEITI.rsreqConfirmDateFinal.Requery
DEITI.rsreqModificationDate.Requery
Unload frmConfirmDate
frmConfirmDate.Show
Timer1.Enabled = False
Timer1.Enabled = True
Timer1.Interval = 65535
End Sub


'this is my confirm button

Private Sub cmdConfirm_Click()
Dim rsConfirmDate As ADODB.Recordset
Set rsConfirmDate = New ADODB.Recordset
rsConfirmDate.Open "select * from confirmlivraison where nosoumission='" & txtSoumission.Text & "'", frmMDIMain.cnITI, adOpenDynamic, adLockOptimistic
With rsConfirmDate
If Trim(txtDateC.Text) &lt;&gt; "" Then !livraisoncylindre = txtDateC.Text
If Trim(txtDateU.Text) &lt;&gt; "" Then !livraisonunite = txtDateU.Text
If Trim(txtCommentaires.Text) &lt;&gt; "" Then !commentaires = txtCommentaires.Text
.Update
.Close
End With
Set rsConfirmDate = Nothing
Load frmConfirmDate
frmConfirmDate.Show
frmConfirmDate.Timer1.Interval = 1
frmConfirmDate.Timer1.Enabled = False
frmConfirmDate.Timer1.Enabled = True
Unload Me
End Sub


so all this works fine for the updates, but the grid doesn't refresh in the first timer function, but once it loaded, after the timer is up again, the refresh is done ok? can some help out on this?




I'll be amongst the best any minute now !

Auto Refresh Crystal Graph
I'm using Crystal 8.5. Data is pulled from a store proc in sql 2000. The crystal report has a graph. I have to write code in VB to refresh this graph every 15 minutes when a user view this on the screen. I am new to VB 6 and I do not know how do i go about this.

Auto Refresh Adodc Or Datagrid..
how to make adodc or datagrid also refresh when detect data changes?

is it able to do it?

Auto Refresh/update Data
I am using VB to accessing data from Excel and i need to refresh/update the data constantly. Pls help.

Thanks

Auto Crystal Export Won't Refresh Reports
I am trying to get this report to loop. It generates the first report correctly according to Access database info but instead of refreshing with new data as code loops it simply generates the same report over and over. I want to save up to 200 indivdual reports into HTML format and put them in a folder.

How do I get the first report out of memory and get it to read the database again for updated data and new report

Public Appn As CRAXDRT.Application
Public cReport As CRAXDRT.Report

Set Appn = CreateObject("CrystalRunTime.Application")

While Not rsEvent.EOF

pEventID = rsEvent!ID
dEventdate = rsEvent!EventDate
dCutoffdate = rsEvent!CutOffDate
sEvent = rsEvent!Event
bEvent = True

ssql = "INSERT INTO TicketOrderForm (CompanyName, ContactName, " & _
" Row1, Seat1, Section2, Row2, " & _
TicketMaster ) " & _
" Values ('" & _
getString(sCompanyName) & "', '" & _
getString(sContact) & "', '" & _
getString(sPhone) & "', '" & _
getString(sSeatRow) & "', '" & _
getString(sSeatFrom) & "', '" & _
getString(sSeatSection2) & "', '" & _
getString(sSeatRow2) & "', ' " & _
getString(sTicketMaster) & "') "

cmdADO.ActiveConnection = cnRpt.Conn
cmdADO.CommandText = ssql
cmdADO.Execute
DoEvents

Set cReport = Appn.OpenReport(gPath & "reportsEventNotification.rpt")

sUser = GetFullUser(oSec.UserID)
EventNotification = True
bRunReport = True

' Load TimedMessage
' TimedMessage.Timer1.Interval = 5000
' TimedMessage.txtMessage = "Sorting..."
' TimedMessage.Show vbModal

cReport.ExportOptions.DestinationType = crEDTDiskFile
FName = Trim(Str(pID)) & "_" & Trim(Str(pEventID)) & "_" & Format(Now(), "mmddYYYYhhmmss") & ".htm"
cReport.ExportOptions.FormatType = crEFTHTML40
cReport.ExportOptions.HTMLFileName = gPath & "Exports" & FName
cReport.ExportOptions.HTMLEnableSeparatedPages = False
cReport.ExportOptions.HTMLHasPageNavigator = False
cReport.Export False
bRunReport = True


If bRunReport = False Then
MsgBox "No Report will be generated", vbOKOnly
Screen.MousePointer = vbDefault
rs.Close
Exit Function
End If

ssql = "DELETE FROM TicketOrderForm"
cmdADO.ActiveConnection = cnRpt.Conn
cmdADO.CommandText = ssql
cmdADO.Execute
DoEvents

cReport.DiscardSavedData
Set cReport = Nothing
rsEvent.MoveNext
Wend

rsEvent.Close
rs.MoveNext
Wend

How To Open Txt File In Filelistbox With Auto Refresh
how to open a selected txt file in filelistbox using a command button with auto update so that if there's a new logs will generate then it will update the listbox accordingly to the time ..
the logs has been set to hour:min:sec

here is the pic



thanks in advance

Page Refresh
Hi everyone.

I have some code, for making a Combo become toggle between visible and not visible when an option button is selected.

Here it is.


Code:
Private Sub CommandButton22_Click()

If Slide4.OptionButton22 = False Then
Slide4.OptionButton22 = True
Slide4.ComboBox2.Visible = True
Else
Slide4.OptionButton22 = False
Slide4.ComboBox2.Visible = False
End If
End Sub
The code works great. My problem is, when i'm in the presentation, I select the option button, the combobox appears, but I cannot make a selection on the drop down list. When I click on the combobox, the next slide appears. I think I need to refresh the page after the combobox becomes visible, but I don't know how.

Please Help.

Refresh IE Page
I want to use a method to refresh a Internet Explorer webpage, I need to just refresh the page without loading a new child of IE is there away to get the windows handle and refresh the current page using VB6?

Is There A Way To Refresh One ASP.NET Page From Another?
Assuming both ASP.NET pages are part of the same application, is it possible to refresh one of the pages when a button on the other is clicked? If so, how?

How Do I Refresh A Page?
I'm working on a program that has a catalogue and a basket that users can fill up. I have one form that displays all items in the basket. The user can click on a certain item, then on remove to take an item ut of the basket. I would like to refresh the page so that after clicking on 'remove', the list of items in the basket is automatically updated. I tried using Me.Refresh, but this doesn't work. Is there something else I can do?

Here's what I've done:

Private Sub cmdRemoveItem_Click()

x = lbItemNum(Index)
eraseItem x

End Sub


Private Sub eraseItem(ByVal itemNum As Long)
Dim i As Long
For i = itemNum To UBound(cart) - 1
cart(i) = cart(i + 1)
Next
ReDim Preserve cart(UBound(cart) - 1)

z% = UBound(cart)
End Sub


This is the code that fills in the labels :

Private Sub Form_Load()
tot = 0 'remet tot à 0 à chaque affichage de la page au cas ou erase à été appelé

' doit faire gestion de pages (+ que 10 articles)
If Not z% = 0 Then 'voir panier vide

For y% = 0 To (z% - 1)

lbNum(y%).Caption = y% + 1
lbItemNum(y%).Caption = Str$(cart(y%).itemNum)
lbItemName(y%).Caption = cart(y%).ItemName
lbPrice(y%).Caption = CStr("$ " & cart(y%).Price)
lbColor(y%).Caption = cart(y%).Color
lbSize(y%).Caption = cart(y%).Size
lbQty(y%).Caption = cart(y%).Nbr
lbItemTot(y%).Caption = CStr("$ " & cart(y%).ItemTot)

tot = tot + cart(y%).ItemTot

Next y%

lbSubTot = CStr("$" & tot)

End If
End Sub

Message At The Refresh Rate.
hi, my friend asked me if i could make a program for him that will blink a message at the refresh rate of the computer, I.E. imperseptabel, he is wondering if he could tech himself vocabulary words with it.

all i want is to display text, nothing fancy like shapes or pictures, but it can't have any flicker (that would be incredibly anoying) any help of with this would be greatly apprecieated, thanks

Is It Possible To Refresh A IE Web Page Without Any Prompts?
As per the question.

I have a VB program that launches a IE Web Browser and when you enter the username and password it attempts to log on. If the site times out, I can detect this and issue a IE.REFRESH command, but because I posted data, a box pops up asking doing I want to re-submit the data.

Is it possible to supress this box, so no message comes up and everything gets re-submitted invisible?

Thanks

Mabsey

Refresh Part Of A Page
Hi

i am trying to refresh only part of an asp page
can i do it?
if can how can, how?

Forcing Page Refresh From VB
I have several pages that I use at work that could really benefit from an auto refresh.  Unforntunately, the powers that be have decided that it is not in their best interest to just reprogram the page, they think the massive influx of traffic may crash the servers.  Officially, IT tells me this can't be done, but I have a feeling that it can.  Now I have used VB in the past, and I am familiar with it, but it has been a long time since I have really dug into it.  The question is, can I run a VB program to look for the title of the web page window and force it to refresh at a given interval?

Error-Handling And Page Refresh. How?
Good day.
I just wanna ask what is the code for refreshing a form?
Let's say I have a list box where all the files are listed there and I choose one file and delete it and a msg box appeared that the file is deleted (and the file is really deleted). After clicking the 'Ok' in the msgbox, i want the form to refresh or i want the list box to refresh that the deleted file won't be displayed anymore. What is the code for that form reload or refresh?

____________________

How do you handle error in the drive list box if you choose drive a: and there is no diskette in drive a:
What is the code for that?


Thank you.

Force Browser To Refresh Page
How can I Force the Default Browser to refresh it's current page ?

Thks ,
[]P

Vbscript To Refresh Current Page
Hi, I need help please!
I need a script to refresh the current page.
Reason being is that i had jscript tooltip in an xslt file that works fine when first time the page is loaded but once onpostback - it does not work.
So i can't edit the aspx file becuase the entire site uses the file.
So i would like to Refresh the Current ASPX/Page so that it at leats works the first time user opens page!
Please Assist!
Regards

Vbscript To Refresh Current Page?
Hi, I need help please!
I need a script to refresh the current page.
Reason being is that i had jscript tooltip in an xslt file that works fine when first time the page is loaded but once onpostback - it does not work.
So i can't edit the aspx file becuase the entire site uses the file.
So i would like to Refresh the Current ASPX/Page so that it at leats works the first time user opens page!

strStUOM = "aObjects("FG1030StUOM")"
If strStUOM = "Liter" Then

window.location.reload(true)
End If
This gives me an error: Object required: 'window'

Please Assist!
Regards

Auto Away Message.
Is it possible to make a program to send a message to an MSN IM saying im away....when im not there?

Adodc1.refresh Method Causes An Error Message
I am attempting to populate an Adodc1 control on a form after accessing a stored MSAccess2000 query using the following codes;

Dim conn As New ADODB.Connection
Dim param1 As New ADODB.Parameter
Dim Cmd As New ADODB.Command
Dim Rs As New ADODB.Recordset

.....

Private Sub cmdGetQueryResult_Click()

Set Rs = New ADODB.Recordset
Set param1 = Cmd.CreateParameter("ParameterName", adSmallInt, adParamInput, 2)

With Cmd
 Set .ActiveConnection = conn
 .CommandText = "QueryName"
 .CommandType = adCmdStoredProc
 .Parameters.Append param1
 .Parameters("ParameterName") = 78 ' 78 is the numeric value passed to query
 Set Rs = .Execute()
End With

Set Me.Adodc1.Recordset = Rs
Me.Adodc1.Refresh
Me.datagrid1.Rebind
Me.datagrid1.HoldFields
Rs.Close

End Sub

Every time I reach the Me.Adodc1.Refresh line, (when running the program in debug mode) the message "Too few parameters. Expected 1." appears. Adodc1 is an ADO Data control on a form, hence the reference Me.Adodc1.Recordset. In the VB6 program I am creating, I have named it "adcProdID". The code resides behind a button on the form and when it is pressed, the code should load the required data into a Datagrid binded to the ADO data control. The required data is shows up on the datagrid, however just that the statedmessage always comes up. Grateful if someone can advise me as to what I am not doing correctly. Thanks.


Command Button To Refresh An Image On A Web Page
Hi,

I have loaded a web site in a webbrowser1 control which displays 5 images. Now let's say image 4 is always problematic on that page and sometimes doesn't load. How can I create a command button that when you click it, re-loads just image 4 on that webpage. I don't want to have to refresh the whole page.

Thanks

Mabsey

Refresh Embedded Web Page Handling As Event
ITtoolbox Portal for Visual Basic - http://visualbasic.ittoolbox.com/

Trying to embed a web page to stream up to date info to users, but
refreshing the web page is being read as an event and is bringing the focus
back to the main login screen (not desired). Any way to periodically
refresh without this occurring?

Thanks!

-Bill

Request For Refresh Code For Form Page
hi everyone, below is a problem that remain
unsolved for weeks!

I had designed a Salesman Table form page with ADD, EDIT, DELETE, VIEW (crystal report) and EXIT button.
However whenever i edit a record or add a record using the EDIT button, the record will be
updated on my SQL Server database, but when i try to view it on the form page the record remains
the old one.

And the only way to view the new record is to EXIT from the form, and log in again to view
the latest EDITED or ENTERED record. If possible can anyone provide me with a REFRESH code for my
form so as to view the new or edited record on the instant w/o exiting the form.

Thanks A MILLION...

Auto Close A Message Box...
I have a macro that opens a text file, parses it, copies some data and places that data into a different workbook. After going through this process, I have the text file close. Because I have "changed" the data in the text file by parsing it, I get a message box that asks me if I would like to save my changes to the text file before closing. Is there any way to have the text file to close without getting this message box? Or, maybe is there a way that I can have the macro automatically select "NO" when asking if I want to save before closing? Any help would be very appreciated... I'm very new to writing macros on my own.

Have VB Auto Click A Message Box
Is there a way to have VB auto click a message box, or is there a way to have VB display a message box that goes away without having to click it?

Example:
Public Sub Goku()
MsgBox "The World"
Msgbox "The Planet"
End Sub

I would like for the message box to be displayed, but to go away without someone having to click it.


thanks,

Auto Closing A Message Box
Anyone know a means by which I could close a message box manually?

Maybe SendKeys?

Thanks,
Josh

Data Control Refresh Problem. VB6 Error Message
I have a very simple database, constructed using the Visual Data Manager in VB6. It contains 2 tables.
I have a Data control and a DataGrid bound to it.
At design time the Recordsource is set to the first of the tables and the data duly appears in the grid, but when I use these lines of code:
Data1.Recordsource="xyz"
Data1.Refresh

in an attempt to access the 2nd table (named xyz) I get

"Object does not support this property or method"

which seems to be a fairly stupid response!

I've discovered that this error is not trappable, and also that when I run the VB code, if I cancel the error message box and click on the continue button the program then proceeds to display the data from the "Xyz" table in the grid !

If the error was trappable I could live with this, but as it isn't I have to find an answer; I hope someone can help me before I go completely nuts!

I reconstructed the database under VB5 on another machine, and wrote the same code. Under VB5 it works just fine!

Auto-update From A Web Page
Hello,



Does anyone know how to implement an auto-update feature in their VBapp.
which looks at a web page for an updated file and downloads that fileto the
VB app./host pc ?



(E.g. an anti-virus program constantly looks for new virus signatureupdates
on the web, and downloads them automatically)

Kind regards,


Darren Logan BSc(Hons)


Development Engineer

Can Anyone Help Me To Fix The Auto Machine, (It's About Yahoo Message)
Hey I have a answer machine
But when it ran,someting wrong happened.
Does anyone help me fix it.
I'm using VB6.




This is my wrong place.

And my code just like under.


Code:
Option Explicit
'CODED BY JOHN CASEY; SPIYRE@MSN.COM
'DONT FORGET REFERENCE TO "MICROSOFT HTML OBJECT LIBRARY"

Public Declare Function ObjectFromLresult Lib "oleacc" (ByVal lResult As Long, riid As UUID, ByVal wParam As Long, ppvObject As Any) As Long
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Public Declare Function SendMessageTimeout Lib "user32" Alias "SendMessageTimeoutA" (ByVal hWnd As Long, ByVal msg As Long, ByVal wParam As Long, lParam As Any, ByVal fuFlags As Long, ByVal uTimeout As Long, lpdwResult As Long) As Long
Public Declare Function RegisterWindowMessage Lib "user32" Alias "RegisterWindowMessageA" (ByVal lpString As String) As Long

Type UUID
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(0 To 7) As Byte
End Type

Public Const SMTO_ABORTIFHUNG = &H2


Function getietext(ByVal hWnd As Long) As String
On Error Resume Next
Dim doc As IHTMLDocument2

If hWnd <> 0 Then
Set doc = IEDOMFromhWnd(hWnd)
Else
getietext = "-[TEXT CANNOT BE FOUND]-"
Exit Function
End If

'---CHECKS-FOR-HWND------


If doc.body.innerText = vbNullString Then
getietext = "ERROR! [WINDOW DOESN'T CONTAIN HTML]"
Exit Function
End If
'---CHECKS-FOR-HTML-EMBEDDED

getietext = doc.body.innerText

End Function

Function IEDOMFromhWnd(ByVal hWnd As Long) As IHTMLDocument
Dim IID_IHTMLDocument As UUID
Dim doc As IHTMLDocument2
Dim lRes As Long 'if = 0 isn't inet window.
Dim lMsg As Long
Dim hr As Long
'---END-DECLARES---------

' Register the message
lMsg = RegisterWindowMessage("WM_HTML_GETOBJECT")

' Get the object
Call SendMessageTimeout(hWnd, lMsg, 0, 0, SMTO_ABORTIFHUNG, 1000, lRes)


'---CHECKS-FOR-WINDOW----
hr = ObjectFromLresult(lRes, IID_IHTMLDocument, 0, IEDOMFromhWnd)

End Function


Is the
" lMsg = RegisterWindowMessage("WM_HTML_GETOBJECT")

' Get the object
Call SendMessageTimeout(hWnd, lMsg, 0, 0, SMTO_ABORTIFHUNG, 1000, lRes)" place wrong?

Because the "Function getietext(ByVal hWnd As Long) As String

On Error Resume Next
Dim doc As IHTMLDocument2

If hWnd <> 0 Then
Set doc = IEDOMFromhWnd(hWnd)
Else
getietext = "-[TEXT CANNOT BE FOUND]-"
Exit Function
End If
" place is my wrong.
So...please help me


And this is one aonther code.

Or is the" List1.AddItem " " & getietext(window(3)) & " @ " & Now" place wrong?

I really don't know how to do,please help me to fix it.


Code:
Private Sub Timer1_Timer()
Dim imclass As Long
imclass = FindWindow("ysearchmenuwndclass", vbNullString)
If imclass >= 1 Then
Pause (0.4)

Dim window(1 To 3) As Long
window(1) = FindWindow("ysearchmenuwndclass", vbNullString)
window(2) = FindWindowEx(window(1), 0, "ATL:0054E0E0", vbNullString)
window(3) = FindWindowEx(window(2), 0, "Internet Explorer_Server", vbNullString)
List1.AddItem " " & getietext(window(3)) & " @ " & Now

Pause (0.2)
YIM8ChatSend "answer: " & Text1.Text & " "
Label1.Caption = Label1.Caption + 1
ClosePm
End If
End Sub

Auto Update HTML Page
I have an Excel Macro that updates and processes data on a Excel sheet. After it finishes I would like it to update a few pieces of data on a web page (Intranet). How can I do this. I can tag the elements with ID's. But I am not surre hope to open the page, make the change, and save the file.

Thanks,

Need My App To Auto Load Image On Htm Page. How???
Hi guys, was wondering if this could be done. I've been trying for days with an DHTML project but I can't seem to get anywhere.
I'd like my VB app to send a command to load and or refresh an image from an IMG on an htm page I've created is there any way on earth that this can be done?
I know how to send the command from my VB app, that's not a problem but how can a web page respond to my app's command?
I've even tried through the SendMessage API call but although it works fine between two apps it wont work between VB app and Dhtml project whyyyyyyyy?
If any body can give me a solution that'd be great, Thanks

Copyright © 2005-08 www.BigResource.com, All rights reserved