如何利用電腦版按鍵提供的 Plugin.SQLServer 數據庫插件 給腳本限時運行(可擴展)

背景 : 公司裏的銷售需要長期手動在網站上跟蹤客戶資料,我就用按鍵做了個自動的 給同事們使用。

友情價20塊一個賬號使用一年,並且每天限制了點啓動按鈕開始 只能運行2個小時。

因爲電腦版按鍵提供了直連sql server數據庫的插件 ,很是方便  那麼就可以做很多事了,  比如網絡驗證、比如雲控...

---------------------------------------------------------------------------------------------------------------------                                                           ----------------------------

↓↓↓↓爲此我創建了一個腳本配置表↓↓↓↓

--腳本配置表
CREATE TABLE ScriptConfig
(
id int identity(1,1) primary key,
qidongTime DATETIME, --啓動時間
Num VARCHAR(50), --賬號
Remark VARCHAR(50), --備註標識
ShopTime VARCHAR(50), --購買日期
UserName VARCHAR(50), --用戶姓名
isczyc VARCHAR(10), --是否操作異常
caozuoTime VARCHAR(50), --操作時間
caozuoBrowser VARCHAR(100), --操作瀏覽器
dataID VARCHAR(50) --資料ID
)
go

↓↓↓↓數據是這樣顯示的↓↓↓↓

                           

                        ↓↓↓↓好了 上按鍵源碼↓↓↓↓

//指定服務器地址,使用用戶名密碼連接到數據庫名
連接狀態 = Plugin.SQLServer.Connect("bds*******.my3w.com", "bds****", "*****", "bds*****_db")
If 連接狀態 = - 1  Then 
    TracePrint "連接成功!"
    name = "a463392823"
    qidongTime = Plugin.SQLServer.SelectData("ScriptConfig", "qidongTime", "Num = '" & name & "'")//獲取賬號爲a463392823的啓動時間
    TracePrint "取啓動時間:" & qidongTime
    If qidongTime = "" Then 
    	MessageBox "查無此賬號,請聯繫開發者綁定!"
        EndScript
    End If
    字段 = split(qidongTime, "|")
    //分割 取啓動時間
    If UBound(字段) <> 0 Then 
        qidongTime = 字段(0)
        TracePrint "配置時間:"&qidongTime
        Pyue = DatePart("m", qidongTime)//取啓動月
        Pri = DatePart("d", qidongTime)//取啓動日
        Delay 200
        Wtime = Lib.網絡.獲取網絡時間()
        Delay 200
        TracePrint "網絡時間:" & Wtime
        Wyue = DatePart("m", Wtime)//取網絡月
        Wri = DatePart("d", Wtime)//取網絡日
        If Pyue = Wyue and Pri = Wri Then //如果啓動日月和網絡日月相同,說明是當天,開始對比時間是否超限
            Wtime = Replace(Wtime, "/", "-")//替換爲合適的時間格式
            秒差 = datediff("s", qidongTime, Wtime)//對比後得到秒差
            小時差 = 秒差 / 60 / 60 //獲取小時差
            TracePrint 小時差
            If 小時差 < 2 Then 
                Goto 時間差
            Else 
                MessageBox "當天運行時間不足,請明日再試!(每天只能運行兩個小時)"
                EndScript
            End If
        Else //如果不是當天
            //修改爲當天
            修改配置時間 = Plugin.SQLServer.UpdateData("ScriptConfig", "qidongTime = '" & Wtime & "'", "Num = '" & name & "'")
            TracePrint "已修改啓動時間爲當天"
        End If
    Else 
        TracePrint "空數據"
        修改配置時間 = Plugin.SQLServer.UpdateData("ScriptConfig", "qidongTime = '" & Wtime & "'", "Num = '" & name & "'")
    End If
    //斷開數據庫連接
    斷開數據庫連接 = Plugin.SQLServer.Close()
Elseif 連接狀態 = 0
    TracePrint "連接失敗!"
    EndScript
End If
Rem 時間差

 

從源碼可以看出我的思路是 在數據庫裏存儲腳本的啓動時間,腳本每次啓動都會獲取對應賬號的啓動時間,如果是當天的話就計算是否超過了2個小時,超過給個提示停止腳本,不超過繼續運行;不是當天的話往數據庫裏記錄當前時間 並繼續運行

能夠限時自然也能做更復雜的網絡驗證 比如各種限制登陸,電腦版按鍵能做的東西其實手機按鍵也都能做,無非是繞下彎,手機按鍵得通過“中轉站”來連接數據庫進行操作,詳情可以去看之前發佈的博客:按鍵精靈手機版(安卓 ios) 如何連接遠程網絡數據庫 比如 sql server, 進行讀寫操作

思路可能不是最好的,大家有什麼好的想法思路可以在下面留言

或進Q羣 862088303  互相交流

 

 

 

 

 

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章