myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
2 страниц V   1 2 >  
Ответить в данную темуНачать новую тему

> Проблема С Регистрационым Скриптом

Теги
Нет тегов для показа
Gangster-Toni
сообщение 8.3.2009, 14:13
Сообщение #1


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




Кароче у мя PtokaX 4.1.1 Api2 ну вот стоит простой скрипт регистации без наворотов ну самая простая кароче она работала отлично а сегодня штото случилось кароче Человек регестриуеться на хабе а этот человека в списке зарегестрированных нет в чом проблема? пожайлуйста дайте cskre на нормальный скрипт хелп плиз!!! beat_brick.gif
Go to the top of the page
+Quote Post
Wariner
сообщение 8.3.2009, 14:20
Сообщение #2


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




ошибки скрипта давай сюда+ попробуй скрипт подвигать вверх вниз!! да и потом куча регистраций везде
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 8.3.2009, 14:29
Сообщение #3


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




воть
Прикрепленные файлы
Прикрепленный файл  regme.rar ( 3.02 килобайт ) Кол-во скачиваний: 13
 
Go to the top of the page
+Quote Post
Wariner
сообщение 8.3.2009, 14:41
Сообщение #4


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




И что воть?! я сказал ошибки скрипта а не сам скрипт! Никто здесь не будет угадывать что тебе нужно
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 8.3.2009, 14:46
Сообщение #5


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




ок ча сорри я не правильно прочитал!

[14:46] Синтаксис [string "--[[..."]:34: attempt to index global 'SetMan' (a nil value)
Go to the top of the page
+Quote Post
Wariner
сообщение 8.3.2009, 15:04
Сообщение #6


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




нет я так понимаю это ты обнаружил нажатием на проверить скрипт. А надо войти под незарегистрированным пользователем и попробовать зарегистрироваться! если не получится значит ошибка! пробуй на первый взгляд в скрипте всё норм!
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 8.3.2009, 15:41
Сообщение #7


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




ну вот кароче один зарегился я его хотел здлеать админом но в списке регнутых его не было вот в чом проблема
Go to the top of the page
+Quote Post
Wariner
сообщение 8.3.2009, 15:58
Сообщение #8


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




Вы прочитайте то что надо сделать ещё раз или тему я закрою!
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 9.3.2009, 15:30
Сообщение #9


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




ну вообщем юзер зарегестрироваться может только регистрация не сохраняеться вот я регнулся сам под другим ником регестирует отлично а регистрация не сохраняеться!!!что делать может буть к папкке с регистрацией прописать!!!
Go to the top of the page
+Quote Post
Wariner
сообщение 9.3.2009, 16:41
Сообщение #10


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




Ошибки при регистрации были?
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 9.3.2009, 17:56
Сообщение #11


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




нет при регистрации регесрирует нормально просто не сохраняет регистрационные данные
Go to the top of the page
+Quote Post
Gangster-Toni
сообщение 11.3.2009, 16:50
Сообщение #12


Участник
**

Группа: Пользователи
Сообщений: 48
Регистрация: 4.1.2009
Из: Чернобыль
Пользователь №: 1 669
Спасибо сказали: 1 раз




ну чо узнал в чом проблема?
Go to the top of the page
+Quote Post
MaXZombie
сообщение 29.8.2009, 19:51
Сообщение #13


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 6.8.2009
Пользователь №: 4 076
Спасибо сказали: 0 раз




Блин такая же фигня ah.gif
Go to the top of the page
+Quote Post
Артём
сообщение 29.8.2009, 23:18
Сообщение #14


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 772 раза




http://mydc.ru/topic2208.html Нету ошибок,качайте big_smile.gif
Go to the top of the page
+Quote Post
MaXZombie
сообщение 30.8.2009, 0:10
Сообщение #15


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 6.8.2009
Пользователь №: 4 076
Спасибо сказали: 0 раз




Цитата(Артём @ 30.8.2009, 0:18) *
http://mydc.ru/topic2208.html Нету ошибок,качайте big_smile.gif


