My OpenSource! =)

[-_KIKO_- 0]

Merecem mesmo!! :D (ainda mais que agora eu vo encher de duvidas esse Fórum! ;) )

 

Na versão 2.1 que é essa eu corrigi alguns probleminhas que tinha de conexão e parece que algumas das poucas alterações que eu fiz deixou um pouco menos pesado....

 

Oque tem nesse serviço?

Painel de Administração

Mural

Cadastro & Exclusão de Administradores

Alteração de Administradores

Gerenciamento de Usuários cadastrados - Perfil

 

Download Full

http://www.jbrasil.com/kiko/opensource/cadastro.zip

 

Full Tour

http://www.jbrasil.com/kiko/opensource/cadastro/

Admin: -_KIKO_-

Password: 12345

 

 

Em breve versão 2.5 com modificações, avatares personalizados para o Mural que vai virar um Fórum com colocação de Tópicos e tudo mais!!!

Nessa versão eu não coloquei no rodapé escrito versão 2.1 porque nem teve muita modificação...então deixa assim mesmo!

 

GOOD LUCK

 

Outra caracteristica:

Redimensionável em qualquer resolução!!

 

 

 

ps..:não liiguem para a minha pouca experiencia com programação!

ps2..: eu fiz esse open para um serviço de hospedagem.....podem alterar os campos e manda bala

[gastao 0]

;) ;) ;) ;) cuidado com o sql injection!!! :D

[gastao 0]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][Driver ODBC para Microsoft Access] Não foi possível excluir items das tabelas especificadas. /kiko/opensource/cadastro/remove_adm2.asp, line 28

[-_KIKO_- 0]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][Driver ODBC para Microsoft Access] Não foi possível excluir items das tabelas especificadas. /kiko/opensource/cadastro/remove_adm2.asp, line 28

acha que eu deixxaria disponível remover admin num Tour sendo que todos poderiam apagar os adm?Roda se você baxar o arquivo e por na net.....ai fica normalz

[-_KIKO_- 0]

mais uma coisa..nesse JBRASIL meus ASPs nunca rodam legal....mas se você por no Localhost com o IIS no seu pc fica normalzão!!!pq?! não sei... vai dar um monte de erro alienado

[gastao 0]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][Driver ODBC para Microsoft Access] Não foi possível excluir items das tabelas especificadas. /kiko/opensource/cadastro/remove_adm2.asp, line 28

acha que eu deixxaria disponível remover admin num Tour sendo que todos poderiam apagar os adm?Roda se você baxar o arquivo e por na net.....ai fica normalz

e o sql injection

[Salgado 4]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005'

 

[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.

 

/kiko/opensource/cadastro/alterar_adm3.asp, line 58

E cuidado com o SQL Injection fio.

você tem esse fórum online com alguém?

[-_KIKO_- 0]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável. /kiko/opensource/cadastro/alterar_adm3.asp, line 58

Já disse :D O jbrasil naum ta rodando isso legal!!Baixem isso ae e testem ou testem plo meu server...la ta tudo okhttp://e0x.no-ip.com:5555/cadastro/

[-_KIKO_- 0]

Microsoft OLE DB Provider for ODBC Drivers erro '80004005'

 

[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.

 

/kiko/opensource/cadastro/alterar_adm3.asp, line 58

Já disse ;)

O jbrasil naum ta rodando isso legal!!

 

Baixem isso ae e testem ou testem plo meu server...la ta tudo ok

 

http://e0x.no-ip.com:5555/cadastro/

3ª Vez: Cuidado com SQL Injection...

 

Ai kara... Qual que é a senha para entrar na área administrativa?

 

'OR para login e 'OR pra senha ?

 

AFFF

AUEHAueahUEHu

 

sabem como arruma? B) ;)

[WebASP 0]

'or''='

 

colocando em login e senha isso e qualquer pessoa loga basta por

 

Errado:

 

Login = Request.Form("Login")

Senha = Request.Form("Senha")

 

Certo:

 

Login = Replace(Request.Form("Login"),"'","")

Senha = Replace(Request.Form("Senha"),"'","")

 

E no meu caso eu uso uma função

 

 

que ficaria assim

 

 

Login = MakeOk(Request.Form("Login"))

Senha = MakeOk(Request.Form("Senha"))

 

 

Função

 

Function MakeOk(sTrings)	MakeOk = Replace(sTrings,"'","")	MakeOk = Replace(sTrings,"""","")	MakeOk = Replace(MakeOk,Chr(34),"")	MakeOk = Replace(MakeOk,Chr(39),"")	MakeOk = Trim(MakeOk)End Function