เพราะว่าห้อง Server ยังไม่มี Temperature sensor เลยบูรณาการวิธีการง่าย ๆ ที่จะ E-mail เตือนถ้าอุณหภูมิสูงขึ้น ตอนแรกตั้งใจจะใช้
Speedfan + Openssl แต่ packet ผมโดน drop ระหว่างทางน่าจะเพราะมี ACL อยู่ครับ ลอง Blat ผ่าน Stunnel ก็ยังไม่ได้
ผมเลยใช้ Mortscript เป็น script ที่ใช้สำหรับ ส่งพวก keyboard, mouse หรือ control windows ต่าง ๆ ส่ง mail ผ่าน web
code ที่เขียนออกจะมั่ว ๆ ไม่ค่อยเป็นระเบียบเท่าไหร่เพราะตัว script ไม่สามารถส่งค่า argument ผ่าน subfunction ได้
แต่ทำงานได้ก็เอาละครับ ดู code ได้จากด้านล่างครับ
#Constant value
asec=1000
bgcolor=4632816;Blue color
compose=14079702;Compose botton
browse=14342874;Browse botton
time=formattime(“d/m/Y H:i”);Current system time
form=15790836;Compse form
reportDes=”C:\Documents and Settings\user\report.7z”
sent=3390072
iSearch=9053414
#Open shortcut in menu
sendspecial(“win”,down)
sleep(1000)
mousedblclick(115,435)
#Wait until page loaded fill in form, Login
while(NOT(colorat(620,260)=bgcolor))
sleep(1000)
endwhile
#Go to windows login
show(“AOL Mail”)
sendkeys(“username”)
sendspecial(“Tab”)
sendkeys(“password”)
sendcr()
#Compose mail
while(NOT(colorat(185,175)=compose))
sleep(1000)
endwhile
mouseclick(185,175)
while(NOT(colorat(570,370)=browse))
sleep(1000)
endwhile
#Type message
sendkeys(“Date&Time “&time)
mouseclick(290,280)
sendkeys(“your_E-mail;”)
while(NOT(colorat(340,315)=form))
sleep(1000)
endwhile
#sendcr()
mouseclick(290,340)
sendkeys(“Server temperature report”)
#Add attachment
mouseclick(535,370)
sendkeys(reportDes)
mouseclick(520,390)
mouseclick(275,210)
#Message sent logout close windows
while(NOT(colorat(265,215)=sent))
sleep(1000)
endwhile
mouseclick(115,150)
while(NOT(colorat(785,165)=iSearch))
sleep(1000)
endwhile
mouseclick(998,14)
code ก็ ไม่ได้มีอะไรมากกดปุ่ม win คลิ๊ก IE ไปที่หน้า http://mail.aol.com compose mail attached file ที่ 7zip compressed
แล้วส่งไปที่ mail ของผม ส่วนการตั้ง condition ก็ให้เป็นหน้าที่ speedfan ถ้า temp ของ CPU เกิน 50 C ก็ run script ได้
ผมว่ตัว mortscript น่าจะมีประโยชน์ในการทำ automation และ software testing อีกเยอะครับใครสนใจก็ลองเล่นดูได้ครับ
Filed under: automation, script, Windows