Так же все! Кароче я понял что но вот найти не могу.... какой код отвечает за то что бы давал определенный профиль?
Просто у меня профили сменились
Go to the top of the page
+Quote Post
Артём
сообщение 30.8.2009, 0:15
Сообщение #16


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 772 раза




MaXZombie в каком скрипте?
Go to the top of the page
+Quote Post
MaXZombie
сообщение 30.8.2009, 0:36
Сообщение #17


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 6.8.2009
Пользователь №: 4 076
Спасибо сказали: 0 раз




Цитата(Артём @ 30.8.2009, 1:15) *
MaXZombie в каком скрипте?


Может еще сам скрипт не очень.... я только вчера на lua перешел, и вообще на птоху!

CODE
--[[

RegMe 1.0f LUA 5.11 [Strict][API 2]

By Mutor 04/07/07

Self Registration / Change Password Script

-Checks if user is already registered
-Checks for invalid characters in nick and password
-Context menus [right click]
-Responds to user in PM only
-Existing password required to changed password

+Changes from 1.0 04/07/07 Requested by Yahoo
+Added block unregistered user file transfer/search/chat and pm to non ops
+Added 'block' message to unregistered user at connect attempt
+Added report new self-registered user to online ops.

+Changes from 1.0b 04/13/07
+Added report Unregistered User login to OpNick Requested by Yahoo

+Changes from 1.0c 10/21/07
~Converted for the new PtokaX API

+Changes from 1.0d 10/21/07
~Bugfix in user reg, forgot all user data must be requested. Report by DarkElf

+Changes from 1.0e 02/16/08
+Added RegOnly/RegChat/RegPms options. Requested by Giorgos
+Added Report option
~Changed all SendToNick to SendToUser [faster call]



RegMe Command Help

Command Description
!rmhelp RegMe Command Help
!regme Register Yourself
!passwd Register Yourself

]]

