- 工信部備案號 滇ICP備05000110號-1
- 滇公安備案 滇53010302000111
- 增值電信業(yè)務(wù)經(jīng)營許可證 B1.B2-20181647、滇B1.B2-20190004
- 云南互聯(lián)網(wǎng)協(xié)會理事單位
- 安全聯(lián)盟認(rèn)證網(wǎng)站身份V標(biāo)記
- 域名注冊服務(wù)機(jī)構(gòu)許可:滇D3-20230001
- 代理域名注冊服務(wù)機(jī)構(gòu):新網(wǎng)數(shù)碼
先遠(yuǎn)程到VPS/云主機(jī)上,打開N點的程序目錄,一般是在C:Program FilesNpointSoft
pointhost1.9.6web,再雙擊打開admin目錄,手工新建一個文件,如resetpass.asp,程序內(nèi)容如下:
< !--#include file="../inc/conn.asp" -->
< !--#include file="../inc/char.asp" -->
< !--#include file="../inc/npoint.asp" -->
< %
Function RandStr(LenNum) '生成隨機(jī)數(shù)函數(shù)
On Error Resume Next
Dim K, tmp
For K = 1 To LenNum
Randomize
If K = 1 Or K = 4 Then
tmp = tmp & Mid("ABCDEFGHIJKLMNOPQRSTUVWXYZ", Fix(Rnd * 26) + 1, 1)
ElseIf K = 2 Or K = 5 Then
tmp = tmp & Mid("123456789", Fix(Rnd * 9) + 1, 1)
ElseIf K = 3 Or K = 6 Then
tmp = tmp & Mid("abcdefghijklmnopqrstuvwxyz", Fix(Rnd * 26) + 1, 1)
Else
tmp = tmp & Mid("123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz", Fix(Rnd * 61) + 1, 1)
End If
Next
RandStr = tmp
End Function
temp = RandStr(8)
response.write("管理員密碼已成功重置為:"&temp&",請去后臺手動?改密碼!")
sql="update adminlogo Set pass='"&npoint(temp)&"' where name='admin'"
conn.Execute(sql)
%>
以上程序是對管理員用戶名為admin的進(jìn)行重置,如果不是admin,那么把where name='admin'這里的admin修改成你之前定義的管理員用戶名即可。
然后執(zhí)行這個程序,比如你的N點訪問界面是http://www.tjdsmy.cn/admin,那么執(zhí)行http://www.tjdsmy.cn/admin/resetpass.asp即可。
特別注意:請重置密碼后務(wù)必刪除這個程序文件,否則會被別人利用進(jìn)入系統(tǒng)。
售前咨詢
售后咨詢
備案咨詢
二維碼
TOP