I have the following code that sends a message to a web
page and tehn to a pager. bypassing the outlook object
model gaurd BUT it opens a new web page window. and I
want to close the windows after it is done sending.

Sub sendtopagers()
txtMessage = "Test"
PagerNumber = "2081234567"
fulltest = "PIN=" & PagerNumber & "&MSSG=" & txtMessage
& "&Q1=0"

ThisWorkbook.FollowHyperlink "http://www.Arch.com/cgi-
bin/wwwpage.exe", , True, , fulltest, msoMethodPost


Any Help would be apprecieated

Brian Elson