Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function RegisterAccount(p, c, a)
- if a[3] != "jh&S7FAs7FGASA*(SFA*9sf6ghw87h8" then return end
- local User,Pass = ForumsConnection:escape(a[1]), ForumsConnection:escape(a[2])
- local CheckName = ForumsConnection:query("SELECT id_member FROM smf_members WHERE LOWER(member_name) = '" .. string.lower(User) .. "'")
- CheckName.onSuccess = function() if CheckName:getData()[1] then p:iMsg("Username already taken!") SendUserMessage("AccountLinkMenu", p) else GrabID() end end
- CheckName.onFailure = function(s,e) print("[iAdmin] MySQL Error | Checking for duplicate username | " .. e) end
- CheckName:start()
- function GrabID()
- local GrabNextID = ForumsConnection:query("SELECT MAX(id_member) FROM smf_members")
- GrabNextID.onSuccess = function() DoReg(GrabNextID:getData()[1]['MAX(id_member)'] + 1) end
- GrabNextID.onFailure = function(s,e) print("[iAdmin] MySQL Error | Grabbing next ID | " .. e) end
- GrabNextID:start()
- end
- function DoReg(d)
- local RegisterUser = ForumsConnection:query("INSERT INTO smf_members (id_member, member_name, date_registered, real_name, passwd, member_ip, member_ip2, id_msg_last_visit, id_post_group, steamid) VALUES (" .. d .. ", '" .. User .. "', " .. os.time() .. ", '" .. User .. "', SHA1('" .. string.lower(User) .. "" .. Pass .. "'), '" .. p:IPAddress() .. "', '" .. p:IPAddress() .. "', 7, 4, '" .. p:SteamID() .. "')")
- RegisterUser.onFailure = function(s,e) print("[iAdmin] MySQL Error | Registering user (main) | " .. e) end
- RegisterUser:start()
- local SetUser = ForumsConnection:query("UPDATE smf_settings SET value = " .. d .. " WHERE variable = 'latestMember'")
- SetUser.onFailure = function(s,e) print("[iAdmin] MySQL Error | Registering user (settings) | " .. e) end
- SetUser:start()
- local SetUser2 = ForumsConnection:query("UPDATE smf_settings SET value = " .. d .. " WHERE variable = 'totalMembers'")
- SetUser2.onFailure = function(s,e) print("[iAdmin] MySQL Error | Registering user (settings 2) | " .. e) end
- SetUser2:start()
- local SetUser3 = ForumsConnection:query("UPDATE smf_settings SET value = '" .. User .. "' WHERE variable = 'latestRealName'")
- SetUser3.onFailure = function(s,e) print("[iAdmin] MySQL Error | Registering user (settings 3) | " .. e) end
- SetUser3:start()
- local SetUser4 = ForumsConnection:query("UPDATE smf_settings SET value = '" .. os.time() .. "' WHERE variable = 'memberlist_updated'")
- SetUser4.onFailure = function(s,e) print("[iAdmin] MySQL Error | Registering user (settings 4) | " .. e) end
- SetUser4:start()
- end
- end
- concommand.Add("ia_registeraccount", RegisterAccount)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement