- 工信部備案號 滇ICP備05000110號-1
- 滇公安備案 滇53010302000111
- 增值電信業(yè)務(wù)經(jīng)營(yíng)許可證 B1.B2-20181647、滇B1.B2-20190004
- 云南互聯(lián)網(wǎng)協(xié)會(huì )理事單位
- 安全聯(lián)盟認證網(wǎng)站身份V標記
- 域名注冊服務(wù)機構許可:滇D3-20230001
- 代理域名注冊服務(wù)機構:新網(wǎng)數碼
先遠程到VPS/云主機上,打開(kāi)N點(diǎn)的程序目錄,一般是在C:Program FilesNpointSoft
pointhost1.9.6web,再雙擊打開(kāi)admin目錄,手工新建一個(gè)文件,如resetpass.asp,程序內容如下:
< !--#include file="../inc/conn.asp" -->
< !--#include file="../inc/char.asp" -->
< !--#include file="../inc/npoint.asp" -->
< %
Function RandStr(LenNum) '生成隨機數函數
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&",請去后臺手動(dòng)?改密碼!")
sql="update adminlogo Set pass='"&npoint(temp)&"' where name='admin'"
conn.Execute(sql)
%>
以上程序是對管理員用戶(hù)名為admin的進(jìn)行重置,如果不是admin,那么把where name='admin'這里的admin修改成你之前定義的管理員用戶(hù)名即可。
然后執行這個(gè)程序,比如你的N點(diǎn)訪(fǎng)問(wèn)界面是http://www.tjdsmy.cn/admin,那么執行http://www.tjdsmy.cn/admin/resetpass.asp即可。
特別注意:請重置密碼后務(wù)必刪除這個(gè)程序文件,否則會(huì )被別人利用進(jìn)入系統。
售前咨詢(xún)
售后咨詢(xún)
備案咨詢(xún)
二維碼
TOP