免费实现服务器登录手机短信通知
?我負(fù)責(zé)某家公司web服務(wù)器的維護(hù),近期看到服務(wù)器安全日志中記錄了一些登錄時間,我懷疑系統(tǒng)有******。如何讓配置服務(wù)器有人登錄時,立即給你發(fā)送一個手機(jī)短信提醒,能夠及時提醒你,有人登錄服務(wù)器。
下面告訴你一個方法,如果有人登陸服務(wù)器,服務(wù)器立即給你的手機(jī)發(fā)短息提醒;該方法支持支持聯(lián)通,移動,電信手機(jī),且是免費(fèi)短信。
實(shí)現(xiàn)步驟:
1.聯(lián)通、移動、電信,手機(jī)免費(fèi)開通手機(jī)郵箱,同時開通郵件短息提醒。
移動手機(jī)訪問以下網(wǎng)址開通手機(jī)郵箱:http://mail.10086.cn/
聯(lián)通手機(jī)訪問以下網(wǎng)址開通手機(jī)郵箱:http://mail.wo.com.cn/mail/login.action
電信手機(jī)訪問以下網(wǎng)址開通手機(jī)郵箱:http://webmail21.189.cn/webmail/
2.以下為發(fā)送郵件的VBS腳本,修改為你的手機(jī)號和郵箱密碼,將以下內(nèi)容復(fù)制到記事本,保存為擴(kuò)展名為vbs的文件。
NameSpace = "http://schemas.microsoft.com/cdo/configuration/"?
Set Email = CreateObject("CDO.Message")?
Email.From = "13803367991@139.com"?
Email.To = "13803367991@139.com"?
Email.Subject = "有人登陸Web服務(wù)器"?
Email.Textbody = "注意檢查登陸者是否合法!"?
With Email.Configuration.Fields?
.Item(NameSpace&"sendusing") = 2?
.Item(NameSpace&"smtpserver") = "smtp.139.com"?
.Item(NameSpace&"smtpserverport") = 25?
.Item(NameSpace&"smtpauthenticate") = 1?
.Item(NameSpace&"sendusername") = "13803367991"?
.Item(NameSpace&"sendpassword") = "hsd_Gang"?
.Update?
End With?
Email.Send?
?
3.在服務(wù)器上運(yùn)行
到目前為止,你已經(jīng)設(shè)置好了,服務(wù)器登錄腳本,只要有人登陸你的服務(wù)器,你的服務(wù)器就會給你的手機(jī)郵箱發(fā)送郵件,你的手機(jī)郵箱,就會給你的手機(jī)發(fā)短信通知。
轉(zhuǎn)載于:https://blog.51cto.com/stoneking/1113267
總結(jié)
以上是生活随笔為你收集整理的免费实现服务器登录手机短信通知的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: CSS 文字处理总结
- 下一篇: 打开sa属性报错