--//--
-- Disable transfer and search by unregistered users? true/false
local RegOnly = false
-- Disable chat for unregistered users? true/false
local RegChat = false
-- Disable private messages for unregistered users? true/false [pm's to ops are never blocked]
local RegPms = false
-- Report unregistered user logins to OpNick? true/false
local Report = false
-- Report nick for error messages and unregistered user logins [if Report = true]
local OpNick = "Daywalker"
--//--


local Bot,Scp,Pfx = SetMan.GetString(21),"Регистрация",SetMan.GetString(29):sub(1,1)
local Menu,SubMenu = SetMan.GetString(0),"Регистрация"
local BlockMsg = "\r\n\r\n\tUnregistered users may not chat, pm, search or transfer files in this hub.\r\n"..
"\tYou may pm operators for assistance. You may also self-register by typing.\r\n"..
"\t!regme <password> or use context menu commands [right click].\r\n\r\n"

UserConnected = function(user)
SendCmds(user)
if user.iProfile == -1 then
if Report then
OnError("The Unregistered User: "..user.sNick.." has logged in to "..SetMan.GetString(0))
end
if RegOnly then
return Core.SendToUser(user,"<"..Bot.."> "..BlockMsg..RegCmds["rmhelp"](user,data,cmd))
end
end
end
OpConnected,RegConnected = UserConnected,UserConnected

ChatArrival = function(user,data)
local _,_,cmd = data:find("%b<> %p(%w+)")
if cmd then
cmd = cmd:lower()
if cmd and RegCmds[cmd] then
return Core.SendPmToUser(user,Bot,RegCmds[cmd](user,data,cmd)), true
end
else
local _,_,to,from = string.find(data,"^$To: (%S+) From: (%S+)")
if to and from then
if RegPms and user.iProfile == -1 then
local prof = Core.GetUser(to)
if prof then
if not Core.GetUserValue(prof,11) then
return Core.SendPmToUser(user,to,"<"..Bot.."> "..BlockMsg),true
end
else
return true
end
end
else
if RegChat and user.iProfile == -1 then
return Core.SendToUser(user,"<"..Bot.."> "..BlockMsg),true
end
end
end
end
ToArrival = ChatArrival

ConnectToMeArrival = function(user, data)
if RegOnly and user.iProfile == -1 then
local CtmMsg = "\t*Please remove this transfer from your download queue.*"
return Core.SendToNick(user.sNick,"<"..Bot.."> "..BlockMsg..
CtmMsg:gsub(" ",string.char(160)).."\r\n\r\n|"),true
end
end
RevConnectToMeArrival = ConnectToMeArrival

SearchArrival = function (user, data)
if RegOnly and user.iProfile == -1 then
local SrMsg = "\t*Please close the search window right away.*"
local _,_,search = string.find(data,"([^%?]+)|$")
search = search or ""
local res = "Unknown Path"..string.char(92)..user.sNick..", search is "..
"disabled for you :P "..string.rep("\t",75)..search
return Core.SendToUser(user,"$SR "..SetMan.GetString(21).." "..res.." 0 0/0"..
SetMan.GetString(0).." ("..Core.GetHubIP()..":"..SetMan.GetString(4)..")"),
Core.SendToUser(user,"<"..Bot.."> "..BlockMsg..
SrMsg:gsub(" ",string.char(160)).."\r\n\r\n|"),true
end
end

OnError = function(msg)
local user = Core.GetUser(OpNick)
if user then
Core.SendToUser(user,"<"..Bot.."> "..msg)
end
end

SendCmds = function(user)
local Prof = "Не зарегистрированый"
if user.iProfile > -1 then
Prof = ProfMan.GetProfile(user.iProfile).sProfileName
end
for i,v in pairs(RegCmds) do
local desc,arg1,arg2 = RegCmds[i]()
Core.SendToNick(user.sNick,"$UserCommand 1 1 Регистрация\\"..SubMenu.."\\"..
desc.."$<%[mynick]> "..Pfx..i..arg1.."|")
Core.SendToNick(user.sNick,"$UserCommand 1 2 "..SubMenu.."\\"..
desc.."$<%[mynick]> "..Pfx..i..arg2.."|")
end
Core.SendToUser(user,"<"..Bot.."> "..Prof.."'s "..Scp.." commands "..
"enabled. Для регистрации воспользуйтесь меню.")
end

FormatSize = function(int)
local i,u,x = tonumber(int) or 0,{"","K","M","G","T","P"},1
while i > 1024 do i,x = i/1024,x+1 end return string.format("%.2f %sB.",i,u[x])
end

RegCmds = {
regme = function(user,data,cmd)
if user then
local nick = user.sNick
if user.iProfile ~= -1 then
return "Don't be silly "..nick.." you're already registered here."
elseif Core.GetUserAllData(user) then
local _,_,pwd = data:find("%b<> %p%w+ (%S+)|$")
if pwd then
if nick:find("[%c\$\|\<\>\:\?\*\"\/\\]") then
return "Your nickname contains invalid charachters. "..
"Please choose a new one."
end
if pwd:find("[%c\$\|\<\>\:\?\*\"\/\\]") then
return "Your password contains invalid charachters. "..
"Please choose a new one."
end
local hub = SetMan.GetString(0)
local addy = SetMan.GetString(2)..":"..SetMan.GetString(3)
local share,ip = FormatSize(user.iShareSize),user.sIP
local slots = user.iSlots or 0
local mode = "Пассив"
if user.bActive then mode = "Актив" end
if user.sMode and user.sMode == "5" then mode = "Socks5" end
local opmsg = "\r\n\r\n\tЗарегистрировался новый юзер\r\n"..
"\tвот детали регистрации:\r\n"..
"\t"..string.rep("=",22).."\r\n"..
"\tНик:\t"..nick.."\r\n"..
"\tПароль:\t"..pwd:gsub(".","x").."\r\n"..
"\tШара:\t"..share.."\r\n"..
"\tIP:\t"..ip.."\r\n"..
"\tРежим работы:\t"..mode.."\r\n"..
"\tОткрыто слотов:\t"..slots.."\r\n"
RegMan.AddReg(nick, pwd, 3)
Core.SendToOps("<"..Bot.."> "..opmsg)
return "\r\n\r\n\tПриветствую. Вы удачно "..
"зарегистрировались.\r\n\t"..string.rep("=",40).."\r\n"..
"\tНазвание хаба:\t"..hub.."\r\n"..
"\tАдрес хаба:\t"..addy.."\r\n"..
"\tНик:\t"..nick.."\r\n"..
"\tПароль:\t"..pwd.."\r\n\r\n"..
"\t"..string.rep("=",40).."\r\n"..
"\tПожалуйста обратите внимание на эту информацию.\r\n"..
"\tПожалуйста перезайдите на хаб, чтобы активизировать ваш статус.\r\n"
else
return "Error! Usage: "..Pfx..cmd.." <password>"
end
end
else
return "Зарегистрироваться"," %[line:Пароль]"," %[line:Пароль]"," <password>>"
end
end,
passwd = function(user,data,cmd)
if user then
if user.iProfile == -1 then
return "Don't be silly "..user.sNick.." you're not registered here."
elseif Core.GetUserAllData(user) then
local _,_,oldpass,newpass = data:find("%b<> %p%w+ (%S+) (.+)|$")
if oldpass and newpass then
local pwd,prof = RegMan.GetReg(user.sNick).sPassword,user.iProfile
if pwd and prof then
if oldpass:lower() ~= pwd:lower() then
return "That is not your correct password. "..
"Please try again. [case insensitive]"
end
if newpass:find("[%c\$\|\<\>\:\?\*\"\/\\]") then
return "Your new password contains invalid charachters. "..
"Please choose a new one."
end
if newpass:lower() == oldpass:lower() then
return "Your cannot change to the same password. "..
"Please choose a new one."
end
RegMan.ChangeReg(user.sNick, newpass, prof)
return "You have successfully changed your password from "..
oldpass.." to "..newpass
end
else
return "Error! Usage: ."..Pfx..cmd.." <old password> <new password>"
end
end
else
return "Сменить пароль"," %[line:Текущий пароль] %[line:Новый пароль]",
" %[line:Текущий пароль] %[line:Новый пароль]"," <old password> <new password>"
end
end,
rmhelp = function(user,data,cmd)
if user then
local reply = "\r\n\r\n\t"..Scp.." Help\r\n\r\n\tCommand\t\tDescription\r\n"..
"\t"..string.rep("=",40).."\r\n"
for i,v in pairs(RegCmds) do
local desc = RegCmds[i]()
reply = reply.."\t"..Pfx..string.format("%-15s",i).."\t"..desc.."\r\n"
end
return reply.."\n\t"..string.rep("=",40).."\r\n\r\n"
else
return "Справка","",""
end
end,
}
Go to the top of the page
+Quote Post
Alexey
сообщение 30.8.2009, 3:01
Сообщение #18


7 квадратиков
*******

Группа: Модераторы
Сообщений: 793
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 301 раз




В данном скрипте строка:
Код
RegMan.AddReg(nick, pwd, 3)


Спасибо сказали:
Go to the top of the page
+Quote Post
MaXZombie
сообщение 30.8.2009, 5:16
Сообщение #19


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 6.8.2009
Пользователь №: 4 076
Спасибо сказали: 0 раз




Цитата(Gangster-Toni @ 8.3.2009, 15:13) *
Кароче у мя PtokaX 4.1.1 Api2 ну вот стоит простой скрипт регистации без наворотов ну самая простая кароче она работала отлично а сегодня штото случилось кароче Человек регестриуеться на хабе а этот человека в списке зарегестрированных нет в чом проблема? пожайлуйста дайте cskre на нормальный скрипт хелп плиз!!! beat_brick.gif


Кароче меняй код
Код
RegMan.AddReg(nick, pwd, 3)
где 3 права юзера меня на 1 пробуй регестрироватся если (и не за будь проверить нет ли админки!!!)) Если не получатся меня на 2 и т.д так делать не надо

