ursolouco
-
Total de itens
2.314 -
Registro em
-
Última visita
Tudo que ursolouco postou
-
Brother's!!! Antes de mais nada MUITO OBRIGADO À TODOS QUE VOTARAM ou não EM MIM!!! Se for escolhido para fazer parte da equipe de moderação da ScriptBrasil da sessão ASP vou fazer o possivel, impossivel, natural e sobre-natural para ajudar e manter a qualidade deste forum. Obrigado à todos!!!!! Forte Abraço!!! [wellington - ursolouco] OBS: Estranho, estava logado digitando esta mensagem, dei 2 Refresh e olha como ficou
-
Brother!!! Sem comentários............
-
Brother!! Não!!! A pasta temp, armazena conteudo temporario que vai mudando de acordo com o que você vai acessando... Abraços!! [urso]
-
Tipo.. um Select TOP ?
-
Brother!! Camarão ou Manjuba pra acompanhar ? Dá uma pesquisadinha no código livre, ou na asp.scriptbrasil que você vai achar muita coisa legal. Abraços!!! [urso]
-
www.posfesta.com.br
-
Brother!!! É necessário criar os arquivos com os respectivos nomes... Ex: Login.asp <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Administração de Noticias</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .texto { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #FFFFFF; } .caixa { font-family: Verdana; font-size: 10px; color: #FFCC00; background-color: #000000; border: 1px solid #F7F7F7; } --> </style> <style type="text/css"> <!-- .botao { font-family: Verdana; font-size: 10px; color: #FFFFFF; background-color: #000000; border: 1px solid #FFFFFF; } --> </style> </head> <body bgcolor="#000000" leftmargin="0" topmargin="0"> <form name="" method="post" action="Enviar.asp"> <table width="555" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td width="208" height="134"> </td> <td width="347"> </td> </tr> <tr> <td height="122"> </td> <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td height="12" colspan="7" valign="top"><p align="center" class="texto"><u>Sergio Escadinha - Administração de Noticias !</u></p></td> </tr> <tr> <td height="32" colspan="7" valign="top"><!--DWLayoutEmptyCell--> </td> </tr> <tr> <td width="85" rowspan="4" valign="top"><!--DWLayoutEmptyCell--> </td> <td height="18" colspan="2" valign="middle"> <p align="right" class="texto">Usuário:</p></td> <td colspan="3" valign="middle"> <p class="texto"> <input name="Usuario" type="text" class="caixa" id="Usuario" size="16" maxlength="16"> </p></td> <td width="99" rowspan="4" valign="top"><!--DWLayoutEmptyCell--> </td> </tr> <tr> <td height="20" colspan="2" valign="middle"> <p align="right" class="texto">Senha:</p></td> <td colspan="3" valign="middle"> <p class="texto"> <input name="Senha" type="password" class="caixa" id="Senha" size="12" maxlength="12"> </p></td> </tr> <tr> <td height="20" colspan="5" valign="top"><p class="texto"> </p></td> </tr> <tr> <td width="29" height="20"> </td> <td colspan="2" valign="top"><p class="texto"> <input name="Submit" type="submit" class="botao" value="Enviar"> </p></td> <td width="66" valign="top"><input name="Submit2" type="reset" class="botao" value="Redefinir"></td> <td width="19"></td> </tr> <tr> <td height="1"></td> <td></td> <td width="26"></td> <td width="23"></td> <td></td> <td></td> <td></td> </tr> </table></td> </tr> </table> </form> </body> </html> Melhorou ?
-
Poutz!!! Esse é o NOME!! Adorei este... Aprovado Abraços!!! [urso]
-
Brother!!! Não é assim que a coisa funciona.... tem que ser aprovado lá pelo chefe!!! Mas vamos ver no que vai dar, vamos torcer, quero que saiba que você também tem capacidade de ocupar esta vaga . Eu até tentei com For Next, For Each, o que mais chegou perto foi o GetRows, mas já desisti desta idéia maluco de por em paragrafos... deixa pra lá!! Mas já que você mencionou o assunto, me fala do <br>, como poderia coloca-lo após um certo numero de caracteres.. ? Abraços!!! [urso]
-
Brother!! JBrasil!!!! Ainda não experimentei, mas já ouvi falar muito bem deste Host Free. Abraços!!! [urso]
-
Brother!! Isso aí que você esta precisando e JavaScript e não ASP. Peça ao moderador para mover seu tópico pra lá que você vai ser melhor atendido Abraços!!! [ursão]
-
Brother!! Estrutura da Tabela 'Login' Login.asp <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Administração de Noticias</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .texto { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #FFFFFF; } .caixa { font-family: Verdana; font-size: 10px; color: #FFCC00; background-color: #000000; border: 1px solid #F7F7F7; } --> </style> <style type="text/css"> <!-- .botao { font-family: Verdana; font-size: 10px; color: #FFFFFF; background-color: #000000; border: 1px solid #FFFFFF; } --> </style> </head> <body bgcolor="#000000" leftmargin="0" topmargin="0"> <form name="" method="post" action="Enviar.asp"> <table width="555" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td width="208" height="134"> </td> <td width="347"> </td> </tr> <tr> <td height="122"> </td> <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <!--DWLayoutTable--> <tr> <td height="12" colspan="7" valign="top"><p align="center" class="texto"><u>Sergio Escadinha - Administração de Noticias !</u></p></td> </tr> <tr> <td height="32" colspan="7" valign="top"><!--DWLayoutEmptyCell--> </td> </tr> <tr> <td width="85" rowspan="4" valign="top"><!--DWLayoutEmptyCell--> </td> <td height="18" colspan="2" valign="middle"> <p align="right" class="texto">Usuário:</p></td> <td colspan="3" valign="middle"> <p class="texto"> <input name="Usuario" type="text" class="caixa" id="Usuario" size="16" maxlength="16"> </p></td> <td width="99" rowspan="4" valign="top"><!--DWLayoutEmptyCell--> </td> </tr> <tr> <td height="20" colspan="2" valign="middle"> <p align="right" class="texto">Senha:</p></td> <td colspan="3" valign="middle"> <p class="texto"> <input name="Senha" type="password" class="caixa" id="Senha" size="12" maxlength="12"> </p></td> </tr> <tr> <td height="20" colspan="5" valign="top"><p class="texto"> </p></td> </tr> <tr> <td width="29" height="20"> </td> <td colspan="2" valign="top"><p class="texto"> <input name="Submit" type="submit" class="botao" value="Enviar"> </p></td> <td width="66" valign="top"><input name="Submit2" type="reset" class="botao" value="Redefinir"></td> <td width="19"></td> </tr> <tr> <td height="1"></td> <td></td> <td width="26"></td> <td width="23"></td> <td></td> <td></td> <td></td> </tr> </table></td> </tr> </table> </form> </body> </html> Enviar.asp <html> <head> <title>Enviar.asp</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .textoErro { font-family: Verdana; font-size: 10px; font-weight: bold; color: #FFFFFF; text-align: center; vertical-align: middle; } --> </style> <style type="text/css"> <!-- a:link { color: #FFFFFF; } a:visited { color: #FFFFFF; } a:hover { color: #FFFFFF; text-decoration: underline; } --> </style> <style type="text/css"> <!-- a { text-decoration: none; } --> </style> </head> <body bgcolor="#000000" text="#FFFFFF" leftmargin="0" topmargin="0"> <% Usuario = Trim(CStr(Request.Form("Usuario"))) Senha = Trim(CStr(Request.Form("Senha"))) If Usuario = "" Then Response.Write("<br>"& "<p class='textoErro'>"& "Preencha o campo usuario" & "</p>" & "<br>") Response.Write("<p class='textoErro'>"& "<a href='#' onClick='history.back()'>" & "Voltar" & "</a>"& "</p>") Response.End() End If If Senha = "" Then Response.Write("<br>"& "<p class='textoErro'>"& "Preencha o campo senha!" & "</p>" & "<br>") Response.Write("<p class='textoErro'>"& "<a href='#' onClick='history.back()'>" & "Voltar" & "</a>"& "</p>") Response.End() End If cBanco = Server.MapPath("./db/Geral.mdb") strConn = "Provider = Microsoft.Jet.Oledb.4.0; Data Source = "& cBanco &";" Set Conn = Server.CreateObject("adodb.connection") Conn.Open(strConn) Set Rs = Server.CreateObject("adodb.recordset") Function vUser() cSQL = "Select * From Login Where usuario = '"& Usuario &"';" Set Rs = Conn.Execute(cSQL) If Not Rs.EOF Then 'se localizar o usuario, olhe a senha If Rs("Senha") = Senha then Session("Log") = "Ok" Else Session("Log") = "False" End If End if End Function Call vUser If Session("Log")<> "Ok" Then Response.Write("<br>"& "<p class='textoErro'>"& "Usuario ou senha invalida!" & "</p>" & "<br>") Response.Write("<p class='textoErro'>"& "<a href='#' onClick='history.back()'>" & "Voltar" & "</a>"& "</p>") Response.End() Else Response.Redirect("Admin.asp") End if %> </body> </html> <%%> Admin.asp <% If Session("Log")<>"Ok" Then Response.Redirect("Login.asp") Response.End() End If %> <html> <head> <title>Admin.asp</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body bgcolor="#000000" leftmargin="0" topmargin="0"> </body> </html> Veja se pode lhe ajudar!! Abraços!!! [urso]
-
Salver Brothers!!! Tenho uma pequenina dúvida, meio boba, mas to com ela.... num sisteminha de noticias... Vamos lá.... Digamos que no retorno de uma consulta ao banco de dados temos um campo do meu RecordSet que tenha mais de 250 caracteres.(Uns 850) Quero fazer o seguinte... após uma certa quantidade de caracteres... (uns 85) meu sisteminha feche o paragrafo e abra um novo dando sequencia com os dados a serem exibidos na tela. Tem como fazer isso ? já tentei fazer Replace mas não tá rolando.... alguém já fez algo parecido ? Fazendo isso até acabar os dados do recordSet.. Abraços e Muito Obrigado!! [ursolouco]
-
www.aFesta.com.br
-
Bzl Brother!!! Mais ou menos isso aqui.. <% Dim Conn, strConn, cBanco cBanco = Server.MapPath("banco.mdb") strConn = "Provider = Microsoft.Jet.Oledb.4.0; Data Source = "& cBanco &";" Set Conn = Server.CreateObject("Adodb.Connection") Conn.Open(strConn) Session.LCID = 1046 nData = FormatDateTime(Resquest.Form("Data"), 2) nMovimento = CInt(Request.Form("Movimento")) nValor = CCur(Request.Form("Valor")) nParcelas = CInt(Request.Form("Parcelas")) nJuros = CCur(Request.Form("Juros")) iSQL = "INSERT INTO Tabela VALUES('"nData"','"nMovimento"','"nValor"','"nParcelas"','"nJuros"') " Conn.Execute(iSQL) Response.Write("Tudo OK, sistema atualizado") Conn.Close Set Conn = Nothing %>
-
Eduardo!! Registre-se no forum e ajude nossa comunidade crescer ainda mais. Qual componente de envio de emails você tem instalado no seu servidor ? Abraços!!! [urso]
-
Brother!!! Ajudar, claro, com maior prazer, agora vamos ver o que você precisa especificamente. Alguma perguntas para ajudar você desenvolver seu sistema: 1° - Qual Banco de dados você vai usar ? 2° - Sua tabela já esta pronta ? 3°- O campos e tipo de dados que vão ser recebidos 4°- Redirecionar ou emitir na tela o aviso de sucesso ? Abraços!!! [urso]
-
Brother!! Tá usando AddHeader ?
-
Brother!!! Me diga lá, há dois 'Option Explicit' no seu arquivo ? Há alguma configuração no servidor para adicionar cabeçalho automaticamente ? Seu include esta fora das TAG de identificação ASP <%%>? Não era pra gerar este tipo de erro em um aquivo em branco... :Abraços!! [urso]
-
Poutz!!! Agora que percebi, dei uma viajada na resposta anterior... if Request.Cookies("session_id") = Session.SessionID then Response.Cookies("session_id") = Session.SessionID Response.Cookies("ip") = Request.ServerVariables("REMOTE_ADDR") else sql = "UPDATE contador SET visitas = visitas + 1" db.Execute(sql) Response.Cookies("session_id") = Session.SessionID Response.Cookies("ip") = Request.ServerVariables("REMOTE_ADDR") end if Essa instrução aqui já vai resolver seu problema. Ta completo, agora que olhei o DreamWeaverMX e analisei bem, isso já mata o problema, caso houvesse, do sistema. Parabéns!!! Muito bom mesmo, acho que este código deveria ficar pendurado na sessão de ASP para que outros visitantes possam olhar e se basear no seu código. Abraços!!! [urso]
-
Brother!! Quanto a resposta ao POST anterior, era fruta mano, viu lá que até editei o POST ? Eu testei seu código aqui em casa, hoje, ficou muito bom e legal, achei nota 10, mas me surgiu uma grande coisa que é necessario se pensar, hoje em dia, vamos dizer que 40% do visitantes da web, já usam o I.E 6.0, que o mesmo pode ser configurado para ignorar a manipulação de cookies (Guia Privacidade das opçoes da internet), se o mesmo estiver configurado desta forma seu cookie não vai ser adicionado e pode gerar uma pequeno atraso na sua aplicação ou até mesmo 'Erro', acho que no seu código só esta faltando esse controle de erro, caso não seja possivel adicionar o cookie. Há muito tempo atras, eu vi um código em JScript que fazia a verificação se o navegador aceitava cookie, se a verificação fosse negativa era gerada uma mensagem de alerta para o visitante para que o mesmo pudesse continuar no sistema, acho que é interessante você procurar o inserir este tipo de verificação para o seu sistema fica 'perfeito'. Abraços e boa Entrada de Ano!!! [urso]
-
Brother!! Login pronto!!! Mas recomendo que você estude o código para se aperfeiçoar!! Abraços!!! [urso]
-
Brother!!!! Na minha opinião, acho que você entendeu tudo o que disse em um outro POST. Era isso mesmo que eu tentei lhe dizer, pegar a sessão e o IP, se não há cadastro, insira um e atualize a tabela. Esta ótimo, muito bom. Parabéns!!! [urso] OBS: Só faltou você pedir um Cocô(não sei se tem acento, mas é a fruta!!! ) para completar!!!
