Author
Message
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
update notification if anyone is interested, i wrote a quick program to refresh the website every 15 seconds. if there is a change, it sends a message to my cell phone to alert me. anyone else want an alert sent to an email or anything? if so, give me an email address and I will add yours to the list.
-daniel
Posted: Thu May 05, 2005 1:15 pm
Hova092
Unfettered
Joined: 14 Apr 2005 Posts: 304 Location: Zanzabar...RAILING UR MOM!
how do we know this is true....u could be scamming...
_________________www.welovebees.com
The Beekeepers colony- 83774237
Posted: Thu May 05, 2005 1:20 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
haha...i guess thats true. but whatever....well, here, heres proof i guess...
Code:
Private Sub Command1_Click()
WebBrowser1.Navigate (Text1.Text)
End Sub
Private Sub Command2_Click()
Timer1.Enabled = Not Timer1.Enabled
End Sub
Private Sub Form_Load()
oldHTML = "FIRST"
Timer1.Enabled = False
WebBrowser1.Navigate ("http://www.ourcolony.net")
End Sub
Private Sub Timer1_Timer()
oldHTML = WebBrowser1.Document.documentElement.innerHTML
WebBrowser1.Refresh2
Dim newHTML As String
newHTML = WebBrowser1.Document.documentElement.innerHTML
If (oldHTML <> newHTML) Then
If (Winsock1.State <> 0) Then Winsock1.Close
Winsock1.Connect
While Winsock1.State <> 7
DoEvents
Wend
'MsgBox "Winsock: Host(" & Winsock1.RemoteHost & "[" & Winsock1.RemotePort & "])" & vbTab & "Status: " & Winsock1.State
Dim TmpMsg As String
TmpMsg = TmpMsg & "HELO ourcolony.alertSPLAT dc.com" & vbCrLf
TmpMsg = TmpMsg & "MAIL FROM: ourcolony.alertSPLAT dc.com" & vbCrLf
TmpMsg = TmpMsg & "RCPT TO: EMAILADDY" & vbCrLf
TmpMsg = TmpMsg & "DATA" & vbCrLf
TmpMsg = TmpMsg & "Subject: UPDATE!" & vbCrLf
TmpMsg = TmpMsg & "Ourcolony has been updated" & vbCrLf
TmpMsg = TmpMsg & "." & vbCrLf
TmpMsg = TmpMsg & "QUIT"
Winsock1.SendData TmpMsg
DoEvents
Winsock1.Close
' MsgBox "Trying to send email"
End If
End Sub
that would be the source for the vb project....
Posted: Thu May 05, 2005 1:21 pm
Hova092
Unfettered
Joined: 14 Apr 2005 Posts: 304 Location: Zanzabar...RAILING UR MOM!
welll then count me in...i guess...i'll pm u with my email...
_________________www.welovebees.com
The Beekeepers colony- 83774237
Posted: Thu May 05, 2005 1:30 pm
Nola
Unfettered
Joined: 27 Jul 2004 Posts: 675
Good work colonist. How do you figure out there's a change? Just curious.
Posted: Thu May 05, 2005 1:42 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
compare the source for the site to the one just previous to the refresh. i was worried about the timer, but it doesnt show up in the source, so it doesnt change.
Posted: Thu May 05, 2005 2:29 pm
Steve
Boot
Joined: 03 May 2005 Posts: 29
Shouldn't you navigate to the team page, rather than the main page?
Posted: Thu May 05, 2005 3:05 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
it does the team page
which was a bit of a problem really, since it uses cookies to stay logged in, so i ended up having to use an internetbrowser control and actually have the page open.
works like a charm. i tested it on some other sites, and i have also checked to make sure that it does indeed send out emails.
oh, and if you were referring to the "WebBrowser1.navigate "http://www.ourcolony.net" line, that is under the Form_Load function, which only gets called when the application begins running. then i navigate to the team page, login, click a button, and wait for an update.
again, if anyone else would like updates, let me know
-daniel
Posted: Thu May 05, 2005 3:27 pm
Nola
Unfettered
Joined: 27 Jul 2004 Posts: 675
OK, I'm in. You have PM.
Posted: Thu May 05, 2005 4:03 pm
Steven
Guest
You can subscribe me... steven[dot]cooreman[SPLAT]gmail.com if you like, I can give you an gmail account for your job.
Posted: Thu May 05, 2005 4:24 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
did anyone recieve a test message? i might be having problems with multiple recipients. please let me know if you DID recieve a test message if you signed up.
thanks,
daniel
Posted: Thu May 05, 2005 5:00 pm
Nola
Unfettered
Joined: 27 Jul 2004 Posts: 675
I got the test message.
One question: What colony will the updates be based on?
Posted: Thu May 05, 2005 5:01 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
they are based on yay...
i suppose if you would like to run one for another team, thats possible too. i could send someone the app
Posted: Thu May 05, 2005 5:06 pm
danielgary
Boot
Joined: 16 Dec 2004 Posts: 15
im kind of hoping for an update sometime today so i could KNOW it works on the site...
Posted: Thu May 05, 2005 5:13 pm
Hova092
Unfettered
Joined: 14 Apr 2005 Posts: 304 Location: Zanzabar...RAILING UR MOM!
u got my PM
_________________www.welovebees.com
The Beekeepers colony- 83774237
Posted: Thu May 05, 2005 5:41 pm
Display posts from previous: All Posts 1 Day 1 Week 2 Weeks 1 Month 3 Months 6 Months 1 Year Sort by: Post Time Post Subject Author Ascending Descending