Цитата(Alexey @ 30.8.2009, 4:01) *
В данном скрипте строка:
Код
RegMan.AddReg(nick, pwd, 3)


Спасибо большое!
Go to the top of the page
+Quote Post
Jaska
сообщение 30.8.2009, 8:51
Сообщение #20


Освоившийся участник
*****

Группа: Администраторы
Сообщений: 344
Регистрация: 2.6.2008
Из: RB,Ufa
Пользователь №: 8
Спасибо сказали: 106 раз




Совершенно бестолковый подход! Открой хаб, зайди в менеджер профилей. Нумерация профилей идет сверху вниз начиная с 0. Посчитай какой номер профиля у зарегистрированного пользователя и укажи его в RegMan.AddReg(sNick, sPass, iProfNumber). Не надо методом антинаучного тыка проверять работу подобных скриптов. Иначе как-то наутро можешь обнаружить что на хабе все друг друга побанили, из-за того что при регистрации получили права с большими полномочиями.
Go to the top of the page
+Quote Post

2 страниц V   1 2 >
Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts Topic has attachmentsПроблема со скриптом Истории чата
5 SonicX 8 064 27.6.2014, 19:04 Посл. сообщение: sergius_s
No new внезапная непонятная проблема с хабом
17 aleksei1122 16 620 3.3.2013, 16:41 Посл. сообщение: Delia
No New Posts Помогите со скриптом! Плачу!
help
2 jekasumy 5 415 19.10.2012, 23:10 Посл. сообщение: jekasumy
No New Posts Проблема со скриптами на версии 0.4.2.0
5 Fe(one)X 7 699 16.2.2012, 21:28 Посл. сообщение: Fe(one)X
No New Posts помогите пожалуиста со скриптом
2 alex2014 4 577 27.1.2012, 13:10 Посл. сообщение: Damaks
No new Topic has attachmentsПроблема с хабом после установки роутера
22 Jet1k 29 478 3.1.2012, 11:05 Посл. сообщение: Strannik
No new Помоги со скриптом
Новинки
17 Dani_Filth 13 271 16.11.2011, 16:59 Посл. сообщение: Damaks
No New Posts Topic has attachmentsПроблема при установке плагина lua для верлихаба
12 sabriel 13 948 21.9.2011, 10:17 Посл. сообщение: sabriel
No New Posts Здравствуйте всем . У меня проблема со скриптам StatPX
Здравствуйте всем . У меня проблема со скриптам StatPX
4 warhammer 8 997 14.4.2011, 14:48 Посл. сообщение: warhammer
No New Posts Проблема с Remote_Admin
Не работает:(
1 el_toro 5 405 13.3.2011, 3:26 Посл. сообщение: Alexey
No New Posts XML. Проблема с плеером
размер шрифта
1 Rannau 6 033 28.2.2011, 9:53 Посл. сообщение: Setuper
No new Topic has attachmentsПроблема на PtоkaX 0.4.1.2 в скрипте
Проблема на PtоkaX 0.4.1.2 в скрипте
23 sania 23 039 23.2.2011, 15:37 Посл. сообщение: Saymon21
No New Posts Небольшая проблема Нужна ваша помощь !
Буду очень благодарен !!!
11 @_JuNiOr_@ 13 409 5.2.2011, 12:38 Посл. сообщение: Maximum
No New Posts От: Небольшая проблема Нужна ваша помощь !
От темы с ID: 4634
1 ScOol 4 972 3.2.2011, 17:48 Посл. сообщение: Maximum
No new Topic has attachmentsПомогите со скриптом
Не знаю название скрипта настоящие
20 sexynapku 18 685 16.12.2010, 15:10 Посл. сообщение: sexynapku

 



RSS Сейчас: 3.2.2023, 23:28