會員注冊源碼
1. 按鍵精靈9如何製作自己的注冊碼 比如7天或者30天求源碼 謝謝
額,幾百行代碼10分....
2個方法,
一種是注冊小精靈會員,使用商業版可以添加這個功能....
另外一種比較麻煩,密鑰生成你也要自己學會修改線程獨特的密鑰
這個加到腳本的前面後在製作成小精靈
Delay 1000
UserVar zc=48002764235672752817473257963 "請輸入注冊碼"
mama=Plugin.GetSysInfo.GetHDDSerialNumber
VBS ma=Abs(mama)
VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6
VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457
VBS ct=en&"注"&ce&"冊"&cr&"碼"&nl
//注冊碼等於上面算出的結果則表達方式成立
If zc=ct
Goto 啟動腳本
Else
ma=ma+4546446486
MessageBox "注冊碼錯誤,你的序列號是:"& ma &"。請將序列號發給賣你腳本的人,獲取注冊碼。"
//表達方式不成立,結束腳本
ma="注冊碼錯誤,你的序列號是:"& ma &"。請將序列號發給賣你腳本的人,獲取注冊碼。"
//下面是讀出時間
Dim Y,Mon,D,W,h,m,s,SJ
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
h=Hour(time):m=Minute(time):s=Second(time)
SJ=Y&"年"&Mon&"月"&D&"號 "&"星期"&W&" "&h&"點"&m&"分"&s&"秒"
//上面是讀出時間
Set objShell = CreateObject("WScript.Shell")
x = objShell.SpecialFolders.Item("desktop")
//↑取得桌面路徑
set fso=CreateObject("Scripting.FileSystemObject")
const forwriting=2
const forreading=1
set myfile=fso.createtextfile(x&"\你的序列號.txt")
//↑寫一個TXT到桌面
/////////////////////////////////主內容/////////////////////////////////
myfile.writeline(ma)
/////////////////////////////////主內容/////////////////////////////////
myfile.writeline(" ")
myfile.writeline("記錄時間:"&SJ)
myfile.writeline(" ")
myfile.writeline(" ")
myfile.writeline("感謝您使用由《00一一一 ,按鍵用戶 》製作的腳本,祝願您使用愉快!!!")
myfile.writeline(" ")
myfile.writeline(" 健康游戲公告")
myfile.writeline(" ")
myfile.writeline(" 抵制不良游戲,拒絕盜版游戲。")
myfile.writeline(" 注意自我保護,謹防受騙上當。")
myfile.writeline(" 適度游戲益腦,沉迷游戲傷身。")
myfile.writeline(" 合理安排時間,享受健康生活。")
//↑這兩行就是你寫進TXT的內容
myfile.Close
Lleft=instr(1,awoke,"(")
Rright=instr(1,awoke,")")
EndScript
EndIf
EndScript
Rem 啟動腳本
MessageBox "測試成功!!!"
這個留給自己,誰都不要給.用於給用你腳本的人來獲得注冊碼的
Delay 1000
UserVar ma="jq4m" 請輸入對方的序列號
ma=ma-4546446486
VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6
VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457
VBS ct=en&"注"&ce&"冊"&cr&"碼"&nl
//下面是讀出時間
Dim Y,Mon,D,W,h,m,s,SJ
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
h=Hour(time):m=Minute(time):s=Second(time)
SJ=Y&"年"&Mon&"月"&D&"號 "&"星期"&W&" "&h&"點"&m&"分"&s&"秒"
//上面是讀出時間
Set objShell = CreateObject("WScript.Shell")
x = objShell.SpecialFolders.Item("desktop")
//↑取得桌面路徑
set fso=CreateObject("Scripting.FileSystemObject")
const forwriting=2
const forreading=1
set myfile=fso.createtextfile(x&"\對方的序列號.txt")
//↑寫一個TXT到桌面
/////////////////////////////////主內容/////////////////////////////////
myfile.writeline("對方的序列號是:"&ma)
KeyPress 13,1
myfile.writeline("對方的注冊碼是:"&ct)
/////////////////////////////////主內容/////////////////////////////////
myfile.writeline(" ")
myfile.writeline("記錄時間:"&SJ)
myfile.writeline(" ")
myfile.writeline(" ")
myfile.writeline("感謝您使用由《00一一一 ,按鍵用戶 》製作的腳本,祝願您使用愉快!!!")
myfile.writeline(" ")
myfile.writeline(" 健康游戲公告")
myfile.writeline(" ")
myfile.writeline(" 抵制不良游戲,拒絕盜版游戲。")
myfile.writeline(" 注意自我保護,謹防受騙上當。")
myfile.writeline(" 適度游戲益腦,沉迷游戲傷身。")
myfile.writeline(" 合理安排時間,享受健康生活。")
//↑這兩行就是你寫進TXT的內容
myfile.Close
Lleft=instr(1,awoke,"(")
Rright=instr(1,awoke,")")
Postscript:至於時間限制和腳本密碼類似,也就是在腳本輸入正確的注冊碼後,記錄下當前的網路時間(返回值 = Lib.網路.獲取網路時間()),然後通過特定的密鑰加密後保存起來,在腳本運行的過程中,每分鍾或小時或腳本啟動時前者通過多線程後者直接添加代碼獲得當前網路時間與腳本第一次注冊成功時間做差計算,從而限制7天或你想要的天數.....腳本內可能會有小錯誤,如果你會寫腳本,我想這點小的語法錯誤不會阻礙你的腳步....我就不改了
2. codepen網站怎麼下載源碼
1、辦會員,通過網站源碼站下載。辦個會員就可以下載全站所有資源,也包括裡面的源碼頻道。
2、使用相關工具下載源碼很多扒皮網站工具,不過使用這類工具下載的源碼是靜態的,不是動態的,也就是前端的。
3、找個高手建網站這個其實算不上是網站源碼下載,應該算是找建站公司或者工作室定製網站,這類網站費用會高些,不過服務會好些。
3. 想求大師幫忙修改下網站源碼(取消會員注冊,登錄功能)
你點開注冊頁面
然後找個比較關鍵的字眼 比如:填寫用戶名 電話號碼不能為空
以這個為目標 在源碼文件夾里 搜索包含這個字的文件
可以把找到的注冊文件 刪掉或者改名也可以
4. 我用源碼做了個論壇要邀請碼我自己怎麼生成
如果是discuz程序,那麼在後台開啟邀請碼注冊功能→用管理員在前台生成邀請碼發給會員,注冊的時候添寫即可→之後復制顯示出來的邀請碼發給會員即可。