Page faults growing by 50 per minute

[Kiai]

I basically understand page faults. In reviewing a script I wrote, this simple loop causes a steady increase in page faults:

While 1

Select

Case WinActive("New Results Patient's Name:")

$RTE_window_open = 1

$title = WinGetTitle("New Results Patient's Name:")

GUI_RTE()

Case WinActive("", "Document Type: Letter")

GUI_Sign_Print()

Case WinActive("Inbox Message", $patient) And $clipboard = 1

GUI_Msg_paste()

EndSelect

Sleep(1000)

WEnd

While the page faults don't get as high as apps like interenet explorer (over 1,000,000), after a few hours, they are in the 10k's range. I'm not that worried about system stability but I wonder if anyone can point out, in this very simple loop, anything I can do to reduce the page fault rate?

Thanks.

[bo8ster]

Firstly whenever you post code, always use tags so ppl can read it.

While 1
    Select
        Case WinActive("New Results Patient's Name:")
            $RTE_window_open = 1
            $title = WinGetTitle("New Results Patient's Name:")
            GUI_RTE()
        Case WinActive("", "Document Type: Letter")
            GUI_Sign_Print()
        Case WinActive("Inbox Message", $patient) And $clipboard = 1
            GUI_Msg_paste()
    EndSelect
    Sleep(1000)
WEnd

Secondly, page faults are normal, they happen all the time in windows. I suggest you Google traps and faults then page faults so you understand what they are why they are normal.

I can see nothing wrong with your script.